module Bindings.Fann.InputOutput where
import Foreign.Ptr (Ptr,FunPtr,plusPtr)
import Foreign.Ptr (wordPtrToPtr,castPtrToFunPtr)
import Foreign.Storable
import Foreign.C.Types
import Foreign.C.String (CString,CStringLen,CWString,CWStringLen)
import Foreign.Marshal.Array (peekArray,pokeArray)
import Data.Int
import Data.Word
import Bindings.Fann.DataStructures
foreign import ccall "fann_save" c'fann_save
:: Ptr C'fann -> CString -> IO ()
foreign import ccall "&fann_save" p'fann_save
:: FunPtr (Ptr C'fann -> CString -> IO ())
foreign import ccall "fann_save_to_fixed" c'fann_save_to_fixed
:: Ptr C'fann -> CString -> IO ()
foreign import ccall "&fann_save_to_fixed" p'fann_save_to_fixed
:: FunPtr (Ptr C'fann -> CString -> IO ())
foreign import ccall "fann_create_from_file" c'fann_create_from_file
:: CString -> IO (Ptr C'fann)
foreign import ccall "&fann_create_from_file" p'fann_create_from_file
:: FunPtr (CString -> IO (Ptr C'fann))