diff options
author | rideout <rideout@4451c3c6-1034-4891-99ea-21147727ccdf> | 2003-02-14 14:29:23 +0000 |
---|---|---|
committer | rideout <rideout@4451c3c6-1034-4891-99ea-21147727ccdf> | 2003-02-14 14:29:23 +0000 |
commit | f05d032fcedb3026030217864a3ddcf13d3f27c8 (patch) | |
tree | 60d4df60e12952ff200b3e70101735d49ebbb948 /interface.ccl | |
parent | e02b653ae4ec16e0c02264b9ae5d5e23f3f14865 (diff) |
Modified to use new boundary interface.
git-svn-id: http://svn.cactuscode.org/arrangements/CactusWave/WaveToyF77/trunk@89 4451c3c6-1034-4891-99ea-21147727ccdf
Diffstat (limited to 'interface.ccl')
-rw-r--r-- | interface.ccl | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/interface.ccl b/interface.ccl index ac58f9f..cdfebdc 100644 --- a/interface.ccl +++ b/interface.ccl @@ -4,7 +4,6 @@ implements: wavetoy inherits: Grid Boundary -USES INCLUDE: Boundary.h USES INCLUDE: Symmetry.h public: @@ -13,3 +12,8 @@ cctk_real scalarevolve type = GF Timelevels=3 { phi } "The evolved scalar field" + +# Function aliasing from Fortran does not work at the moment... +#CCTK_INT FUNCTION Boundary_SelectVarForBC CCTK_POINTER GH, CCTK_INT faces, \ +# CCTK_INT table_handle, CCTK_STRING var_name, CCTK_STRING bc_name +#USES FUNCTION Boundary_SelectVarForBC |