Rutils/maybe-not-useful/collatz.r

In manfredo89/ED2io: Manages Input/Output for Ecosystem Demography 2 Model

#==========================================================================================#
#==========================================================================================#
#      This is the generic function used for a handful of parameters in Collatz et al.     #
# (1991), written as a function of a reference temperature, given by tcollatz.  The output #
# variable will have the same unit as the pre-factor coefficient.                          #
#------------------------------------------------------------------------------------------#
collatz = function(temp,prefactor,base){
   #---------------------------------------------------------------------------------------#
   #     If the exponential factor is tiny, make it zero, otherwise compute the actual     #
   # function.                                                                             #
   #---------------------------------------------------------------------------------------#
   coll  = prefactor  * base ^ (fcollatz * (temp - tcollatz))
   #---------------------------------------------------------------------------------------#

   return(coll)
}#end function collatz
#==========================================================================================#
#==========================================================================================#