diff options
| -rw-r--r-- | src/spin_integrand3D.F | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/spin_integrand3D.F b/src/spin_integrand3D.F index 7f93a0d..c2ced50 100644 --- a/src/spin_integrand3D.F +++ b/src/spin_integrand3D.F @@ -60,7 +60,7 @@ c ------------------------------------------------------------------------ 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 |