[Commits] [svn:einsteintoolkit] GRHydro/trunk/src/ (Rev. 374)

rhaas at tapir.caltech.edu rhaas at tapir.caltech.edu
Tue Jun 26 18:48:02 CDT 2012


User: rhaas
Date: 2012/06/26 06:48 PM

Modified:
 /trunk/src/
  GRHydro_Con2Prim.F90

Log:
 GRHydro: remove "use" for con2prim interfaces from pointwise routines
 
 since the Fortran standard does not allow this and gfortran 4.7 actually
 chokes on it.
 
 Pointed out by Erik Schnetter.

File Changes:

Directory: /trunk/src/
======================

File [modified]: GRHydro_Con2Prim.F90
Delta lines: +0 -10
===================================================================
--- trunk/src/GRHydro_Con2Prim.F90	2012-06-26 15:29:13 UTC (rev 373)
+++ trunk/src/GRHydro_Con2Prim.F90	2012-06-26 23:48:01 UTC (rev 374)
@@ -349,8 +349,6 @@
      uyz, uzz, det, x, y, z, r, epsnegative, GRHydro_rho_min, pmin, epsmin, &
      GRHydro_reflevel, GRHydro_C2P_failed)
   
-  use Con2Prim_fortran_interfaces
-
   implicit none
   
   DECLARE_CCTK_PARAMETERS
@@ -614,8 +612,6 @@
      uyz, uzz, det, x, y, z, r, epsnegative, GRHydro_rho_min, pmin, epsmin, &
      GRHydro_reflevel, GRHydro_C2P_failed, local_perc_ptol)
   
-  use Con2Prim_fortran_interfaces
-
   implicit none
   
   DECLARE_CCTK_PARAMETERS
@@ -1476,8 +1472,6 @@
      velx, vely, velz, epsilon, press, w_lorentz, uxx, uxy, uxz, uyy, &
      uyz, uzz, det, x, y, z, r, GRHydro_rho_min, GRHydro_reflevel, GRHydro_C2P_failed)
   
-  use Con2Prim_fortran_interfaces
-
   implicit none
   
   DECLARE_CCTK_PARAMETERS
@@ -1980,8 +1974,6 @@
 
 subroutine Con2Prim_ptTracer(cons_tracer, tracer, dens) 
   
-  use Con2Prim_fortran_interfaces
-
   implicit none
   
   DECLARE_CCTK_PARAMETERS
@@ -2010,8 +2002,6 @@
 
 subroutine Con2Prim_ptBoundsTracer(cons_tracer, tracer, rho, one_over_w_lorentz, det)
   
-  use Con2Prim_fortran_interfaces
-
   implicit none
   
   DECLARE_CCTK_PARAMETERS



More information about the Commits mailing list