c begin include file cimcln.inc c + + + COMMON BLOCK DESCRIPTION + + + c Variables in common /imcln/ are common to impoundment c element impmai and impreg subroutines to modify the c rearrangment of the flow regimes after automatically c cleaning the deposit in the impoundment when sediment c in the impoundment is heigher than the stage at which c the full of sediment flag goes off. common /imcln/ atcln c + + + VARIABLE DECLARATIONS + + + integer atcln c + + + VARIABLE DEFINITIONS + + + c atcln: flag of automatically cleanning deposit c c end include file cimcln.inc