(bind-func xtm_vgimage_scaled (lambda (sx sy) (vgSeti VG_MATRIX_MODE VG_MATRIX_IMAGE_USER_TO_SURFACE) (vgScale (dtof sx) (dtof sy))))