| subroutine lsm_ruc::rucinit  | 
          ( | 
          logical, intent(in)  | 
          lsm_cold_start,  | 
         
        
           | 
           | 
          integer, intent(in)  | 
          im,  | 
         
        
           | 
           | 
          integer, intent(in)  | 
          lsoil_ruc,  | 
         
        
           | 
           | 
          integer, intent(in)  | 
          lsoil,  | 
         
        
           | 
           | 
          integer, intent(in)  | 
          nlev,  | 
         
        
           | 
           | 
          integer, intent(in)  | 
          me,  | 
         
        
           | 
           | 
          integer, intent(in)  | 
          master,  | 
         
        
           | 
           | 
          integer, intent(in)  | 
          lsm_ruc,  | 
         
        
           | 
           | 
          integer, intent(in)  | 
          lsm,  | 
         
        
           | 
           | 
          real (kind_phys), dimension(im), intent(in)  | 
          slmsk,  | 
         
        
           | 
           | 
          integer, dimension(im), intent(in)  | 
          stype,  | 
         
        
           | 
           | 
          integer, dimension(im), intent(in)  | 
          vtype,  | 
         
        
           | 
           | 
          real (kind_phys), dimension(im), intent(in)  | 
          landfrac,  | 
         
        
           | 
           | 
          real (kind_phys), dimension(im), intent(in)  | 
          fice,  | 
         
        
           | 
           | 
          real (kind_phys), intent(in)  | 
          min_seaice,  | 
         
        
           | 
           | 
          real (kind_phys), dimension(im), intent(in)  | 
          tskin_lnd,  | 
         
        
           | 
           | 
          real (kind_phys), dimension(im), intent(in)  | 
          tskin_wat,  | 
         
        
           | 
           | 
          real (kind_phys), dimension(im), intent(in)  | 
          tg3,  | 
         
        
           | 
           | 
          real (kind_phys), dimension(1:lsoil_ruc), intent(in)  | 
          zs,  | 
         
        
           | 
           | 
          real (kind_phys), dimension(1:lsoil_ruc), intent(in)  | 
          dzs,  | 
         
        
           | 
           | 
          real (kind_phys), dimension(im,lsoil), intent(in)  | 
          smc,  | 
         
        
           | 
           | 
          real (kind_phys), dimension(im,lsoil), intent(in)  | 
          slc,  | 
         
        
           | 
           | 
          real (kind_phys), dimension(im,lsoil), intent(in)  | 
          stc,  | 
         
        
           | 
           | 
          real (kind_phys), dimension(im,lsoil_ruc), intent(inout)  | 
          sh2o,  | 
         
        
           | 
           | 
          real (kind_phys), dimension(im,lsoil_ruc), intent(inout)  | 
          smfrkeep,  | 
         
        
           | 
           | 
          real (kind_phys), dimension(im,lsoil_ruc), intent(inout)  | 
          tslb,  | 
         
        
           | 
           | 
          real (kind_phys), dimension(im,lsoil_ruc), intent(inout)  | 
          smois,  | 
         
        
           | 
           | 
          real (kind_phys), dimension(im), intent(inout)  | 
          wetness,  | 
         
        
           | 
           | 
          character(len=*), intent(out)  | 
          errmsg,  | 
         
        
           | 
           | 
          integer, intent(out)  | 
          errflg  | 
         
        
           | 
          ) | 
           |  | 
         
       
   | 
  
private   |