- Timestamp:
- Aug 9, 2017 11:00:34 AM (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/SOURCE/init_masks.f90
r2301 r2344 25 25 ! ----------------- 26 26 ! $Id$ 27 ! explicit setting of initial values for array domask required due to a bug 28 ! in the Cray compiler (appears only if option -eD is used) 29 ! 30 ! 2301 2017-06-29 16:41:21Z gronemeier 27 31 ! Bugfix: set variable name length to global value 28 32 ! … … 162 166 163 167 LOGICAL :: found !< 168 169 ! 170 !-- Initial values are explicitly set here due to a bug in the Cray compiler 171 !-- in case of assignments of initial values in declaration statements for 172 !-- arrays with more than 9999 elements (appears with -eD only) 173 domask = ' ' 174 164 175 ! 165 176 !-- Allocation and initialization
Note: See TracChangeset
for help on using the changeset viewer.