Skip to content

Commit c4414f3

Browse files
committed
fix: deallocate fd_coeff/accel arrays under ib too (match alloc guard)
1 parent 8308a00 commit c4414f3

1 file changed

Lines changed: 1 addition & 1 deletion

File tree

src/simulation/m_derived_variables.fpp

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -508,7 +508,7 @@ contains
508508
end if
509509
end if
510510

511-
if (probe_wrt) then
511+
if (probe_wrt .or. ib) then
512512
@:DEALLOCATE(accel_mag)
513513
@:DEALLOCATE(x_accel)
514514
if (n > 0) then

0 commit comments

Comments
 (0)