| 6 |
|
#define __C |
| 7 |
|
#include "mpiComponentPlan.h" |
| 8 |
|
|
| 9 |
+ |
#include <fortranWrapDefines.hpp> |
| 10 |
|
|
| 11 |
|
class mpiSimulation{ |
| 12 |
|
public: |
| 29 |
|
|
| 30 |
|
// sets the internal function pointer to fortran. |
| 31 |
|
|
| 32 |
< |
void setInternal( void (*fSetup)( mpiSimData*, int*, int*, int*) ){ |
| 32 |
> |
void setInternal( void (*fSetup) setFortranMPIlist ){ |
| 33 |
|
setFsimParallel = fSetup; |
| 34 |
|
} |
| 35 |
|
|
| 41 |
|
protected: |
| 42 |
|
SimInfo* entryPlug; |
| 43 |
|
mpiSimData* mpiPlug; |
| 43 |
– |
|
| 44 |
– |
// function to wrap the fortran function |
| 45 |
– |
void wrapMe(); |
| 44 |
|
|
| 45 |
|
// private function to initialize the fortran side of the simulation |
| 46 |
< |
void (*setFsimParallel)(mpiSimData* the_mpiPlug, int *nLocal, |
| 49 |
< |
int* globalIndex, int* isError ); |
| 46 |
> |
void (*setFsimParallel) setFortranMPIlist; |
| 47 |
|
|
| 48 |
|
// int *myIdents; // is needed by Cpp only. It tells the molecule which stamp it is. |
| 49 |
|
|