| subroutine module_sf_ruclsm::sfctmp  | 
          ( | 
          logical, intent(in)  | 
          debug_print,  | 
         
        
           | 
           | 
          real (kind_phys), intent(in)  | 
          delt,  | 
         
        
           | 
           | 
          integer, intent(in)  | 
          ktau,  | 
         
        
           | 
           | 
          real (kind_phys), intent(in)  | 
          conflx,  | 
         
        
           | 
           | 
          integer, intent(in)  | 
          i,  | 
         
        
           | 
           | 
          integer, intent(in)  | 
          j,  | 
         
        
           | 
           | 
          real (kind_phys), intent(in)  | 
          xlat,  | 
         
        
           | 
           | 
          real (kind_phys), intent(in)  | 
          xlon,  | 
         
        
           | 
           | 
          real (kind_phys), intent(in)  | 
          testptlat,  | 
         
        
           | 
           | 
          real (kind_phys), intent(in)  | 
          testptlon,  | 
         
        
           | 
           | 
          integer, intent(in)  | 
          nzs,  | 
         
        
           | 
           | 
          integer, intent(in)  | 
          nddzs,  | 
         
        
           | 
           | 
          integer, intent(in)  | 
          nroot,  | 
         
        
           | 
           | 
          real (kind_phys), intent(in)  | 
          meltfactor,  | 
         
        
           | 
           | 
          integer, intent(in)  | 
          isncond_opt,  | 
         
        
           | 
           | 
          integer, intent(in)  | 
          isncovr_opt,  | 
         
        
           | 
           | 
          integer, intent(inout)  | 
          ILAND,  | 
         
        
           | 
           | 
          integer, intent(inout)  | 
          ISOIL,  | 
         
        
           | 
           | 
          integer, intent(in)  | 
          IVGTYP,  | 
         
        
           | 
           | 
          integer, intent(in)  | 
          ISLTYP,  | 
         
        
           | 
           | 
          real (kind_phys)  | 
          PRCPMS,  | 
         
        
           | 
           | 
          real (kind_phys)  | 
          NEWSNMS,  | 
         
        
           | 
           | 
          real (kind_phys), intent(inout)  | 
          SNWE,  | 
         
        
           | 
           | 
          real (kind_phys), intent(inout)  | 
          SNHEI,  | 
         
        
           | 
           | 
          real (kind_phys), intent(inout)  | 
          SNOWFRAC,  | 
         
        
           | 
           | 
          logical, intent(in)  | 
          exticeden,  | 
         
        
           | 
           | 
          real (kind_phys), intent(inout)  | 
          RHOSN,  | 
         
        
           | 
           | 
          real (kind_phys), intent(in)  | 
          RHONEWSN_ex,  | 
         
        
           | 
           | 
          real (kind_phys), intent(inout)  | 
          RHONEWSN,  | 
         
        
           | 
           | 
          real (kind_phys), intent(inout)  | 
          RHOSNFALL,  | 
         
        
           | 
           | 
          real (kind_phys), intent(inout)  | 
          snowrat,  | 
         
        
           | 
           | 
          real (kind_phys), intent(inout)  | 
          grauprat,  | 
         
        
           | 
           | 
          real (kind_phys), intent(inout)  | 
          icerat,  | 
         
        
           | 
           | 
          real (kind_phys), intent(inout)  | 
          curat,  | 
         
        
           | 
           | 
          real (kind_phys), intent(in)  | 
          PATM,  | 
         
        
           | 
           | 
          real (kind_phys), intent(in)  | 
          TABS,  | 
         
        
           | 
           | 
          real (kind_phys), intent(in)  | 
          QVATM,  | 
         
        
           | 
           | 
          real (kind_phys), intent(in)  | 
          QCATM,  | 
         
        
           | 
           | 
          real (kind_phys), intent(in)  | 
          rho,  | 
         
        
           | 
           | 
          real (kind_phys), intent(in)  | 
          GLW,  | 
         
        
           | 
           | 
          real (kind_phys), intent(in)  | 
          GSWdn,  | 
         
        
           | 
           | 
          real (kind_phys), intent(in)  | 
          GSW,  | 
         
        
           | 
           | 
          real (kind_phys), intent(inout)  | 
          EMISS,  | 
         
        
           | 
           | 
          real (kind_phys), intent(inout)  | 
          EMISBCK,  | 
         
        
           | 
           | 
          real (kind_phys), intent(in)  | 
          msnf,  | 
         
        
           | 
           | 
          real (kind_phys), intent(in)  | 
          facsnf,  | 
         
        
           | 
           | 
          real (kind_phys), intent(in)  | 
          QKMS,  | 
         
        
           | 
           | 
          real (kind_phys), intent(in)  | 
          TKMS,  | 
         
        
           | 
           | 
          real (kind_phys), intent(in)  | 
          PC,  | 
         
        
           | 
           | 
          real (kind_phys), intent(inout)  | 
          MAVAIL,  | 
         
        
           | 
           | 
          real (kind_phys), intent(inout)  | 
          CST,  | 
         
        
           | 
           | 
          real (kind_phys), intent(in)  | 
          VEGFRA,  | 
         
        
           | 
           | 
          real (kind_phys), intent(inout)  | 
          ALB,  | 
         
        
           | 
           | 
          real (kind_phys), intent(inout)  | 
          ZNT,  | 
         
        
           | 
           | 
          real (kind_phys), intent(inout)  | 
          ALB_SNOW,  | 
         
        
           | 
           | 
          real (kind_phys), intent(in)  | 
          ALB_SNOW_FREE,  | 
         
        
           | 
           | 
          real (kind_phys), intent(in)  | 
          lai,  | 
         
        
           | 
           | 
          real (kind_phys), intent(in)  | 
          hgt,  | 
         
        
           | 
           | 
          real (kind_phys), intent(in)  | 
          stdev,  | 
         
        
           | 
           | 
          logical, intent(in)  | 
          MYJ,  | 
         
        
           | 
           | 
          real (kind_phys), intent(in)  | 
          SEAICE,  | 
         
        
           | 
           | 
          integer, intent(in)  | 
          ISICE,  | 
         
        
           | 
           | 
          real (kind_phys)  | 
          QWRTZ,  | 
         
        
           | 
           | 
          real (kind_phys)  | 
          rhocs,  | 
         
        
           | 
           | 
          real (kind_phys)  | 
          dqm,  | 
         
        
           | 
           | 
          real (kind_phys)  | 
          qmin,  | 
         
        
           | 
           | 
          real (kind_phys)  | 
          ref,  | 
         
        
           | 
           | 
          real (kind_phys)  | 
          wilt,  | 
         
        
           | 
           | 
          real (kind_phys)  | 
          psis,  | 
         
        
           | 
           | 
          real (kind_phys)  | 
          bclh,  | 
         
        
           | 
           | 
          real (kind_phys)  | 
          ksat,  | 
         
        
           | 
           | 
          real (kind_phys)  | 
          sat,  | 
         
        
           | 
           | 
          real (kind_phys), intent(in)  | 
          cn,  | 
         
        
           | 
           | 
          real (kind_phys), dimension(1:nzs), intent(in)  | 
          zsmain,  | 
         
        
           | 
           | 
          real (kind_phys), dimension(1:nzs), intent(in)  | 
          zshalf,  | 
         
        
           | 
           | 
          real (kind_phys), dimension(1:nddzs), intent(in)  | 
          DTDZS,  | 
         
        
           | 
           | 
          real (kind_phys), dimension(1:nzs), intent(in)  | 
          DTDZS2,  | 
         
        
           | 
           | 
          real (kind_phys), dimension(1:5001), intent(in)  | 
          tbq,  | 
         
        
           | 
           | 
          real (kind_phys), intent(in)  | 
          cp,  | 
         
        
           | 
           | 
          real (kind_phys), intent(in)  | 
          rovcp,  | 
         
        
           | 
           | 
          real (kind_phys), intent(in)  | 
          g0,  | 
         
        
           | 
           | 
          real (kind_phys), intent(in)  | 
          lv,  | 
         
        
           | 
           | 
          real (kind_phys), intent(in)  | 
          stbolt,  | 
         
        
           | 
           | 
          real (kind_phys), intent(in)  | 
          cw,  | 
         
        
           | 
           | 
          real (kind_phys), intent(in)  | 
          c1sn,  | 
         
        
           | 
           | 
          real (kind_phys), intent(in)  | 
          c2sn,  | 
         
        
           | 
           | 
          real (kind_phys), intent(in)  | 
          KQWRTZ,  | 
         
        
           | 
           | 
          real (kind_phys), intent(in)  | 
          KICE,  | 
         
        
           | 
           | 
          real (kind_phys), intent(in)  | 
          KWT,  | 
         
        
           | 
           | 
          real (kind_phys), intent(inout)  | 
          snweprint,  | 
         
        
           | 
           | 
          real (kind_phys), intent(inout)  | 
          snheiprint,  | 
         
        
           | 
           | 
          real (kind_phys), intent(inout)  | 
          rsm,  | 
         
        
           | 
           | 
          real (kind_phys), dimension( 1:nzs ), intent(inout)  | 
          soilm1d,  | 
         
        
           | 
           | 
          real (kind_phys), dimension( 1:nzs ), intent(inout)  | 
          ts1d,  | 
         
        
           | 
           | 
          real (kind_phys), dimension( 1:nzs ), intent(inout)  | 
          smfrkeep,  | 
         
        
           | 
           | 
          real (kind_phys), dimension( 1:nzs ), intent(inout)  | 
          keepfr,  | 
         
        
           | 
           | 
          real (kind_phys), intent(inout)  | 
          soilt,  | 
         
        
           | 
           | 
          real (kind_phys), intent(inout)  | 
          soilt1,  | 
         
        
           | 
           | 
          real (kind_phys), intent(inout)  | 
          tsnav,  | 
         
        
           | 
           | 
          real (kind_phys), intent(inout)  | 
          dew,  | 
         
        
           | 
           | 
          real (kind_phys), intent(inout)  | 
          qvg,  | 
         
        
           | 
           | 
          real (kind_phys), intent(inout)  | 
          qsg,  | 
         
        
           | 
           | 
          real (kind_phys), intent(inout)  | 
          qcg,  | 
         
        
           | 
           | 
          real (kind_phys), intent(inout)  | 
          SMELT,  | 
         
        
           | 
           | 
          real (kind_phys), intent(inout)  | 
          SNOH,  | 
         
        
           | 
           | 
          real (kind_phys), intent(inout)  | 
          SNFLX,  | 
         
        
           | 
           | 
          real (kind_phys), intent(inout)  | 
          SNOM,  | 
         
        
           | 
           | 
          real (kind_phys), intent(inout)  | 
          SNOWFALLAC,  | 
         
        
           | 
           | 
          real (kind_phys), intent(inout)  | 
          ACSNOW,  | 
         
        
           | 
           | 
          real (kind_phys), intent(inout)  | 
          edir1,  | 
         
        
           | 
           | 
          real (kind_phys), intent(inout)  | 
          ec1,  | 
         
        
           | 
           | 
          real (kind_phys), intent(inout)  | 
          ett1,  | 
         
        
           | 
           | 
          real (kind_phys), intent(inout)  | 
          eeta,  | 
         
        
           | 
           | 
          real (kind_phys), intent(inout)  | 
          qfx,  | 
         
        
           | 
           | 
          real (kind_phys), intent(inout)  | 
          hfx,  | 
         
        
           | 
           | 
          real (kind_phys), intent(inout)  | 
          s,  | 
         
        
           | 
           | 
          real (kind_phys), intent(inout)  | 
          sublim,  | 
         
        
           | 
           | 
          real (kind_phys), intent(inout)  | 
          evapl,  | 
         
        
           | 
           | 
          real (kind_phys), intent(inout)  | 
          prcpl,  | 
         
        
           | 
           | 
          real (kind_phys), intent(inout)  | 
          fltot,  | 
         
        
           | 
           | 
          real (kind_phys), intent(inout)  | 
          runoff1,  | 
         
        
           | 
           | 
          real (kind_phys), intent(inout)  | 
          runoff2,  | 
         
        
           | 
           | 
          real (kind_phys), dimension(1:nzs), intent(inout)  | 
          soilice,  | 
         
        
           | 
           | 
          real (kind_phys), dimension(1:nzs), intent(inout)  | 
          soiliqw,  | 
         
        
           | 
           | 
          real (kind_phys), intent(inout)  | 
          infiltr,  | 
         
        
           | 
           | 
          real (kind_phys), intent(inout)  | 
          smf  | 
         
        
           | 
          ) | 
           |  | 
         
       
   | 
  
private   |