Changeset 2031 for palm/trunk/SOURCE/data_output_2d.f90
- Timestamp:
- Oct 21, 2016 3:11:58 PM (8 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/SOURCE/data_output_2d.f90
r2001 r2031 20 20 ! Current revisions: 21 21 ! ----------------- 22 ! 22 ! renamed variable rho to rho_ocean and rho_av to rho_ocean_av 23 23 ! 24 24 ! Former revisions: … … 157 157 USE arrays_3d, & 158 158 ONLY: dzw, e, nr, ol, p, pt, precipitation_amount, precipitation_rate,& 159 prr,q, qc, ql, ql_c, ql_v, ql_vp, qr, qsws, rho , s, sa, shf, &159 prr,q, qc, ql, ql_c, ql_v, ql_vp, qr, qsws, rho_ocean, s, sa, shf, & 160 160 ssws, tend, ts, u, us, v, vpt, w, z0, z0h, z0q, zu, zw 161 161 … … 769 769 CASE ( 'rho_xy', 'rho_xz', 'rho_yz' ) 770 770 IF ( av == 0 ) THEN 771 to_be_resorted => rho 772 ELSE 773 to_be_resorted => rho_ av771 to_be_resorted => rho_ocean 772 ELSE 773 to_be_resorted => rho_ocean_av 774 774 ENDIF 775 775
Note: See TracChangeset
for help on using the changeset viewer.