| subroutine cu_gf_deep::cup_env_clev  | 
          ( | 
          real(kind=kind_phys), dimension (its:ite,kts:kte), intent(in)  | 
          t,  | 
        
        
           | 
           | 
          real(kind=kind_phys), dimension (its:ite,kts:kte), intent(in)  | 
          qes,  | 
        
        
           | 
           | 
          real(kind=kind_phys), dimension (its:ite,kts:kte), intent(in)  | 
          q,  | 
        
        
           | 
           | 
          real(kind=kind_phys), dimension (its:ite,kts:kte), intent(in)  | 
          he,  | 
        
        
           | 
           | 
          real(kind=kind_phys), dimension (its:ite,kts:kte), intent(in)  | 
          hes,  | 
        
        
           | 
           | 
          real(kind=kind_phys), dimension (its:ite,kts:kte), intent(in)  | 
          z,  | 
        
        
           | 
           | 
          real(kind=kind_phys), dimension (its:ite,kts:kte), intent(in)  | 
          p,  | 
        
        
           | 
           | 
          real(kind=kind_phys), dimension (its:ite,kts:kte), intent(out)  | 
          qes_cup,  | 
        
        
           | 
           | 
          real(kind=kind_phys), dimension (its:ite,kts:kte), intent(out)  | 
          q_cup,  | 
        
        
           | 
           | 
          real(kind=kind_phys), dimension (its:ite,kts:kte), intent(out)  | 
          he_cup,  | 
        
        
           | 
           | 
          real(kind=kind_phys), dimension (its:ite,kts:kte), intent(out)  | 
          hes_cup,  | 
        
        
           | 
           | 
          real(kind=kind_phys), dimension (its:ite,kts:kte), intent(out)  | 
          z_cup,  | 
        
        
           | 
           | 
          real(kind=kind_phys), dimension (its:ite,kts:kte), intent(out)  | 
          p_cup,  | 
        
        
           | 
           | 
          real(kind=kind_phys), dimension (its:ite,kts:kte), intent(out)  | 
          gamma_cup,  | 
        
        
           | 
           | 
          real(kind=kind_phys), dimension (its:ite,kts:kte), intent(out)  | 
          t_cup,  | 
        
        
           | 
           | 
          real(kind=kind_phys), dimension (its:ite), intent(in)  | 
          psur,  | 
        
        
           | 
           | 
          integer, dimension (its:ite), intent(inout)  | 
          ierr,  | 
        
        
           | 
           | 
          real(kind=kind_phys), dimension (its:ite), intent(in)  | 
          z1,  | 
        
        
           | 
           | 
          integer, intent(in)  | 
          itf,  | 
        
        
           | 
           | 
          integer, intent(in)  | 
          ktf,  | 
        
        
           | 
           | 
          integer, intent(in)  | 
          its,  | 
        
        
           | 
           | 
          integer, intent(in)  | 
          ite,  | 
        
        
           | 
           | 
          integer, intent(in)  | 
          kts,  | 
        
        
           | 
           | 
          integer, intent(in)  | 
          kte  | 
        
        
           | 
          ) | 
           |  |