| subroutine wake  | 
          ( | 
          real, dimension (klon, klev), intent(in)  | 
          p,  | 
        
        
           | 
           | 
          real, dimension (klon, klev+1), intent(in)  | 
          ph,  | 
        
        
           | 
           | 
          real, dimension (klon, klev), intent(in)  | 
          pi,  | 
        
        
           | 
           | 
          real, intent(in)  | 
          dtime,  | 
        
        
           | 
           | 
          real, dimension (klon), intent(in)  | 
          sigd_con,  | 
        
        
           | 
           | 
          real, dimension (klon, klev), intent(in)  | 
          te0,  | 
        
        
           | 
           | 
          real, dimension (klon, klev), intent(in)  | 
          qe0,  | 
        
        
           | 
           | 
          real, dimension (klon, klev+1), intent(in)  | 
          omgb,  | 
        
        
           | 
           | 
          real, dimension (klon, klev), intent(in)  | 
          dtdwn,  | 
        
        
           | 
           | 
          real, dimension (klon, klev), intent(in)  | 
          dqdwn,  | 
        
        
           | 
           | 
          real, dimension (klon, klev), intent(in)  | 
          amdwn,  | 
        
        
           | 
           | 
          real, dimension (klon, klev), intent(in)  | 
          amup,  | 
        
        
           | 
           | 
          real, dimension (klon, klev), intent(in)  | 
          dta,  | 
        
        
           | 
           | 
          real, dimension (klon, klev), intent(in)  | 
          dqa,  | 
        
        
           | 
           | 
          real, dimension (klon, klev), intent(in)  | 
          wdtpbl,  | 
        
        
           | 
           | 
          real, dimension (klon, klev), intent(in)  | 
          wdqpbl,  | 
        
        
           | 
           | 
          real, dimension (klon, klev), intent(in)  | 
          udtpbl,  | 
        
        
           | 
           | 
          real, dimension (klon, klev), intent(in)  | 
          udqpbl,  | 
        
        
           | 
           | 
          real, dimension (klon, klev), intent(inout)  | 
          deltatw,  | 
        
        
           | 
           | 
          real, dimension (klon, klev), intent(inout)  | 
          deltaqw,  | 
        
        
           | 
           | 
          real, dimension (klon, klev), intent(out)  | 
          dth,  | 
        
        
           | 
           | 
          real, dimension (klon), intent(out)  | 
          hw,  | 
        
        
           | 
           | 
          real, dimension (klon), intent(inout)  | 
          sigmaw,  | 
        
        
           | 
           | 
          real, dimension (klon), intent(out)  | 
          wape,  | 
        
        
           | 
           | 
          real, dimension (klon), intent(out)  | 
          fip,  | 
        
        
           | 
           | 
          real, dimension (klon), intent(out)  | 
          gfl,  | 
        
        
           | 
           | 
          real, dimension (klon, klev), intent(out)  | 
          dtls,  | 
        
        
           | 
           | 
          real, dimension (klon, klev), intent(out)  | 
          dqls,  | 
        
        
           | 
           | 
          integer, dimension (klon), intent(out)  | 
          ktopw,  | 
        
        
           | 
           | 
          real, dimension (klon, klev+1), intent(out)  | 
          omgbdth,  | 
        
        
           | 
           | 
          real, dimension (klon, klev), intent(out)  | 
          dp_omgb,  | 
        
        
           | 
           | 
          real, dimension (klon), intent(out)  | 
          wdens,  | 
        
        
           | 
           | 
          real, dimension (klon, klev), intent(out)  | 
          tu,  | 
        
        
           | 
           | 
          real, dimension (klon, klev), intent(out)  | 
          qu,  | 
        
        
           | 
           | 
          real, dimension (klon, klev), intent(out)  | 
          dtke,  | 
        
        
           | 
           | 
          real, dimension (klon, klev), intent(out)  | 
          dqke,  | 
        
        
           | 
           | 
          real, dimension (klon, klev), intent(out)  | 
          dtpbl,  | 
        
        
           | 
           | 
          real, dimension (klon, klev), intent(out)  | 
          dqpbl,  | 
        
        
           | 
           | 
          real, dimension (klon, klev+1), intent(out)  | 
          omg,  | 
        
        
           | 
           | 
          real, dimension (klon, klev), intent(out)  | 
          dp_deltomg,  | 
        
        
           | 
           | 
          real, dimension (klon, klev), intent(out)  | 
          spread,  | 
        
        
           | 
           | 
          real, dimension (klon), intent(out)  | 
          cstar,  | 
        
        
           | 
           | 
          real, dimension (klon, klev), intent(out)  | 
          d_deltat_gw,  | 
        
        
           | 
           | 
          real, dimension (klon, klev), intent(out)  | 
          d_deltatw2,  | 
        
        
           | 
           | 
          real, dimension (klon, klev), intent(out)  | 
          d_deltaqw2  | 
        
        
           | 
          ) | 
           |  |