integer fdds_initopenmp( )
NOTE: you will have to define this function for
yourself because it is not defined in fdds.h (if it was, DDS would try to use the
parallel routines for all codes). So add "integer fdds_initopenmp" to any
routine that uses it.
! Declare the function and local value for nproc
integer fdds_initopenmp, nproc
...
! Initialize OpenMP, copy command line value of nproc to local nproc
nproc = fdds_initopenmp()
fdds_initmpi Initialize DDS for MPI
fdds_initmpix Initialize DDS for MPIX