From 5e98a3532108eb9c55644950ae0dd0ff1037709b Mon Sep 17 00:00:00 2001 From: rem1776 Date: Tue, 11 Jun 2024 15:45:03 -0400 Subject: [PATCH] change sst_balue to come from nml instead of fms --- simple/ice_model.F90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/simple/ice_model.F90 b/simple/ice_model.F90 index 8777adc0..b499ec4e 100644 --- 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 !----------------------------------------------------------