diff --git a/unchanged/marbl_diagnostics_mod.F90 b/unchanged/marbl_diagnostics_mod.F90 index 75bf800..740d89f 100644 --- a/unchanged/marbl_diagnostics_mod.F90 +++ b/unchanged/marbl_diagnostics_mod.F90 @@ -4167,8 +4167,7 @@ subroutine store_diagnostics_phosphorus_fluxes(marbl_domain, POP, & write(log_message,"(A,E11.3e3,A,E11.3e3)") & 'abs(Jint_Ptot)=', abs(diags(ind%Jint_Ptot)%field_2d(1)), & ' exceeds Jint_Ptot_thres=', Jint_Ptot_thres - call marbl_status_log%log_error(log_message, subname, ElemInd=1) - return + call marbl_status_log%log_noerror(log_message, subname) end if end associate