diff --git a/components/mpas-seaice/src/shared/mpas_seaice_icepack.F b/components/mpas-seaice/src/shared/mpas_seaice_icepack.F index 24c10c6c03a3..b830abd3aa9f 100644 --- a/components/mpas-seaice/src/shared/mpas_seaice_icepack.F +++ b/components/mpas-seaice/src/shared/mpas_seaice_icepack.F @@ -593,8 +593,8 @@ subroutine init_column_waves(domain) waveFreqBinWidth_TEMP) ! remove frequency 'tails' (which are only needed in WW3, not MPAS-SI) - waveFrequency(1:nFrequencies-2) = waveFrequency_TEMP(2:nFrequencies-1) - waveFreqBinWidth(1:nFrequencies-2) = waveFreqBinWidth_TEMP(2:nFrequencies-1) + waveFrequency = waveFrequency_TEMP(2:nFrequencies-1) + waveFreqBinWidth = waveFreqBinWidth_TEMP(2:nFrequencies-1) ! initialize HS and Spectra if (.not. config_do_restart) then