[Commits] [svn:einsteintoolkit] Extract/trunk/src/ (Rev. 127)

User: eschnett Date: 2013/10/30 10:17 AM

Modified: /trunk/src/ spin_integrand3D.F

Log: Abort on error

File Changes:

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

File [modified]: spin_integrand3D.F Delta lines: +1 -1 =================================================================== --- trunk/src/spin_integrand3D.F 2013-05-27 22:31:52 UTC (rev 126) +++ trunk/src/spin_integrand3D.F 2013-10-30 15:17:55 UTC (rev 127) @@ -60,7 +60,7 @@ ip = 1

CASE DEFAULT - WRITE(*,*) "This value of Psi_power is not supported" + CALL CCTK_ERROR("This value of Psi_power is not supported")

END SELECT