| subroutine, private noahmp_glacier_routines::snowwater_glacier  | 
          ( | 
          integer, intent(in) |           nsnow,  | 
         
        
           | 
           | 
          integer, intent(in) |           nsoil,  | 
         
        
           | 
           | 
          integer, dimension(-nsnow+1:0), intent(in) |           imelt,  | 
         
        
           | 
           | 
          real (kind=kind_phys), intent(in) |           dt,  | 
         
        
           | 
           | 
          real (kind=kind_phys), intent(in) |           sfctmp,  | 
         
        
           | 
           | 
          real (kind=kind_phys), intent(in) |           snowhin,  | 
         
        
           | 
           | 
          real (kind=kind_phys), intent(in) |           qsnow,  | 
         
        
           | 
           | 
          real (kind=kind_phys), intent(inout) |           qsnfro,  | 
         
        
           | 
           | 
          real (kind=kind_phys), intent(inout) |           qsnsub,  | 
         
        
           | 
           | 
          real (kind=kind_phys), intent(in) |           qrain,  | 
         
        
           | 
           | 
          real (kind=kind_phys), dimension(-nsnow+1:0), intent(in) |           ficeold,  | 
         
        
           | 
           | 
          real (kind=kind_phys), dimension(       1:nsoil), intent(in) |           zsoil,  | 
         
        
           | 
           | 
          integer, intent(inout) |           isnow,  | 
         
        
           | 
           | 
          real (kind=kind_phys), intent(inout) |           snowh,  | 
         
        
           | 
           | 
          real (kind=kind_phys), intent(inout) |           sneqv,  | 
         
        
           | 
           | 
          real (kind=kind_phys), dimension(-nsnow+1:    0), intent(inout) |           snice,  | 
         
        
           | 
           | 
          real (kind=kind_phys), dimension(-nsnow+1:    0), intent(inout) |           snliq,  | 
         
        
           | 
           | 
          real (kind=kind_phys), dimension(       1:nsoil), intent(inout) |           sh2o,  | 
         
        
           | 
           | 
          real (kind=kind_phys), dimension(       1:nsoil), intent(inout) |           sice,  | 
         
        
           | 
           | 
          real (kind=kind_phys), dimension(-nsnow+1:nsoil), intent(inout) |           stc,  | 
         
        
           | 
           | 
          real (kind=kind_phys), dimension(-nsnow+1:nsoil), intent(inout) |           dzsnso,  | 
         
        
           | 
           | 
          real (kind=kind_phys), dimension(-nsnow+1:nsoil), intent(inout) |           zsnso,  | 
         
        
           | 
           | 
          real (kind=kind_phys), intent(inout) |           fsh,  | 
         
        
           | 
           | 
          real (kind=kind_phys), intent(out) |           qsnbot,  | 
         
        
           | 
           | 
          real (kind=kind_phys), intent(out) |           snoflow,  | 
         
        
           | 
           | 
          real (kind=kind_phys), intent(out) |           ponding1,  | 
         
        
           | 
           | 
          real (kind=kind_phys), intent(out) |           ponding2 ) | 
         
       
   | 
  
private   |