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

[rhaas at tapir.caltech.edu]

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