diff options
Diffstat (limited to 'interface.ccl')
-rw-r--r-- | interface.ccl | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/interface.ccl b/interface.ccl index 3cb4cd0..4510fce 100644 --- a/interface.ccl +++ b/interface.ccl @@ -10,6 +10,11 @@ CCTK_POINTER_TO_CONST \ FUNCTION GetMPICommWorld (CCTK_POINTER_TO_CONST IN cctkGH) USES FUNCTION GetMPICommWorld +# translate SphericalSurface name into ID +CCTK_INT \ +FUNCTION sf_IdFromName (CCTK_INT IN id, CCTK_POINTER_TO_CONST IN name) +USES FUNCTION sf_IdFromName + INT qlm_state[num_surfaces] TYPE=scalar |