Skip to content

Commit 33aecfa

Browse files
add is_ice (#1155) (#1163)
Co-authored-by: Travis Elless <113720457+TravisElless-NOAA@users.noreply.github.com>
1 parent 3d6f114 commit 33aecfa

1 file changed

Lines changed: 1 addition & 0 deletions

File tree

sorc/global_cycle.fd/cycle.F90

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -1581,6 +1581,7 @@ subroutine tf_thaw_set(tf_ij,mask_ij,itile,jtile,tice,tclm,tf_thaw,nx,ny, &
15811581
tf(:,:) = reshape(tf_ij,(/nx,ny/) )
15821582

15831583
tf_thaw = bmiss
1584+
is_ice = .false.
15841585

15851586
do krad = 1, max_search
15861587

0 commit comments

Comments
 (0)