REAL cld_lc_lsc,cld_lc_con
      REAL cld_tau_lsc,cld_tau_con
      REAL ffallv_lsc,ffallv_con
      REAL coef_eva
      LOGICAL reevap_ice
      INTEGER iflag_pdf

      common/comfisrtilp/
     s     cld_lc_lsc     ! 2.6e-4
     s     ,cld_lc_con    ! 2.6e-4
     s     ,cld_tau_lsc   ! 3600.
     s     ,cld_tau_con   ! 3600.
     s     ,ffallv_lsc    ! 1.
     s     ,ffallv_con    ! 1.
     s     ,coef_eva      ! 2.e-5
     s     ,reevap_ice    ! F
     s     ,iflag_pdf     ! 0