| subroutine surf_landice_mod::surf_landice  | 
          ( | 
          integer, intent(in)  | 
          itime,  | 
        
        
           | 
           | 
          real, intent(in)  | 
          dtime,  | 
        
        
           | 
           | 
          integer, intent(in)  | 
          knon,  | 
        
        
           | 
           | 
          integer, dimension(klon), intent(in)  | 
          knindex,  | 
        
        
           | 
           | 
          real, dimension(klon), intent(in)  | 
          rlon,  | 
        
        
           | 
           | 
          real, dimension(klon), intent(in)  | 
          rlat,  | 
        
        
           | 
           | 
          logical, intent(in)  | 
          debut,  | 
        
        
           | 
           | 
          logical, intent(in)  | 
          lafin,  | 
        
        
           | 
           | 
          real, dimension(klon), intent(in)  | 
          rmu0,  | 
        
        
           | 
           | 
          real, dimension(klon), intent(in)  | 
          lwdownm,  | 
        
        
           | 
           | 
          real, dimension(klon), intent(in)  | 
          albedo,  | 
        
        
           | 
           | 
          real, dimension(klon), intent(in)  | 
          pphi1,  | 
        
        
           | 
           | 
          real, dimension(klon), intent(in)  | 
          swnet,  | 
        
        
           | 
           | 
          real, dimension(klon), intent(in)  | 
          lwnet,  | 
        
        
           | 
           | 
          real, dimension(klon), intent(in)  | 
          tsurf,  | 
        
        
           | 
           | 
          real, dimension(klon), intent(in)  | 
          p1lay,  | 
        
        
           | 
           | 
          real, dimension(klon), intent(in)  | 
          cdragh,  | 
        
        
           | 
           | 
          real, dimension(klon), intent(in)  | 
          cdragm,  | 
        
        
           | 
           | 
          real, dimension(klon), intent(in)  | 
          precip_rain,  | 
        
        
           | 
           | 
          real, dimension(klon), intent(in)  | 
          precip_snow,  | 
        
        
           | 
           | 
          real, dimension(klon), intent(in)  | 
          temp_air,  | 
        
        
           | 
           | 
          real, dimension(klon), intent(in)  | 
          spechum,  | 
        
        
           | 
           | 
          real, dimension(klon), intent(in)  | 
          AcoefH,  | 
        
        
           | 
           | 
          real, dimension(klon), intent(in)  | 
          AcoefQ,  | 
        
        
           | 
           | 
          real, dimension(klon), intent(in)  | 
          BcoefH,  | 
        
        
           | 
           | 
          real, dimension(klon), intent(in)  | 
          BcoefQ,  | 
        
        
           | 
           | 
          real, dimension(klon), intent(in)  | 
          AcoefU,  | 
        
        
           | 
           | 
          real, dimension(klon), intent(in)  | 
          AcoefV,  | 
        
        
           | 
           | 
          real, dimension(klon), intent(in)  | 
          BcoefU,  | 
        
        
           | 
           | 
          real, dimension(klon), intent(in)  | 
          BcoefV,  | 
        
        
           | 
           | 
          real, dimension(klon), intent(in)  | 
          ps,  | 
        
        
           | 
           | 
          real, dimension(klon), intent(in)  | 
          u1,  | 
        
        
           | 
           | 
          real, dimension(klon), intent(in)  | 
          v1,  | 
        
        
           | 
           | 
          real, dimension(klon), intent(in)  | 
          gustiness,  | 
        
        
           | 
           | 
          real, dimension(klon), intent(in)  | 
          rugoro,  | 
        
        
           | 
           | 
          real, dimension(klon,nbsrf), intent(in)  | 
          pctsrf,  | 
        
        
           | 
           | 
          real, dimension(klon), intent(inout)  | 
          snow,  | 
        
        
           | 
           | 
          real, dimension(klon), intent(out)  | 
          qsurf,  | 
        
        
           | 
           | 
          real, dimension(klon), intent(inout)  | 
          qsol,  | 
        
        
           | 
           | 
          real, dimension(klon), intent(inout)  | 
          agesno,  | 
        
        
           | 
           | 
          real, dimension(klon, nsoilmx), intent(inout)  | 
          tsoil,  | 
        
        
           | 
           | 
          real, dimension(klon), intent(out)  | 
          z0m,  | 
        
        
           | 
           | 
          real, dimension(klon), intent(out)  | 
          z0h,  | 
        
        
           | 
           | 
          real, dimension(6), intent(in)  | 
          SFRWL,  | 
        
        
           | 
           | 
          real, dimension(klon,nsw), intent(out)  | 
          alb_dir,  | 
        
        
           | 
           | 
          real, dimension(klon,nsw), intent(out)  | 
          alb_dif,  | 
        
        
           | 
           | 
          real, dimension(klon), intent(out)  | 
          evap,  | 
        
        
           | 
           | 
          real, dimension(klon), intent(out)  | 
          fluxsens,  | 
        
        
           | 
           | 
          real, dimension(klon), intent(out)  | 
          fluxlat,  | 
        
        
           | 
           | 
          real, dimension(klon), intent(out)  | 
          tsurf_new,  | 
        
        
           | 
           | 
          real, dimension(klon), intent(out)  | 
          dflux_s,  | 
        
        
           | 
           | 
          real, dimension(klon), intent(out)  | 
          dflux_l,  | 
        
        
           | 
           | 
          real, dimension(klon), intent(in)  | 
          slope,  | 
        
        
           | 
           | 
          real, dimension(klon), intent(in)  | 
          cloudf,  | 
        
        
           | 
           | 
          real, dimension(klon), intent(out)  | 
          snowhgt,  | 
        
        
           | 
           | 
          real, dimension(klon), intent(out)  | 
          qsnow,  | 
        
        
           | 
           | 
          real, dimension(klon), intent(out)  | 
          to_ice,  | 
        
        
           | 
           | 
          real, dimension(klon), intent(out)  | 
          sissnow,  | 
        
        
           | 
           | 
          real, dimension(klon), intent(out)  | 
          alb3,  | 
        
        
           | 
           | 
          real, dimension(klon), intent(out)  | 
          runoff,  | 
        
        
           | 
           | 
          real, dimension(klon), intent(out)  | 
          flux_u1,  | 
        
        
           | 
           | 
          real, dimension(klon), intent(out)  | 
          flux_v1  | 
        
        
           | 
          ) | 
           |  |