User: rhaas Date: 2012/07/05 12:36 AM

Modified: /trunk/src/ GRHydro_UpdateMask.F90

Log: GRHydro: remove SAVE attribtute from _p and _pp vars

this was harmless since the pointers to grid functions affected were OMP shared anyway

File Changes:

Directory: /trunk/src/ ======================

File [modified]: GRHydro_UpdateMask.F90 Delta lines: +6 -8 =================================================================== --- trunk/src/GRHydro_UpdateMask.F90 2012-07-05 05:36:52 UTC (rev 387) +++ trunk/src/GRHydro_UpdateMask.F90 2012-07-05 05:36:53 UTC (rev 388) @@ -363,14 +363,12 @@ CCTK_INT :: GRHydro_UseGeneralCoordinates CCTK_REAL, DIMENSION(:,:,:), POINTER :: g11, g12, g13, g22, g23, g33 CCTK_REAL, DIMENSION(:,:,:,:), POINTER :: vup - CCTK_REAL, DIMENSION(:,:,:), POINTER :: g11_p => Null(), g12_p => Null(), & - g13_p => Null(), g22_p => Null(), & - g23_p => Null(), g33_p => Null() - CCTK_REAL, DIMENSION(:,:,:,:), POINTER :: vup_p => Null() - CCTK_REAL, DIMENSION(:,:,:), POINTER :: g11_p_p => Null(), g12_p_p => Null(), & - g13_p_p => Null(), g22_p_p => Null(), & - g23_p_p => Null(), g33_p_p => Null() - CCTK_REAL, DIMENSION(:,:,:,:), POINTER :: vup_p_p => Null() + CCTK_REAL, DIMENSION(:,:,:), POINTER :: g11_p, g12_p, g13_p, g22_p, & + g23_p, g33_p + CCTK_REAL, DIMENSION(:,:,:,:), POINTER :: vup_p + CCTK_REAL, DIMENSION(:,:,:), POINTER :: g11_p_p, g12_p_p, g13_p_p, g22_p_p, & + g23_p_p, g33_p_p + CCTK_REAL, DIMENSION(:,:,:,:), POINTER :: vup_p_p

! begin EOS Omni vars integer :: n,keytemp,anyerr,keyerr(1)