aboutsummaryrefslogtreecommitdiff
path: root/interface.ccl
diff options
context:
space:
mode:
authorbmundim <bmundim@ac85fae7-cede-4708-beff-ae01c7fa1c26>2011-04-27 22:37:50 +0000
committerbmundim <bmundim@ac85fae7-cede-4708-beff-ae01c7fa1c26>2011-04-27 22:37:50 +0000
commit549e6e4f6553d23dd43bc0398f8cbbdd84b13e7b (patch)
treef84b4b219b4ab190eb1e78b6483c1be466bce786 /interface.ccl
parentd27353f7a1fdc324b32801c9dfa432562404d1bb (diff)
Change Prim2Con functions interface.
git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinInitialData/GRHydro_InitData/trunk@125 ac85fae7-cede-4708-beff-ae01c7fa1c26
Diffstat (limited to 'interface.ccl')
-rw-r--r--interface.ccl31
1 files changed, 17 insertions, 14 deletions
diff --git a/interface.ccl b/interface.ccl
index a65ecb3..bb64579 100644
--- a/interface.ccl
+++ b/interface.ccl
@@ -40,17 +40,18 @@ SUBROUTINE Prim2ConGen(CCTK_INT IN handle, \
CCTK_REAL OUT press, CCTK_REAL OUT w_lorentz)
SUBROUTINE Prim2ConPolyM(CCTK_INT IN handle, \
- CCTK_REAL IN gxx, CCTK_REAL IN gxy, CCTK_REAL IN gxz, \
- CCTK_REAL IN gyy, CCTK_REAL IN gyz, CCTK_REAL IN gzz, \
- CCTK_REAL IN det, CCTK_REAL OUT dens, \
- CCTK_REAL OUT sx, CCTK_REAL OUT sy, \
- CCTK_REAL OUT sz, CCTK_REAL OUT tau, \
- CCTK_REAL IN Bvecx, CCTK_REAL IN Bvecy, \
- CCTK_REAL IN Bvecz, CCTK_REAL IN rho, CCTK_REAL IN velx, \
- CCTK_REAL IN vely, \
- CCTK_REAL IN velz, CCTK_REAL OUT epsilon, \
- CCTK_REAL OUT press, CCTK_REAL OUT w_lorentz)
-
+ CCTK_REAL IN gxx, CCTK_REAL IN gxy, \
+ CCTK_REAL IN gxz, CCTK_REAL IN gyy, \
+ CCTK_REAL IN gyz, CCTK_REAL IN gzz, \
+ CCTK_REAL IN det, CCTK_REAL OUT dens, \
+ CCTK_REAL OUT sx, CCTK_REAL OUT sy, \
+ CCTK_REAL OUT sz, CCTK_REAL OUT tau, \
+ CCTK_REAL OUT Bconsx, CCTK_REAL OUT Bconsy, \
+ CCTK_REAL OUT Bconsz, CCTK_REAL IN rho, CCTK_REAL IN velx, \
+ CCTK_REAL IN vely, \
+ CCTK_REAL IN velz, CCTK_REAL OUT epsilon, \
+ CCTK_REAL OUT press, CCTK_REAL IN Bvecx, CCTK_REAL IN Bvecy, \
+ CCTK_REAL IN Bvecz, CCTK_REAL OUT w_lorentz)
SUBROUTINE Prim2ConGenM(CCTK_INT IN handle, \
CCTK_REAL IN gxx, CCTK_REAL IN gxy, \
@@ -59,11 +60,13 @@ SUBROUTINE Prim2ConGenM(CCTK_INT IN handle, \
CCTK_REAL IN det, CCTK_REAL OUT dens, \
CCTK_REAL OUT sx, CCTK_REAL OUT sy, \
CCTK_REAL OUT sz, CCTK_REAL OUT tau, \
- CCTK_REAL IN Bvecx, CCTK_REAL IN Bvecy, \
- CCTK_REAL IN Bvecz, CCTK_REAL IN rho, CCTK_REAL IN velx, \
+ CCTK_REAL OUT Bconsx, CCTK_REAL OUT Bconsy, \
+ CCTK_REAL OUT Bconsz, CCTK_REAL IN rho, CCTK_REAL IN velx, \
CCTK_REAL IN vely, \
CCTK_REAL IN velz, CCTK_REAL IN epsilon, \
- CCTK_REAL OUT press, CCTK_REAL OUT w_lorentz)
+ CCTK_REAL OUT press, CCTK_REAL IN Bvecx, CCTK_REAL IN Bvecy, \
+ CCTK_REAL IN Bvecz, CCTK_REAL OUT w_lorentz)
+
SUBROUTINE Con2PrimPoly(CCTK_INT IN handle, CCTK_REAL OUT dens, \
CCTK_REAL OUT sx, CCTK_REAL OUT sy, \