curno Subroutine

subroutine curno(cnn, h)

Uses

  • proc~~curno~~UsesGraph proc~curno curno module~hru_module hru_module proc~curno->module~hru_module module~soil_module soil_module proc~curno->module~soil_module module~time_module time_module proc~curno->module~time_module module~carbon_module carbon_module module~soil_module->module~carbon_module

~ ~ ~ PURPOSE ~ ~ ~ this subroutine determines the curve numbers for moisture conditions I and III and calculates coefficients and shape parameters for the water retention curve the coefficients and shape parameters are calculated by one of two methods: the default method is to make them a function of soil water, the alternative method (labeled new) is to make them a function of accumulated PET, precipitation and surface runoff. ~ ~ ~ OUTGOING VARIABLES ~ ~ ~ name |units |definition ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ smx(:) |none |retention coefficient for cn method based on |soil moisture wrt(1,:) |none |1st shape parameter for calculation of |water retention wrt(2,:) |none |2nd shape parameter for calculation of |water retention ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~

~ ~ ~ LOCAL DEFINITIONS ~ ~ ~ name |units |definition
~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~

~ ~ ~ SUBROUTINES/FUNCTIONS CALLED ~ ~ ~ Intrinsic: Exp, Max SWAT: ascrv

~ ~ ~ ~ ~ ~ END SPECIFICATIONS ~ ~ ~ ~ ~ ~

calculate moisture condition I and III curve numbers calculate maximum retention parameter value calculate retention parameter value for CN3 calculate fraction difference in retention parameters calculate shape parameters

Arguments

Type IntentOptional Attributes Name
real, intent(in) :: cnn
integer, intent(in) :: h

Calls

proc~~curno~~CallsGraph proc~curno curno ascrv ascrv proc~curno->ascrv