!copyright (C) 2001  MSC-RPN COMM  %%%RPNPHY%%%
*
      REAL CEVAP, CMELT, CCCTIM
      COMMON/COMPHY/ CEVAP,   CMELT,   CCCTIM
*
#if defined(DOC)
*COMMON BLOCK /COMPHY/
*          contains some constants for physics calculation
*          such as evaporation, melting, cumulus cloud
*
* CEVAP    is a constant for evaporation of total precipitation.
*          It is initialized in PHYDEBU to 1.2E-4
* CMELT    is a constant of the formula for the rate of change of
*          the liquid water/ice composition of these
*          precipitations. It is initialized in PHYDEBU to 2.4E+4
* CCCTIM   is the cumulus life-time value to compute its cloud
*          cover. It is initialized in PHYDEBU to 1800.0
*
#endif
*
*