Skip to content
Snippets Groups Projects
Commit 89585ec4 authored by Thomas Jahns's avatar Thomas Jahns :cartwheel:
Browse files

Fix conditionally used declaration.

parent 8f5820c8
No related branches found
No related tags found
No related merge requests found
Hide whitespace changes
Inline Side-by-side
examples/pio/collectData2003.F90
+ 2
− 0
View file @ 89585ec4
......@@ -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