Changeset 1816 for palm/trunk/SOURCE/spectrum.f90
- Timestamp:
- Apr 6, 2016 2:11:06 PM (8 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/SOURCE/spectrum.f90
r1815 r1816 19 19 ! Current revisions: 20 20 ! ----------------- 21 ! bugfix: preprocessor directives included for the non-parallel case21 ! 22 22 ! 23 23 ! Former revisions: 24 24 ! ----------------- 25 25 ! $Id$ 26 ! 27 ! 1815 2016-04-06 13:49:59Z raasch 28 ! bugfix: preprocessor directives included for the non-parallel case 26 29 ! 27 30 ! 1808 2016-04-05 19:44:00Z raasch … … 398 401 USE kinds 399 402 400 #if defi end( __parallel )403 #if defined( __parallel ) 401 404 #if defined( __mpifh ) 402 405 INCLUDE "mpif.h"
Note: See TracChangeset
for help on using the changeset viewer.