I am try to program a proc that will plot the kinematic equations.

kinematics := proc(a::procedure, t::name, s0::numeric, v0::numeric, t0::numeric, t1:: numeric)

local v:=t->v0+int(a(t),t);

local s:=t->s0+int(v(t),t);

plot([a(t),v(t),s(t)], t=t0..t1);

end proc;

the above is my code, which works ok. 

Note: a is acceleration function, v is velocity function, s is position function, t is independent variable,...