If coordinate vector of a point is given by
coor[t_] := {Quantity[x[t], "Meters"], Quantity[y[t], "Meters"]}
![enter image description here](/c/portal/getImageAttachment?filename=2014-08-17_00-18-44.png&userId=113605)
and time is defined as
time = Quantity[t, "Seconds"]
and constant speed as
speed = Quantity[c, "Meters"/"Seconds"]
then time derivative of coordinate vector will give velocity in proper units:
D[coor[t], time]
![enter image description here](/c/portal/getImageAttachment?filename=2014-08-17_00-22-03.png&userId=113605)
which also can be rescaled as dimensionless
D[coor[t], time]/speed
![enter image description here](/c/portal/getImageAttachment?filename=2014-08-17_00-23-47.png&userId=113605)