[Commits] [svn:einsteintoolkit] GRHydro/trunk/src/ (Rev. 348)
rhaas at tapir.caltech.edu
rhaas at tapir.caltech.edu
Tue Jun 5 15:46:20 CDT 2012
User: rhaas
Date: 2012/06/05 03:46 PM
Modified:
/trunk/src/
GRHydro_Con2Prim.F90
Log:
* allow disabling check of the GRHydro_C2P_failed mask
on coarse reflevels via GRHydro_c2p_warn_from_level
parameter.
Patch by Christian Ott.
File Changes:
Directory: /trunk/src/
======================
File [modified]: GRHydro_Con2Prim.F90
Delta lines: +3 -0
===================================================================
--- trunk/src/GRHydro_Con2Prim.F90 2012-06-05 20:45:16 UTC (rev 347)
+++ trunk/src/GRHydro_Con2Prim.F90 2012-06-05 20:46:20 UTC (rev 348)
@@ -1984,6 +1984,9 @@
ny = cctk_lsh(2)
nz = cctk_lsh(3)
+ ! do not check if told not to
+ if(GRHydro_reflevel .lt. GRHydro_c2p_warn_from_reflevel) return
+
!$OMP PARALLEL DO PRIVATE(i,j,k)
do k = 1, nz
do j = 1, ny
More information about the Commits
mailing list