Ignore:
Timestamp:
Oct 21, 2016 3:11:58 PM (5 years ago)
Author:
knoop
Message:

Renamed variable rho to rho_ocean, rho_init to rho_ocean_init and rho_av to rho_ocean_av

File:
1 edited

Legend:

Unmodified
Added
Removed
  • palm/trunk/SOURCE/data_output_2d.f90

    r2001 r2031  
    2020! Current revisions:
    2121! -----------------
    22 !
     22! renamed variable rho to rho_ocean and rho_av to rho_ocean_av
    2323!
    2424! Former revisions:
     
    157157    USE arrays_3d,                                                             &
    158158        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,    &
    160160               ssws, tend, ts, u, us, v, vpt, w, z0, z0h, z0q, zu, zw
    161161       
     
    769769             CASE ( 'rho_xy', 'rho_xz', 'rho_yz' )
    770770                IF ( av == 0 )  THEN
    771                    to_be_resorted => rho
    772                 ELSE
    773                    to_be_resorted => rho_av
     771                   to_be_resorted => rho_ocean
     772                ELSE
     773                   to_be_resorted => rho_ocean_av
    774774                ENDIF
    775775
Note: See TracChangeset for help on using the changeset viewer.