[Commits] [svn:einsteintoolkit] GRHydro/branches/divclean/ (Rev. 241)

bcmsma at astro.rit.edu bcmsma at astro.rit.edu
Wed Apr 27 20:16:05 CDT 2011


User: bmundim
Date: 2011/04/27 08:16 PM

Modified:
 /branches/divclean/
  interface.ccl

Log:
 Interface fix.

File Changes:

Directory: /branches/divclean/
==============================

File [modified]: interface.ccl
Delta lines: +22 -3
===================================================================
--- branches/divclean/interface.ccl	2011-04-28 00:51:34 UTC (rev 240)
+++ branches/divclean/interface.ccl	2011-04-28 01:16:05 UTC (rev 241)
@@ -73,17 +73,18 @@
 
 void FUNCTION Con2PrimGenM(CCTK_INT INOUT handle, CCTK_REAL INOUT gamma_eos, CCTK_REAL INOUT dens, \
                            CCTK_REAL INOUT sx, CCTK_REAL INOUT sy, CCTK_REAL INOUT sz, \
-                           CCTK_REAL INOUT tau, CCTK_REAL INOUT rho, \
+                           CCTK_REAL INOUT tau, CCTK_REAL INOUT Bconsx, CCTK_REAL INOUT Bconsy, CCTK_REAL INOUT Bconsz, \
+			   CCTK_REAL INOUT rho, \
                            CCTK_REAL INOUT velx, CCTK_REAL INOUT vely, CCTK_REAL INOUT velz, \
                            CCTK_REAL INOUT epsilon, CCTK_REAL INOUT pressure, \
+                           CCTK_REAL INOUT Bvecx, CCTK_REAL INOUT Bvecy, CCTK_REAL INOUT Bvecz, \
+                           CCTK_REAL INOUT Bvecsq, \
                            CCTK_REAL INOUT w_lorentz, \
                            CCTK_REAL INOUT gxx, CCTK_REAL INOUT gxy, CCTK_REAL INOUT gxz, \
                            CCTK_REAL INOUT gyy, CCTK_REAL INOUT gyz, CCTK_REAL INOUT gzz, \
                            CCTK_REAL INOUT uxx, CCTK_REAL INOUT uxy, CCTK_REAL INOUT uxz, \
                            CCTK_REAL INOUT uyy, CCTK_REAL INOUT uyz, CCTK_REAL INOUT uzz, \
                            CCTK_REAL INOUT det, \
-                           CCTK_REAL INOUT Bvecx, CCTK_REAL INOUT Bvecy, CCTK_REAL INOUT Bvecz, \
-                           CCTK_REAL INOUT Bvecsq, \
                            CCTK_INT OUT epsnegative, \
                            CCTK_REAL OUT retval)
 
@@ -101,6 +102,23 @@
                            CCTK_REAL IN r, CCTK_REAL IN rho_min, \
 			   CCTK_INT IN GRHydro_reflevel, CCTK_REAL IN GRHydro_C2P_failed)
 
+void FUNCTION Con2PrimPolyM(CCTK_INT INOUT handle, CCTK_REAL INOUT gamma_eos, CCTK_REAL INOUT dens, \
+                           CCTK_REAL INOUT sx, CCTK_REAL INOUT sy, CCTK_REAL INOUT sz, \
+                           CCTK_REAL INOUT sc, CCTK_REAL INOUT Bconsx, CCTK_REAL INOUT Bconsy, CCTK_REAL INOUT Bconsz, \
+			   CCTK_REAL INOUT rho, \
+                           CCTK_REAL INOUT velx, CCTK_REAL INOUT vely, CCTK_REAL INOUT velz, \
+                           CCTK_REAL INOUT epsilon, CCTK_REAL INOUT pressure, \
+                           CCTK_REAL INOUT Bvecx, CCTK_REAL INOUT Bvecy, CCTK_REAL INOUT Bvecz, \
+                           CCTK_REAL INOUT Bvecsq, \
+                           CCTK_REAL INOUT w_lorentz, \
+                           CCTK_REAL INOUT gxx, CCTK_REAL INOUT gxy, CCTK_REAL INOUT gxz, \
+                           CCTK_REAL INOUT gyy, CCTK_REAL INOUT gyz, CCTK_REAL INOUT gzz, \
+                           CCTK_REAL INOUT uxx, CCTK_REAL INOUT uxy, CCTK_REAL INOUT uxz, \
+                           CCTK_REAL INOUT uyy, CCTK_REAL INOUT uyz, CCTK_REAL INOUT uzz, \
+                           CCTK_REAL INOUT det, \
+                           CCTK_INT OUT epsnegative, \
+                           CCTK_REAL OUT retval)
+
 #void FUNCTION Prim2Con CCTK_INT handle, CCTK_REAL gxx, CCTK_REAL gxy, CCTK_REAL gxz, CCTK_REAL gyy, CCTK_REAL gyz, CCTK_REAL gzz, CCTK_REAL det, CCTK_REAL dens, CCTK_REAL sx, CCTK_REAL sy, CCTK_REAL sz, CCTK_REAL tau, CCTK_REAL rho, CCTK_REAL velx, CCTK_REAL vely, CCTK_REAL velz, CCTK_REAL epsilon, CCTK_REAL press, CCTK_REAL w_lorentz
 
 void FUNCTION Prim2ConGen(CCTK_INT IN handle, \
@@ -161,6 +179,7 @@
 PROVIDES FUNCTION Con2PrimPoly WITH Con2Prim_ptPolytype LANGUAGE Fortran
 PROVIDES FUNCTION Con2PrimGenM WITH GRHydro_Con2PrimM_pt LANGUAGE Fortran
 PROVIDES FUNCTION Con2PrimGen WITH Con2Prim_pt LANGUAGE Fortran
+PROVIDES FUNCTION Con2PrimPolyM WITH GRHydro_Con2PrimM_Polytype_pt LANGUAGE Fortran
 PROVIDES FUNCTION Prim2ConGen WITH prim2con LANGUAGE Fortran
 PROVIDES FUNCTION Prim2ConPoly WITH prim2conpolytype LANGUAGE Fortran
 PROVIDES FUNCTION Prim2ConGenM WITH prim2conM LANGUAGE Fortran



More information about the Commits mailing list