From cb6d13c39d63bece2c5f96c6c9919a1210a6a3e7 Mon Sep 17 00:00:00 2001 From: William Cooke Date: Tue, 6 Feb 2018 12:42:09 -0500 Subject: [PATCH] Pass time stamp to iceberg restart routine. --- src/ice_type.F90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/ice_type.F90 b/src/ice_type.F90 index 95266cda..5bb7dce5 100644 --- a/src/ice_type.F90 +++ b/src/ice_type.F90 @@ -484,7 +484,7 @@ subroutine ice_model_restart(Ice, time_stamp) elseif (associated(Ice%Ice_fast_restart)) then call save_restart(Ice%Ice_fast_restart, time_stamp) endif - call icebergs_save_restart(Ice%icebergs) + call icebergs_save_restart(Ice%icebergs, time_stamp) end subroutine ice_model_restart !