/[lmdze]/trunk/Sources/phylmd/phytrac.f
ViewVC logotype

Diff of /trunk/Sources/phylmd/phytrac.f

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 178 by guez, Fri Mar 11 18:47:26 2016 UTC revision 181 by guez, Tue Mar 15 17:51:30 2016 UTC
# Line 234  contains Line 234  contains
234               ! Tiedke               ! Tiedke
235               CALL nflxtr(pdtphys, pmfu, pmfd, pde_u, pen_d, paprs, &               CALL nflxtr(pdtphys, pmfu, pmfd, pde_u, pen_d, paprs, &
236                    tr_seri(:, :, it), d_tr_cv(:, :, it))                    tr_seri(:, :, it), d_tr_cv(:, :, it))
237            else if (iflag_con == 3) then            else
238                 ! iflag_con >= 3
239               ! Emanuel               ! Emanuel
240               call cvltr(pdtphys, da, phi, mp, paprs, tr_seri(:, :, it), upwd, &               call cvltr(pdtphys, da, phi, mp, paprs, tr_seri(:, :, it), upwd, &
241                    dnwd, d_tr_cv(:, :, it))                    dnwd, d_tr_cv(:, :, it))
Legend:
Removed from v.178  
changed lines
  Added in v.181
  ViewVC Help
Powered by ViewVC 1.1.21