| subroutine __module_sf_noahmplsm_f90__::groundalb  | 
          ( | 
          type (noahmp_parameters), intent(in) |           parameters,  | 
         
        
           | 
           | 
          integer, intent(in) |           nsoil,  | 
         
        
           | 
           | 
          integer, intent(in) |           nband,  | 
         
        
           | 
           | 
          integer, intent(in) |           ice,  | 
         
        
           | 
           | 
          integer, intent(in) |           ist,  | 
         
        
           | 
           | 
          real (kind=kind_phys), intent(in) |           fsno,  | 
         
        
           | 
           | 
          real (kind=kind_phys), dimension(1:nsoil), intent(in) |           smc,  | 
         
        
           | 
           | 
          real (kind=kind_phys), dimension(1:    2), intent(in) |           albsnd,  | 
         
        
           | 
           | 
          real (kind=kind_phys), dimension(1:    2), intent(in) |           albsni,  | 
         
        
           | 
           | 
          real (kind=kind_phys), intent(in) |           cosz,  | 
         
        
           | 
           | 
          real (kind=kind_phys), intent(in) |           tg,  | 
         
        
           | 
           | 
          integer, intent(in) |           iloc,  | 
         
        
           | 
           | 
          integer, intent(in) |           jloc,  | 
         
        
           | 
           | 
          real (kind=kind_phys), dimension(1:    2), intent(out) |           albgrd,  | 
         
        
           | 
           | 
          real (kind=kind_phys), dimension(1:    2), intent(out) |           albgri ) | 
         
       
   | 
  
private   |