Skip to content

Commit

Permalink
change sst_anom value to come from nml instead of fms
Browse files Browse the repository at this point in the history
  • Loading branch information
rem1776 authored Jun 10, 2024
1 parent 2b59f6d commit 452a7ac
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion simple/ice_model.F90
Original file line number Diff line number Diff line change
Expand Up @@ -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

!----------------------------------------------------------
Expand Down

0 comments on commit 452a7ac

Please sign in to comment.