Ignore:
Timestamp:
May 24, 2018 10:39:29 AM (3 years ago)
Author:
gronemeier
Message:

renamed input dimension "depth" to "zsoil"

File:
1 edited

Legend:

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

    r3036 r3037  
    2525! -----------------
    2626! $Id$
     27! renamed 'depth' to 'zsoil'
     28!
     29! 3036 2018-05-24 10:18:26Z gronemeier
    2730! Revision of input vars according to UC2 data standard
    2831!  - renamed 'orography_2D' to 'zt'
     
    20692072             CALL get_dimension_length( id_dynamic, init_3d%nzu, 'z'     )
    20702073             CALL get_dimension_length( id_dynamic, init_3d%nzw, 'zw'    )
    2071              CALL get_dimension_length( id_dynamic, init_3d%nzs, 'depth' )
     2074             CALL get_dimension_length( id_dynamic, init_3d%nzs, 'zsoil' )
    20722075!
    20732076!--          Read also the horizontal dimensions. These are used just used fo
     
    21092112                CALL get_variable( id_dynamic, 'zw', init_3d%zw_atmos )
    21102113             ENDIF
    2111              IF ( check_existence( var_names, 'depth' ) )  THEN
     2114             IF ( check_existence( var_names, 'zsoil' ) )  THEN
    21122115                ALLOCATE( init_3d%z_soil(1:init_3d%nzs) )
    2113                 CALL get_variable( id_dynamic, 'depth', init_3d%z_soil )
     2116                CALL get_variable( id_dynamic, 'zsoil', init_3d%z_soil )
    21142117             ENDIF
    21152118!
     
    35463549       INTEGER(iwp) ::  nzt_file !< upper bound of file array
    35473550
    3548 !        LOGICAL, OPTIONAL ::  depth !< flag indicating reverse z-axis, i.e. depth instead of height, e.g. in case of ocean or soil
     3551!        LOGICAL, OPTIONAL ::  zsoil !< flag indicating reverse z-axis, i.e. zsoil instead of height, e.g. in case of ocean or soil
    35493552
    35503553       REAL(wp), DIMENSION(nzb_var:nzt_var)   ::  z_grid   !< grid levels on numeric grid
Note: See TracChangeset for help on using the changeset viewer.