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

4 Jul 2012

User: rhaas
Date: 2012/07/05 12:36 AM
Modified:
 /trunk/src/
  GRHydro_UpdateMaskM.F90
Log:
 GRHydro: clear atmosphere_mask_real in MHD AtmosphereReset
File Changes:
Directory: /trunk/src/
======================
File [modified]: GRHydro_UpdateMaskM.F90
Delta lines: +1 -0
===================================================================

--- trunk/src/GRHydro_UpdateMaskM.F90	2012-07-05 05:36:53 UTC (rev 388)
+++ trunk/src/GRHydro_UpdateMaskM.F90	2012-07-05 05:36:55 UTC (rev 389)
@@ -66,6 +66,7 @@
                Bvec(i,j,k,1),Bvec(i,j,k,2),Bvec(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

    