(bind-func cpTransformNew (lambda (a:cpFloat b:cpFloat c:cpFloat d:cpFloat tx:cpFloat ty:cpFloat) (cpTransform_val a b c d tx ty)))