{-# LANGUAGE ForeignFunctionInterface #-} #include #include "cvWrapLEO.h" #include module CV.Bindings.Tracking where import Data.Word import Foreign.C.Types import CV.Bindings.Matrix import CV.Image import CV.Bindings.Types #strict_import #ccall wrapCamShift, Ptr -> Ptr -> Ptr -> Ptr -> Ptr -> IO () #ccall wrapMeanShift, Ptr -> Ptr -> Ptr -> Ptr -> IO () -- void wrapSnakeImage(const IplImage* image, CvPoint* points, int length, float* alpha, float* beta, float* gamma, int coeff_usage, CvSize win, CvTermCriteria criteria, int calc_gradient=1)ΒΆ #ccall cvSnakeImage, Ptr -> Ptr -> Int -> Ptr Float -> Ptr Float -> Ptr Float -> Int -> Ptr -> Ptr -> Int -> IO () #num CV_VALUE #num CV_ARRAY