diff options
| author | schnetter <schnetter@f69c4107-0314-4c4f-9ad4-17e986b73f4a> | 2004-11-04 22:11:34 +0000 |
|---|---|---|
| committer | schnetter <schnetter@f69c4107-0314-4c4f-9ad4-17e986b73f4a> | 2004-11-04 22:11:34 +0000 |
| commit | a392b857f4cf624bef9f016b1fde599ddbb5633b (patch) | |
| tree | 7383b8843a9bf400f43f2c74668ae4b416b10a5b /interface.ccl | |
| parent | 30303a7e3d029b46db9ffde280d7c4cf06cc9b9e (diff) | |
Declare cctkGH as const in Diff_gf and Diff_gv
git-svn-id: https://svn.cct.lsu.edu/repos/numrel/LSUThorns/SummationByParts/trunk@14 f69c4107-0314-4c4f-9ad4-17e986b73f4a
Diffstat (limited to 'interface.ccl')
| -rw-r--r-- | interface.ccl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/interface.ccl b/interface.ccl index 924cabc..b8fd0f9 100644 --- a/interface.ccl +++ b/interface.ccl @@ -13,13 +13,13 @@ inherits: grid # CCTK_REAL OUT ARRAY dvar ) #PROVIDES FUNCTION Diff_gf WITH deriv_gf LANGUAGE Fortran -SUBROUTINE Diff_gf ( CCTK_POINTER IN cctkGH, \ +SUBROUTINE Diff_gf ( CCTK_POINTER_TO_CONST IN cctkGH, \ CCTK_INT IN dir, \ CCTK_STRING IN var_name, \ CCTK_STRING IN dvar_name ) PROVIDES FUNCTION Diff_gf WITH DiffGf LANGUAGE C -SUBROUTINE Diff_gv ( CCTK_POINTER IN cctkGH, \ +SUBROUTINE Diff_gv ( CCTK_POINTER_TO_CONST IN cctkGH, \ CCTK_INT IN dir, \ CCTK_REAL IN ARRAY var, \ CCTK_REAL OUT ARRAY dvar ) |