Skip to content
Snippets Groups Projects
Commit 0b1616e0 authored by Thomas Jahns's avatar Thomas Jahns :cartwheel: Committed by Sergey Kosukhin
Browse files

Fix conditionally used declaration.

parent 98ac10cf
No related branches found
No related tags found
2 merge requests!34Version 2.2.0,!13Consolidation with CDI-PIO (develop)
Hide whitespace changes
Inline Side-by-side
examples/pio/collectData2003.F90
+ 2
− 0
View file @ 0b1616e0
......@@ -17,6 +17,7 @@ PROGRAM collectdata2003
INTEGER, PARAMETER :: i8 = SELECTED_INT_KIND(14)
#endif
#ifdef USE_MPI
! For parallel IO:
! Parameter and variables needed.
INTEGER, PARAMETER :: nProcsIO = 3
......@@ -25,6 +26,7 @@ PROGRAM collectdata2003
! INTEGER, PARAMETER :: IOMode = PIO_WRITER
! INTEGER, PARAMETER :: IOMode = PIO_ASYNCH
INTEGER, PARAMETER :: IOMode = PIO_FPGUARD
#endif
INTEGER :: commModel
#ifdef USE_MPI
......
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment

Imprint | Privacy Policy