// one dimensional mechanical mass model
module mass1d(n);
 inout n;
 kinematic n;
 parameter real m = 25 from (0:inf),    // mass given in gramm
                init_vel = 0,           // initial speed in m/s
                init_pos = 0;           // initial position in m

 real speed;

 analog
 begin
   speed = idt( F(n)/m ,init_vel,analysis("static"));
   Pos(n) <+ idt(speed,init_pos,analysis("static"));

   // can also be formulated with one statement:
   // Pos(n) <+ idt ( idt( F(n)/m ,init_vel,analysis("static")),
   //                 init_pos,analysis("static"));
 end
endmodule