change sst_balue to come from nml instead of fms

rem1776 · Jun 11, 2024 · 5e98a35 · 5e98a35
1 parent 6442d38
commit 5e98a35
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/simple/ice_model.F90 b/simple/ice_model.F90
@@ -1110,7 +1110,7 @@ subroutine ice_model_init ( Ice, Time_Init, Time, &
 ! this perturbation may be useful in accessing model sensitivities
 
  if ( abs(sst_anom) > 0.0001 ) then
- Ice%t_surf(:,:) = Ice%t_surf(:,:) + fms_amip_interp_sst_anom
+ Ice%t_surf(:,:) = Ice%t_surf(:,:) + sst_anom
  endif
 
 !----------------------------------------------------------