diff options
author | rhaas <rhaas@ef6f4158-a8ee-47d1-ba14-cb73256398e0> | 2012-01-25 15:19:00 +0000 |
---|---|---|
committer | rhaas <rhaas@ef6f4158-a8ee-47d1-ba14-cb73256398e0> | 2012-01-25 15:19:00 +0000 |
commit | cc396ab996df8be585ddb70c84c9b943002c99a5 (patch) | |
tree | a1993a6e071038f155cd6623a541723b2e0c4e01 /interface.ccl | |
parent | ec2893918d69b8a3e5d9680a85fb540acfb49942 (diff) |
support named spherical surfaces
git-svn-id: https://svn.cct.lsu.edu/repos/numrel/LSUThorns/QuasiLocalMeasures/trunk@36 ef6f4158-a8ee-47d1-ba14-cb73256398e0
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 |