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

Reduce code divergence.

parent b3f53214
No related branches found
No related tags found
1 merge request!11Consolidation with CDI-PIO (1.8.x)
......@@ -192,7 +192,10 @@ static int modelRun(MPI_Comm comm)
int bufferSize, differ;
#ifdef USE_MPI
const char *fname = "example_resource_copy_mpi.grb";
cdiPioSerializeSetMPI();
#else
const char *fname = "example_resource_copy.grb";
#endif
gridID = defineGrid ();
......@@ -203,11 +206,7 @@ static int modelRun(MPI_Comm comm)
{
struct idPair temp = defineVlist(gridID, zaxisID, taxisID);
vlistID = temp.id1;
#ifdef USE_MPI
streamID = streamOpenWrite("example_resource_copy_mpi.grb", CDI_FILETYPE_GRB);
#else
streamID = streamOpenWrite("example_resource_copy.grb", CDI_FILETYPE_GRB);
#endif
streamID = streamOpenWrite(fname, CDI_FILETYPE_GRB);
if ( streamID < 0 ) xabort ( "Could not open file" );
defineStream ( streamID, vlistID );
vlistDestroy(temp.id1);
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment