Ignore:
Timestamp:
Jun 12, 2017 10:47:51 AM (4 years ago)
Author:
kanani
Message:

code documentation and cleanup

File:
1 edited

Legend:

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

    r2233 r2277  
    2525! -----------------
    2626! $Id$
     27! Removed unused variables do2d_xy_n, do2d_xz_n, do2d_yz_n
     28!
     29! 2233 2017-05-30 18:08:54Z suehring
    2730!
    2831! 2232 2017-05-30 17:47:52Z suehring
     
    178181        ONLY:  cloud_physics, data_output_2d_on_each_pe, data_output_xy,       &
    179182               data_output_xz, data_output_yz, do2d,                           &
    180                do2d_xy_last_time, do2d_xy_n, do2d_xy_time_count,               &
    181                do2d_xz_last_time, do2d_xz_n, do2d_xz_time_count,               &
    182                do2d_yz_last_time, do2d_yz_n, do2d_yz_time_count,               &
     183               do2d_xy_last_time, do2d_xy_time_count,                          &
     184               do2d_xz_last_time, do2d_xz_time_count,                          &
     185               do2d_yz_last_time, do2d_yz_time_count,                          &
    183186               ibc_uv_b, io_blocks, io_group, land_surface, message_string,    &
    184187               ntdim_2d_xy, ntdim_2d_xz, ntdim_2d_yz,                          &
     
    14021405#endif
    14031406#endif
    1404                    do2d_xy_n = do2d_xy_n + 1
     1407
    14051408!
    14061409!--                For 2D-arrays (e.g. u*) only one cross-section is available.
     
    16281631#endif
    16291632#endif
    1630                    do2d_xz_n = do2d_xz_n + 1
    16311633
    16321634                CASE ( 'yz' )
     
    18471849#endif
    18481850#endif
    1849                    do2d_yz_n = do2d_yz_n + 1
    18501851
    18511852             END SELECT
Note: See TracChangeset for help on using the changeset viewer.