(bind-func cpvlerpconst (lambda (v1:cpVect v2:cpVect d:cpFloat) (cpvadd v1 (cpvclamp (cpvsub v2 v1) d))))