User: rhaas Date: 2012/08/14 01:39 AM
Modified: /trunk/src/ GRHydro_ParamCheck.F90
Log: GRHydro: fix inverted logic in ParamWarn about divergence cleaning
From: Roland Haas roland.haas@physics.gatech.edu
File Changes:
Directory: /trunk/src/ ======================
File [modified]: GRHydro_ParamCheck.F90 Delta lines: +1 -1 =================================================================== --- trunk/src/GRHydro_ParamCheck.F90 2012-08-09 22:09:37 UTC (rev 408) +++ trunk/src/GRHydro_ParamCheck.F90 2012-08-14 06:39:18 UTC (rev 409) @@ -138,7 +138,7 @@ end if end if
- if(clean_divergence.eq.0 .and. evolve_MHD.ne.0) then + if(clean_divergence.ne.0 .and. evolve_MHD.eq.0) then call CCTK_WARN(1, "You activated divergence cleaning but do not evolve a magnetic field. At best, nothing should happen, be preapered for a segfault otherwise.") end if