diff options
Diffstat (limited to 'src/comm/FortranBindings.c')
| -rw-r--r-- | src/comm/FortranBindings.c | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/src/comm/FortranBindings.c b/src/comm/FortranBindings.c index 84871403..e7969c4d 100644 --- a/src/comm/FortranBindings.c +++ b/src/comm/FortranBindings.c @@ -37,3 +37,14 @@ int FMODIFIER FORTRAN_NAME(CCTK_SyncGroup)(cGH *GH, ONE_FORTSTRING_ARG) free(group_name); return 0; } + +int FMODIFIER FORTRAN_NAME(CCTK_nProcs)(cGH *GH) +{ + return CCTK_nProcs(GH); +} + +int FMODIFIER FORTRAN_NAME(CCTK_MyProc)(cGH *GH) +{ + return CCTK_MyProc(GH); +} + |