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

27 Aug 2012

User: rhaas
Date: 2012/08/27 02:19 PM
Modified:
 /trunk/src/
  GRHydro_UpdateMaskM.F90
Log:
 GRHydro: clear atmosphere_mask_real in MHD AtmosphereReset
From: Roland Haas roland.haas@physics.gatech.edu
File Changes:
Directory: /trunk/src/
======================
File [modified]: GRHydro_UpdateMaskM.F90
Delta lines: +1 -0
===================================================================

--- trunk/src/GRHydro_UpdateMaskM.F90	2012-08-27 19:19:44 UTC (rev 418)
+++ trunk/src/GRHydro_UpdateMaskM.F90	2012-08-27 19:19:46 UTC (rev 419)
@@ -153,6 +153,7 @@
                  Bprim(i,j,k,1),Bprim(i,j,k,2),Bprim(i,j,k,3),w_lorentz(i,j,k))
             if (wk_atmosphere .eq. 0) then
               atmosphere_mask(i, j, k) = 0
+              atmosphere_mask_real(i, j, k) = 0
             end if
end if

    