module Bindings.Fann.Options 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_print_parameters" c'fann_print_parameters
:: Ptr C'fann -> IO ()
foreign import ccall "&fann_print_parameters" p'fann_print_parameters
:: FunPtr (Ptr C'fann -> IO ())
foreign import ccall "fann_get_training_algorithm" c'fann_get_training_algorithm
:: Ptr C'fann -> IO CUInt
foreign import ccall "&fann_get_training_algorithm" p'fann_get_training_algorithm
:: FunPtr (Ptr C'fann -> IO CUInt)
foreign import ccall "fann_set_training_algorithm" c'fann_set_training_algorithm
:: Ptr C'fann -> CUInt -> IO ()
foreign import ccall "&fann_set_training_algorithm" p'fann_set_training_algorithm
:: FunPtr (Ptr C'fann -> CUInt -> IO ())
foreign import ccall "fann_get_learning_rate" c'fann_get_learning_rate
:: Ptr C'fann -> IO CFloat
foreign import ccall "&fann_get_learning_rate" p'fann_get_learning_rate
:: FunPtr (Ptr C'fann -> IO CFloat)
foreign import ccall "fann_set_learning_rate" c'fann_set_learning_rate
:: Ptr C'fann -> CFloat -> IO ()
foreign import ccall "&fann_set_learning_rate" p'fann_set_learning_rate
:: FunPtr (Ptr C'fann -> CFloat -> IO ())
foreign import ccall "fann_get_activation_function_hidden" c'fann_get_activation_function_hidden
:: Ptr C'fann -> IO CUInt
foreign import ccall "&fann_get_activation_function_hidden" p'fann_get_activation_function_hidden
:: FunPtr (Ptr C'fann -> IO CUInt)
foreign import ccall "fann_set_activation_function_hidden" c'fann_set_activation_function_hidden
:: Ptr C'fann -> CUInt -> IO ()
foreign import ccall "&fann_set_activation_function_hidden" p'fann_set_activation_function_hidden
:: FunPtr (Ptr C'fann -> CUInt -> IO ())
foreign import ccall "fann_get_activation_function_output" c'fann_get_activation_function_output
:: Ptr C'fann -> IO CUInt
foreign import ccall "&fann_get_activation_function_output" p'fann_get_activation_function_output
:: FunPtr (Ptr C'fann -> IO CUInt)
foreign import ccall "fann_set_activation_function_output" c'fann_set_activation_function_output
:: Ptr C'fann -> CUInt -> IO ()
foreign import ccall "&fann_set_activation_function_output" p'fann_set_activation_function_output
:: FunPtr (Ptr C'fann -> CUInt -> IO ())
foreign import ccall "fann_get_activation_steepness_hidden" c'fann_get_activation_steepness_hidden
:: Ptr C'fann -> IO CFloat
foreign import ccall "&fann_get_activation_steepness_hidden" p'fann_get_activation_steepness_hidden
:: FunPtr (Ptr C'fann -> IO CFloat)
foreign import ccall "fann_set_activation_steepness_hidden" c'fann_set_activation_steepness_hidden
:: Ptr C'fann -> CFloat -> IO ()
foreign import ccall "&fann_set_activation_steepness_hidden" p'fann_set_activation_steepness_hidden
:: FunPtr (Ptr C'fann -> CFloat -> IO ())
foreign import ccall "fann_get_activation_steepness_output" c'fann_get_activation_steepness_output
:: Ptr C'fann -> IO CFloat
foreign import ccall "&fann_get_activation_steepness_output" p'fann_get_activation_steepness_output
:: FunPtr (Ptr C'fann -> IO CFloat)
foreign import ccall "fann_set_activation_steepness_output" c'fann_set_activation_steepness_output
:: Ptr C'fann -> CFloat -> IO ()
foreign import ccall "&fann_set_activation_steepness_output" p'fann_set_activation_steepness_output
:: FunPtr (Ptr C'fann -> CFloat -> IO ())
foreign import ccall "fann_set_train_error_function" c'fann_set_train_error_function
:: Ptr C'fann -> CUInt -> IO ()
foreign import ccall "&fann_set_train_error_function" p'fann_set_train_error_function
:: FunPtr (Ptr C'fann -> CUInt -> IO ())
foreign import ccall "fann_get_train_error_function" c'fann_get_train_error_function
:: Ptr C'fann -> IO CUInt
foreign import ccall "&fann_get_train_error_function" p'fann_get_train_error_function
:: FunPtr (Ptr C'fann -> IO CUInt)
foreign import ccall "fann_get_quickprop_decay" c'fann_get_quickprop_decay
:: Ptr C'fann -> IO CFloat
foreign import ccall "&fann_get_quickprop_decay" p'fann_get_quickprop_decay
:: FunPtr (Ptr C'fann -> IO CFloat)
foreign import ccall "fann_set_quickprop_decay" c'fann_set_quickprop_decay
:: Ptr C'fann -> CFloat -> IO ()
foreign import ccall "&fann_set_quickprop_decay" p'fann_set_quickprop_decay
:: FunPtr (Ptr C'fann -> CFloat -> IO ())
foreign import ccall "fann_get_quickprop_mu" c'fann_get_quickprop_mu
:: Ptr C'fann -> IO CFloat
foreign import ccall "&fann_get_quickprop_mu" p'fann_get_quickprop_mu
:: FunPtr (Ptr C'fann -> IO CFloat)
foreign import ccall "fann_set_quickprop_mu" c'fann_set_quickprop_mu
:: Ptr C'fann -> CFloat -> IO ()
foreign import ccall "&fann_set_quickprop_mu" p'fann_set_quickprop_mu
:: FunPtr (Ptr C'fann -> CFloat -> IO ())
foreign import ccall "fann_get_rprop_increase_factor" c'fann_get_rprop_increase_factor
:: Ptr C'fann -> IO CFloat
foreign import ccall "&fann_get_rprop_increase_factor" p'fann_get_rprop_increase_factor
:: FunPtr (Ptr C'fann -> IO CFloat)
foreign import ccall "fann_set_rprop_increase_factor" c'fann_set_rprop_increase_factor
:: Ptr C'fann -> CFloat -> IO ()
foreign import ccall "&fann_set_rprop_increase_factor" p'fann_set_rprop_increase_factor
:: FunPtr (Ptr C'fann -> CFloat -> IO ())
foreign import ccall "fann_get_rprop_decrease_factor" c'fann_get_rprop_decrease_factor
:: Ptr C'fann -> IO CFloat
foreign import ccall "&fann_get_rprop_decrease_factor" p'fann_get_rprop_decrease_factor
:: FunPtr (Ptr C'fann -> IO CFloat)
foreign import ccall "fann_set_rprop_decrease_factor" c'fann_set_rprop_decrease_factor
:: Ptr C'fann -> CFloat -> IO ()
foreign import ccall "&fann_set_rprop_decrease_factor" p'fann_set_rprop_decrease_factor
:: FunPtr (Ptr C'fann -> CFloat -> IO ())
foreign import ccall "fann_get_rprop_delta_min" c'fann_get_rprop_delta_min
:: Ptr C'fann -> IO CFloat
foreign import ccall "&fann_get_rprop_delta_min" p'fann_get_rprop_delta_min
:: FunPtr (Ptr C'fann -> IO CFloat)
foreign import ccall "fann_set_rprop_delta_min" c'fann_set_rprop_delta_min
:: Ptr C'fann -> CFloat -> IO ()
foreign import ccall "&fann_set_rprop_delta_min" p'fann_set_rprop_delta_min
:: FunPtr (Ptr C'fann -> CFloat -> IO ())
foreign import ccall "fann_get_rprop_delta_max" c'fann_get_rprop_delta_max
:: Ptr C'fann -> IO CFloat
foreign import ccall "&fann_get_rprop_delta_max" p'fann_get_rprop_delta_max
:: FunPtr (Ptr C'fann -> IO CFloat)
foreign import ccall "fann_set_rprop_delta_max" c'fann_set_rprop_delta_max
:: Ptr C'fann -> CFloat -> IO ()
foreign import ccall "&fann_set_rprop_delta_max" p'fann_set_rprop_delta_max
:: FunPtr (Ptr C'fann -> CFloat -> IO ())
foreign import ccall "fann_get_num_input" c'fann_get_num_input
:: Ptr C'fann -> IO CUInt
foreign import ccall "&fann_get_num_input" p'fann_get_num_input
:: FunPtr (Ptr C'fann -> IO CUInt)
foreign import ccall "fann_get_num_output" c'fann_get_num_output
:: Ptr C'fann -> IO CUInt
foreign import ccall "&fann_get_num_output" p'fann_get_num_output
:: FunPtr (Ptr C'fann -> IO CUInt)
foreign import ccall "fann_get_total_neurons" c'fann_get_total_neurons
:: Ptr C'fann -> IO CUInt
foreign import ccall "&fann_get_total_neurons" p'fann_get_total_neurons
:: FunPtr (Ptr C'fann -> IO CUInt)
foreign import ccall "fann_get_total_connections" c'fann_get_total_connections
:: Ptr C'fann -> IO CUInt
foreign import ccall "&fann_get_total_connections" p'fann_get_total_connections
:: FunPtr (Ptr C'fann -> IO CUInt)