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