| subroutine sat_vapor_pres_mod::compute_qs::compute_qs_3d  | 
          ( | 
          real, dimension(:,:,:), intent(in)  | 
          temp,  | 
         
        
           | 
           | 
          real, dimension(:,:,:), intent(in)  | 
          press,  | 
         
        
           | 
           | 
          real, dimension(:,:,:), intent(out)  | 
          qsat,  | 
         
        
           | 
           | 
          real, dimension(:,:,:), intent(in), optional  | 
          q,  | 
         
        
           | 
           | 
          real, intent(in), optional  | 
          hc,  | 
         
        
           | 
           | 
          real, dimension(:,:,:), intent(out), optional  | 
          dqsdT,  | 
         
        
           | 
           | 
          real, dimension(:,:,:), intent(out), optional  | 
          esat,  | 
         
        
           | 
           | 
          character(len=*), intent(out), optional  | 
          err_msg,  | 
         
        
           | 
           | 
          logical, intent(in), optional  | 
          es_over_liq,  | 
         
        
           | 
           | 
          logical, intent(in), optional  | 
          es_over_liq_and_ice  | 
         
        
           | 
          ) | 
           |  | 
         
       
   | 
  
private   |