Ignore:
Timestamp:
Oct 24, 2018 6:39:32 PM (3 years ago)
Author:
gronemeier
Message:

new surface-data output; renamed output variables (pt to theta, rho_air to rho, rho_ocean to rho_sea_water)

File:
1 edited

Legend:

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

    r3298 r3421  
    2525! -----------------
    2626! $Id$
     27! Renamed output variables
     28!
     29! 3419 2018-10-24 17:27:31Z gronemeier
    2730! minor formatting (kanani)
    2831! chem_data_output_2d subroutine added (basit)
     
    562565                IF ( mode == 'xy' )  level_z = zu
    563566
    564              CASE ( 'lpt_xy', 'lpt_xz', 'lpt_yz' )
     567             CASE ( 'thetal_xy', 'thetal_xz', 'thetal_yz' )
    565568                IF ( av == 0 )  THEN
    566569                   to_be_resorted => pt
     
    750753                ENDIF
    751754
    752              CASE ( 'pt_xy', 'pt_xz', 'pt_yz' )
     755             CASE ( 'theta_xy', 'theta_xz', 'theta_yz' )
    753756                IF ( av == 0 )  THEN
    754757                   IF ( .NOT. bulk_cloud_model ) THEN
     
    11211124                ENDIF
    11221125
    1123              CASE ( 'u*_xy' )        ! 2d-array
     1126             CASE ( 'us*_xy' )        ! 2d-array
    11241127                IF ( av == 0 )  THEN
    11251128                   DO  m = 1, surf_def_h(0)%ns
     
    11721175                ENDIF
    11731176
    1174              CASE ( 'vpt_xy', 'vpt_xz', 'vpt_yz' )
     1177             CASE ( 'thetav_xy', 'thetav_xz', 'thetav_yz' )
    11751178                IF ( av == 0 )  THEN
    11761179                   to_be_resorted => vpt
Note: See TracChangeset for help on using the changeset viewer.