| subroutine __module_sf_noahmplsm_f90__::sfcdif1  | 
          ( | 
          type (noahmp_parameters), intent(in) |           parameters,  | 
         
        
           | 
           | 
          integer, intent(in) |           iter,  | 
         
        
           | 
           | 
          real (kind=kind_phys), intent(in) |           sfctmp,  | 
         
        
           | 
           | 
          real (kind=kind_phys), intent(in) |           rhoair,  | 
         
        
           | 
           | 
          real (kind=kind_phys), intent(in) |           h,  | 
         
        
           | 
           | 
          real (kind=kind_phys), intent(in) |           qair,  | 
         
        
           | 
           | 
          real (kind=kind_phys), intent(in) |           zlvl,  | 
         
        
           | 
           | 
          real (kind=kind_phys), intent(in) |           zpd,  | 
         
        
           | 
           | 
          real (kind=kind_phys), intent(in) |           z0m,  | 
         
        
           | 
           | 
          real (kind=kind_phys), intent(in) |           z0h,  | 
         
        
           | 
           | 
          real (kind=kind_phys), intent(in) |           ur,  | 
         
        
           | 
           | 
          real (kind=kind_phys), intent(in) |           mpe,  | 
         
        
           | 
           | 
          integer, intent(in) |           iloc,  | 
         
        
           | 
           | 
          integer, intent(in) |           jloc,  | 
         
        
           | 
           | 
           |           ifdef,  | 
         
        
           | 
           | 
           |           ccpp ) | 
         
       
   | 
  
private   |