(bind-func print "specialised print function for Complexf" (lambda (c:Complexf) (printf "%.2f%+.2fi" (ftod (tref c 0)) (ftod (tref c 1))) void))