User: rhaas Date: 2013/01/14 08:23 AM
Modified: /trunk/src/ GRHydro_Prim2ConM.F90
Log: GRHydro: output v2 when warning about NaN in w_lorentz
From: Roland Haas roland.haas@physics.gatech.edu
File Changes:
Directory: /trunk/src/ ======================
File [modified]: GRHydro_Prim2ConM.F90 Delta lines: +2 -2 =================================================================== --- trunk/src/GRHydro_Prim2ConM.F90 2013-01-14 14:23:48 UTC (rev 463) +++ trunk/src/GRHydro_Prim2ConM.F90 2013-01-14 14:23:49 UTC (rev 464) @@ -255,8 +255,8 @@ call CCTK_WARN(1, NaN_WarnLine) write(NaN_WarnLine,'(a100,3g15.6)') 'NaN produced in sqrt(): (x,y,z)', x, y, z call CCTK_WARN(1, NaN_WarnLine) - !write(NaN_WarnLine,'(a100,g15.6)') 'NaN produced in sqrt(): w', w - !call CCTK_WARN(GRHydro_NaN_verbose, NaN_WarnLine) + write(NaN_WarnLine,'(a100,g15.6)') 'NaN produced in sqrt(): v2', DOT2(dvelx(1),dvely(1),dvelz(1)) + call CCTK_WARN(GRHydro_NaN_verbose, NaN_WarnLine) !$OMP END CRITICAL endif !!$ END: Check for NaN value