Ignore:
Timestamp:
Mar 5, 2020 3:59:50 PM (4 years ago)
Author:
raasch
Message:

bugfix: cpp-directives for serial mode added

File:
1 edited

Legend:

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

    r4360 r4444  
    2525! -----------------
    2626! $Id$
     27! bugfix: cpp-directives for serial mode added
     28!
     29! 4360 2020-01-07 11:25:50Z suehring
    2730! Fix wrongly declared nc_stat variable in surface_data_output_mod
    2831!
     
    14101413          ONLY:  io_blocks, io_group, time_since_reference_point
    14111414
     1415#if defined( __parallel )
    14121416      USE pegrid,                                                              &
    14131417          ONLY:  comm2d, ierr
     1418#endif
    14141419
    14151420
     
    44694474          ONLY:  io_blocks, io_group
    44704475
     4476#if defined( __parallel )
    44714477      USE pegrid,                                                              &
    44724478          ONLY:  comm2d, ierr
     4479#endif
    44734480
    44744481      IMPLICIT NONE
Note: See TracChangeset for help on using the changeset viewer.