From 2ebed3a124515af4c56c5af4840ec6d17c3f58cf Mon Sep 17 00:00:00 2001 From: Jeff Candy Date: Fri, 20 Sep 2024 14:15:49 -0700 Subject: [PATCH] Different output --- cgyro/src/cgyro_error_estimate.F90 | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/cgyro/src/cgyro_error_estimate.F90 b/cgyro/src/cgyro_error_estimate.F90 index 732b13602..b8769a579 100644 --- a/cgyro/src/cgyro_error_estimate.F90 +++ b/cgyro/src/cgyro_error_estimate.F90 @@ -13,7 +13,8 @@ subroutine cgyro_error_estimate use cgyro_globals use cgyro_io use timer_lib - + use cgyro_step + implicit none integer :: i_f,itor @@ -175,7 +176,7 @@ subroutine cgyro_error_estimate integration_error = integration_error/norm if (i_proc == 0) then - print '(7(1pe12.5))',delta_t_gk,deltah2,delta_t_last_step,delta_t_last,var_error,integration_error + print '(7(1pe12.5))',var_error,integration_error,sum(abs(h_x)),sum(abs(rhs(:,:,:,1))) endif ! Trigger code shutdown on large collisionless error