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