My Project
Functions/Subroutines | Variables
ice_flux Module Reference

Functions/Subroutines

subroutine init_flux_atm
 
subroutine init_flux_ocn
 
subroutine init_diagnostics
 
subroutine merge_fluxes (ni, strxn, stryn, fsensn, flatn, fswabsn, flwoutn, evapn, Trefn, Qrefn, freshn, fsaltn, fhnetn, fswthrun)
 

Variables

real(kind=dbl_kind), dimension(:,:), allocatable, save ss_tltx
 
real(kind=dbl_kind), dimension(:,:), allocatable, save ss_tlty
 
real(kind=dbl_kind), dimension(:,:), allocatable, save uocn
 
real(kind=dbl_kind), dimension(:,:), allocatable, save vocn
 
real(kind=dbl_kind), dimension(:,:), allocatable, save strairxt
 
real(kind=dbl_kind), dimension(:,:), allocatable, save strairyt
 
real(kind=dbl_kind), dimension(:,:), allocatable, save strocnxt
 
real(kind=dbl_kind), dimension(:,:), allocatable, save strocnyt
 
real(kind=dbl_kind), dimension(:,:), allocatable, save daidtd
 
real(kind=dbl_kind), dimension(:,:), allocatable, save dvidtd
 
real(kind=dbl_kind), dimension(:,:), allocatable, save strocnx
 
real(kind=dbl_kind), dimension(:,:), allocatable, save strocny
 
real(kind=dbl_kind), dimension(:,:), allocatable, save strairx
 
real(kind=dbl_kind), dimension(:,:), allocatable, save strairy
 
real(kind=dbl_kind), dimension(:,:), allocatable, save strtltx
 
real(kind=dbl_kind), dimension(:,:), allocatable, save strtlty
 
real(kind=dbl_kind), dimension(:,:), allocatable, save zlvl
 
real(kind=dbl_kind), dimension(:,:), allocatable, save uatm
 
real(kind=dbl_kind), dimension(:,:), allocatable, save vatm
 
real(kind=dbl_kind), dimension(:,:), allocatable, save pott
 
real(kind=dbl_kind), dimension(:,:), allocatable, save tair
 
real(kind=dbl_kind), dimension(:,:), allocatable, save qa
 
real(kind=dbl_kind), dimension(:,:), allocatable, save rhoa
 
real(kind=dbl_kind), dimension(:,:), allocatable, save swvdr
 
real(kind=dbl_kind), dimension(:,:), allocatable, save swvdf
 
real(kind=dbl_kind), dimension(:,:), allocatable, save swidr
 
real(kind=dbl_kind), dimension(:,:), allocatable, save swidf
 
real(kind=dbl_kind), dimension(:,:), allocatable, save flw
 
real(kind=dbl_kind), dimension(:,:), allocatable, save frain
 
real(kind=dbl_kind), dimension(:,:), allocatable, save fsnow
 
real(kind=dbl_kind), dimension(:,:), allocatable, save frzmlt
 
real(kind=dbl_kind), dimension(:,:), allocatable, save sss
 
real(kind=dbl_kind), dimension(:,:), allocatable, save sst
 
real(kind=dbl_kind), dimension(:,:), allocatable, save tf
 
real(kind=dbl_kind), dimension(:,:), allocatable, save qdp
 
real(kind=dbl_kind), dimension(:,:), allocatable, save hmix
 
real(kind=dbl_kind), dimension(:,:), allocatable, save fsens
 
real(kind=dbl_kind), dimension(:,:), allocatable, save flat
 
real(kind=dbl_kind), dimension(:,:), allocatable, save fswabs
 
real(kind=dbl_kind), dimension(:,:), allocatable, save flwout
 
real(kind=dbl_kind), dimension(:,:), allocatable, save evap
 
real(kind=dbl_kind), dimension(:,:), allocatable, save tref
 
real(kind=dbl_kind), dimension(:,:), allocatable, save qref
 
real(kind=dbl_kind), dimension(:,:), allocatable, save fresh
 
real(kind=dbl_kind), dimension(:,:), allocatable, save fsalt
 
real(kind=dbl_kind), dimension(:,:), allocatable, save fhnet
 
real(kind=dbl_kind), dimension(:,:), allocatable, save fswthru
 
real(kind=dbl_kind), dimension(:,:), allocatable, save congel
 
real(kind=dbl_kind), dimension(:,:), allocatable, save frazil
 
real(kind=dbl_kind), dimension(:,:), allocatable, save snoice
 
real(kind=dbl_kind), dimension(:,:), allocatable, save meltt
 
real(kind=dbl_kind), dimension(:,:), allocatable, save meltb
 
real(kind=dbl_kind), dimension(:,:), allocatable, save meltl
 
real(kind=dbl_kind), dimension(:,:), allocatable, save daidtt
 
real(kind=dbl_kind), dimension(:,:), allocatable, save dvidtt
 
real(kind=dbl_kind), dimension(:,:), allocatable, save mlt_onset
 
real(kind=dbl_kind), dimension(:,:), allocatable, save frz_onset
 
real(kind=dbl_kind), dimension(:,:), allocatable, save fresh_hist
 
real(kind=dbl_kind), dimension(:,:), allocatable, save fsalt_hist
 
real(kind=dbl_kind), dimension(:,:), allocatable, save fhnet_hist
 
real(kind=dbl_kind), dimension(:,:), allocatable, save fswthru_hist
 
real(kind=dbl_kind), dimension(:,:), allocatable, save fsw
 
real(kind=dbl_kind), dimension(:,:), allocatable, save wind
 
real(kind=dbl_kind), dimension(:,:), allocatable, save shcoef
 
real(kind=dbl_kind), dimension(:,:), allocatable, save lhcoef
 

Function/Subroutine Documentation

◆ init_diagnostics()

subroutine ice_flux::init_diagnostics ( )

Definition at line 286 of file ice_flux.f90.

286 !
287 ! !DESCRIPTION:
288 !
289 ! Initialize diagnostic fields written to history files.
290 !
291 ! !REVISION HISTORY:
292 !
293 ! author: William H. Lipscomb, LANL
294 !
295 ! !USES:
296 !
297 ! !INPUT/OUTPUT PARAMETERS:
298 !
299 !
300 !EOP
301 !
302  use ice_state, only: aice, vice
303 
304  integer (kind=int_kind) :: &
305  & i, j ! horizontal indices
306 
307  do j = jlo, jhi
308  do i = ilo, ihi
309  congel(i,j) = c0i
310  frazil(i,j) = c0i
311  snoice(i,j) = c0i
312  meltt(i,j) = c0i
313  meltb(i,j) = c0i
314  meltl(i,j) = c0i
315  daidtt(i,j) = aice(i,j) ! temporarily used for initial area
316  dvidtt(i,j) = vice(i,j) ! temporarily used for initial volume
317  daidtd(i,j) = c0i
318  dvidtd(i,j) = c0i
319  fresh_hist(i,j) = c0i
320  fsalt_hist(i,j) = c0i
321  fhnet_hist(i,j) = c0i
322  fswthru_hist(i,j) = c0i
323  enddo ! i
324  enddo ! j
325 
real(kind=dbl_kind), parameter c0i
real(kind=dbl_kind), dimension(:,:), allocatable, target, save aice
Definition: ice_state.f90:82
real(kind=dbl_kind), dimension(:,:), allocatable, target, save vice
Definition: ice_state.f90:82
Here is the caller graph for this function:

◆ init_flux_atm()

subroutine ice_flux::init_flux_atm ( )

Definition at line 182 of file ice_flux.f90.

182 !
183 ! !DESCRIPTION:
184 !
185 ! Initialize all fluxes sent to coupler for use by the atm model
186 ! and a few state quantities
187 !
188 ! !REVISION HISTORY:
189 !
190 ! author: Elizabeth C. Hunke, LANL
191 !
192 ! !USES:
193  use ice_state, only : aice
194 !
195 ! !INPUT/OUTPUT PARAMETERS:
196 !
197 !
198 !EOP
199 !
200  integer (kind=int_kind) :: &
201  & i, j ! horizontal indices
202 
203  !-----------------------------------------------------------------
204  ! fluxes sent
205  !-----------------------------------------------------------------
206 
207  do j = jlo, jhi
208  do i = ilo, ihi
209 
210  strairxt(i,j) = c0i ! wind stress, T grid
211  strairyt(i,j) = c0i
212  fsens(i,j) = c0i
213  flat(i,j) = c0i
214  fswabs(i,j) = c0i
215  flwout(i,j) = c0i
216  evap(i,j) = c0i
217  tref(i,j) = c0i
218  qref(i,j) = c0i
219 
220  !-----------------------------------------------------------------
221  ! other miscellaneous fields
222  !-----------------------------------------------------------------
223  strairx(i,j) = c0i ! wind stress, U grid
224  strairy(i,j) = c0i
225 
226  enddo
227  enddo
228 
real(kind=dbl_kind), parameter c0i
real(kind=dbl_kind), dimension(:,:), allocatable, target, save aice
Definition: ice_state.f90:82
Here is the caller graph for this function:

◆ init_flux_ocn()

subroutine ice_flux::init_flux_ocn ( )

Definition at line 239 of file ice_flux.f90.

239 
240 !cdir$ inlinenever init_flux_ocn
241 !
242 ! !DESCRIPTION:
243 !
244 ! Initialize fluxes sent to coupler for use by the ocean model
245 !
246 ! !REVISION HISTORY:
247 !
248 ! author: Elizabeth C. Hunke, LANL
249 !
250 ! !USES:
251 !
252 ! !INPUT/OUTPUT PARAMETERS:
253 !
254 !
255 !EOP
256 !
257  integer (kind=int_kind) :: &
258  & i, j ! horizontal indices
259 
260  !-----------------------------------------------------------------
261  ! fluxes sent
262  !-----------------------------------------------------------------
263 
264  do j = jlo, jhi
265  do i = ilo, ihi
266  fresh(i,j) = c0i
267  fsalt(i,j) = c0i
268  fhnet(i,j) = c0i
269  fswthru(i,j) = c0i
270 
271  qdp(i,j) = c0i
272  hmix(i,j) = c20
273  enddo
274  enddo
275 
real(kind=dbl_kind), parameter c0i
real(kind=dbl_kind), parameter c20
Here is the caller graph for this function:

◆ merge_fluxes()

subroutine ice_flux::merge_fluxes ( integer (kind=int_kind), intent(in)  ni,
real (kind=dbl_kind), dimension(ilo:ihi,jlo:jhi), intent(in)  strxn,
real (kind=dbl_kind), dimension(ilo:ihi,jlo:jhi), intent(in)  stryn,
real (kind=dbl_kind), dimension(ilo:ihi,jlo:jhi), intent(in)  fsensn,
real (kind=dbl_kind), dimension(ilo:ihi,jlo:jhi), intent(in)  flatn,
real (kind=dbl_kind), dimension(ilo:ihi,jlo:jhi), intent(in)  fswabsn,
real (kind=dbl_kind), dimension(ilo:ihi,jlo:jhi), intent(in)  flwoutn,
real (kind=dbl_kind), dimension(ilo:ihi,jlo:jhi), intent(in)  evapn,
real (kind=dbl_kind), dimension(ilo:ihi,jlo:jhi), intent(in)  Trefn,
real (kind=dbl_kind), dimension(ilo:ihi,jlo:jhi), intent(in)  Qrefn,
real (kind=dbl_kind), dimension(ilo:ihi,jlo:jhi), intent(in)  freshn,
real (kind=dbl_kind), dimension(ilo:ihi,jlo:jhi), intent(in)  fsaltn,
real (kind=dbl_kind), dimension(ilo:ihi,jlo:jhi), intent(in)  fhnetn,
real (kind=dbl_kind), dimension(ilo:ihi,jlo:jhi), intent(in)  fswthrun 
)

Definition at line 339 of file ice_flux.f90.

339 !
340 ! !DESCRIPTION:
341 !
342 ! Aggregates flux information from all ice thickness categories
343 !
344 ! !REVISION HISTORY:
345 !
346 ! author: Elizabeth C. Hunke, LANL
347 !
348 ! !USES:
349 !
350  use ice_state
351 !
352 ! !INPUT/OUTPUT PARAMETERS:
353 !
354  integer (kind=int_kind), intent(in) :: &
355  & ni ! thickness category index
356 
357  real (kind=dbl_kind), dimension(ilo:ihi,jlo:jhi), intent(in) :: &
358  & strxn &! air/ice zonal strss, (N/m**2)
359  &, stryn &! air/ice merdnl strss, (N/m**2)
360  &, fsensn &! sensible heat flx (W/m**2)
361  &, flatn &! latent heat flx (W/m**2)
362  &, fswabsn &! shortwave absorbed heat flx (W/m**2)
363  &, flwoutn &! upwd lw emitted heat flx (W/m**2)
364  &, evapn &! evaporation (kg/m2/s)
365  &, trefn &! air tmp reference level (K)
366  &, qrefn &! air sp hum reference level (kg/kg)
367  &, freshn &! fresh water flux to ocean (kg/m2/s)
368  &, fsaltn &! salt flux to ocean (kg/m2/s)
369  &, fhnetn &! actual ocn/ice heat flx (W/m**2)
370  &, fswthrun ! sw radiation through ice bot (W/m**2)
371 !
372 !EOP
373 !
374  integer (kind=int_kind) :: &
375  & i, j ! horizontal indices
376 
377  do j = jlo,jhi
378  do i = ilo,ihi
379 
380  ! atmo fluxes
381 
382  strairxt(i,j) = strairxt(i,j) + strxn(i,j) * aicen(i,j,ni)
383  strairyt(i,j) = strairyt(i,j) + stryn(i,j) * aicen(i,j,ni)
384  fsens(i,j) = fsens(i,j) + fsensn(i,j) * aicen(i,j,ni)
385  flat(i,j) = flat(i,j) + flatn(i,j) * aicen(i,j,ni)
386  fswabs(i,j) = fswabs(i,j) + fswabsn(i,j) * aicen(i,j,ni)
387  flwout(i,j) = flwout(i,j) + &
388  & (flwoutn(i,j) - (c1i-emissivity)*flw(i,j))* aicen(i,j,ni)
389  evap(i,j) = evap(i,j) + evapn(i,j) * aicen(i,j,ni)
390  tref(i,j) = tref(i,j) + trefn(i,j) * aicen(i,j,ni)
391  qref(i,j) = qref(i,j) + qrefn(i,j) * aicen(i,j,ni)
392 
393  ! ocean fluxes: update both coupler and history variables
394 
395  fresh(i,j) = fresh(i,j) + freshn(i,j) * aicen(i,j,ni)
396  fresh_hist(i,j) = fresh_hist(i,j) + freshn(i,j) * aicen(i,j,ni)
397  fsalt(i,j) = fsalt(i,j) + fsaltn(i,j) * aicen(i,j,ni)
398  fsalt_hist(i,j) = fsalt_hist(i,j) + fsaltn(i,j) * aicen(i,j,ni)
399  fhnet(i,j) = fhnet(i,j) + fhnetn(i,j) * aicen(i,j,ni)
400  fhnet_hist(i,j) = fhnet_hist(i,j) + fhnetn(i,j) * aicen(i,j,ni)
401  fswthru(i,j) = fswthru(i,j) + fswthrun(i,j) * aicen(i,j,ni)
402  fswthru_hist(i,j) = fswthru_hist(i,j) &
403  & + fswthrun(i,j) * aicen(i,j,ni)
404  enddo ! i
405  enddo ! j
406 
real(kind=dbl_kind), parameter emissivity
real(kind=dbl_kind), dimension(:,:,:), allocatable, target, save aicen
Definition: ice_state.f90:97
real(kind=dbl_kind), parameter c1i
Here is the caller graph for this function:

Variable Documentation

◆ congel

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::congel

Definition at line 140 of file ice_flux.f90.

140  real (kind=dbl_kind),dimension (:,:),allocatable,save :: &
141  & congel &! basal ice growth (m/step-->cm/day)
142  &, frazil &! frazil ice growth (m/step-->cm/day)
143  &, snoice &! snow-ice formation (m/step-->cm/day)
144  &, meltt &! top ice melt (m/step-->cm/day)
145  &, meltb &! basal ice melt (m/step-->cm/day)
146  &, meltl &! lateral ice melt (m/step-->cm/day)
147  &, daidtt &! ice area tendency thermo. (s^-1)
148  &, dvidtt &! ice volume tendency thermo. (m/s)
149  &, mlt_onset &! day of year that sfc melting begins
150  &, frz_onset &! day of year that freezing begins (congel or frazil)
151 
152  ! NOTE: The following ocean diagnostic fluxes measure
153  ! the same thing as their coupler counterparts but over
154  ! different time intervals. The coupler variables are
155  ! computed from one to_coupler call to the next, whereas
156  ! the diagnostic variables are computed over a time step.
157  &, fresh_hist &! fresh water flux to ocean (kg/m^2/s)
158  &, fsalt_hist &! salt flux to ocean (kg/m^2/s)
159  &, fhnet_hist &! net heat flux to ocean (W/m^2)
160  &, fswthru_hist ! shortwave penetrating to ocean (W/m^2)

◆ daidtd

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::daidtd

Definition at line 55 of file ice_flux.f90.

◆ daidtt

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::daidtt

Definition at line 140 of file ice_flux.f90.

◆ dvidtd

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::dvidtd

Definition at line 55 of file ice_flux.f90.

◆ dvidtt

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::dvidtt

Definition at line 140 of file ice_flux.f90.

◆ evap

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::evap

Definition at line 120 of file ice_flux.f90.

◆ fhnet

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::fhnet

Definition at line 120 of file ice_flux.f90.

◆ fhnet_hist

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::fhnet_hist

Definition at line 140 of file ice_flux.f90.

◆ flat

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::flat

Definition at line 120 of file ice_flux.f90.

◆ flw

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::flw

Definition at line 91 of file ice_flux.f90.

◆ flwout

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::flwout

Definition at line 120 of file ice_flux.f90.

◆ frain

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::frain

Definition at line 91 of file ice_flux.f90.

◆ frazil

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::frazil

Definition at line 140 of file ice_flux.f90.

◆ fresh

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::fresh

Definition at line 120 of file ice_flux.f90.

◆ fresh_hist

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::fresh_hist

Definition at line 140 of file ice_flux.f90.

◆ frz_onset

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::frz_onset

Definition at line 140 of file ice_flux.f90.

◆ frzmlt

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::frzmlt

Definition at line 91 of file ice_flux.f90.

◆ fsalt

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::fsalt

Definition at line 120 of file ice_flux.f90.

◆ fsalt_hist

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::fsalt_hist

Definition at line 140 of file ice_flux.f90.

◆ fsens

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::fsens

Definition at line 120 of file ice_flux.f90.

120  real (kind=dbl_kind), dimension (:,:),allocatable,save :: &
121 
122  & fsens &! sensible heat flux (W/m^2)
123  &, flat &! latent heat flux (W/m^2)
124  &, fswabs &! shortwave flux absorbed in ice and ocean (W/m^2)
125  &, flwout &! outgoing longwave radiation (W/m^2)
126  &, evap &! evaporative water flux (kg/m^2/s)
127  &, tref &! 2m atm reference temperature (K)
128  &, qref &! 2m atm reference sp humidity (kg/kg)
129 
130  ! out to ocean
131 
132  &, fresh & ! fresh water flux to ocean (kg/m^2/s)
133  &, fsalt & ! salt flux to ocean (kg/m^2/s)
134  &, fhnet & ! net heat flux to ocean (W/m^2)
135  &, fswthru ! shortwave penetrating to ocean (W/m^2)

◆ fsnow

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::fsnow

Definition at line 91 of file ice_flux.f90.

◆ fsw

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::fsw

Definition at line 164 of file ice_flux.f90.

164  real (kind=dbl_kind),dimension (:,:),allocatable,save :: &
165  & fsw &! incoming shortwave radiation (W/m^2)
166  &, wind &! wind speed (m/s)
167  &, shcoef &! transfer coefficient for sensible heat
168  &, lhcoef ! transfer coefficient for latent heat

◆ fswabs

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::fswabs

Definition at line 120 of file ice_flux.f90.

◆ fswthru

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::fswthru

Definition at line 120 of file ice_flux.f90.

◆ fswthru_hist

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::fswthru_hist

Definition at line 140 of file ice_flux.f90.

◆ hmix

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::hmix

Definition at line 91 of file ice_flux.f90.

◆ lhcoef

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::lhcoef

Definition at line 164 of file ice_flux.f90.

◆ meltb

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::meltb

Definition at line 140 of file ice_flux.f90.

◆ meltl

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::meltl

Definition at line 140 of file ice_flux.f90.

◆ meltt

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::meltt

Definition at line 140 of file ice_flux.f90.

◆ mlt_onset

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::mlt_onset

Definition at line 140 of file ice_flux.f90.

◆ pott

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::pott

Definition at line 91 of file ice_flux.f90.

◆ qa

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::qa

Definition at line 91 of file ice_flux.f90.

◆ qdp

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::qdp

Definition at line 91 of file ice_flux.f90.

◆ qref

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::qref

Definition at line 120 of file ice_flux.f90.

◆ rhoa

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::rhoa

Definition at line 91 of file ice_flux.f90.

◆ shcoef

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::shcoef

Definition at line 164 of file ice_flux.f90.

◆ snoice

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::snoice

Definition at line 140 of file ice_flux.f90.

◆ ss_tltx

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::ss_tltx

Definition at line 55 of file ice_flux.f90.

55  real (kind=dbl_kind), dimension (:,:),allocatable,save :: &
56  ! real(kind=dbl_kind), dimension (ilo:ihi,jlo:jhi) :: &
57 
58  ! in from ocean
59  & ss_tltx &! sea surface slope, x-direction (m/m)
60  &, ss_tlty &! sea surface slope, y-direction
61  &, uocn &! ocean current, x-direction (m/s)
62  &, vocn &! ocean current, y-direction (m/s)
63 
64  ! out to atmos phere
65 
66  &, strairxt &! stress on ice by air, x-direction
67  &, strairyt &! stress on ice by air, y-direction
68 
69  ! out to ocean T-cell (kg/m s^2)
70  &, strocnxt &! ice-ocean stress, x-direction
71  &, strocnyt &! ice-ocean stress, y-direction
72 
73  ! diagnostic
74  &, daidtd &! &ice area tendency due to transport (s^-1)
75  &, dvidtd &! ice volume tendency due to transport (m/s)
76 
77  ! internal U-cell (kg/m s^2)
78  &, strocnx &! ice-ocean stress, x-direction
79  &, strocny &! ice-ocean stress, y-direction
80  &, strairx &! stress on ice by air, x-direction
81  &, strairy &! stress on ice by air, y-direction
82  &, strtltx &! stress due to sea surface slope, x-direction
83  &, strtlty ! stress due to sea surface slope, y-direction

◆ ss_tlty

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::ss_tlty

Definition at line 55 of file ice_flux.f90.

◆ sss

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::sss

Definition at line 91 of file ice_flux.f90.

◆ sst

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::sst

Definition at line 91 of file ice_flux.f90.

◆ strairx

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::strairx

Definition at line 55 of file ice_flux.f90.

◆ strairxt

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::strairxt

Definition at line 55 of file ice_flux.f90.

◆ strairy

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::strairy

Definition at line 55 of file ice_flux.f90.

◆ strairyt

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::strairyt

Definition at line 55 of file ice_flux.f90.

◆ strocnx

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::strocnx

Definition at line 55 of file ice_flux.f90.

◆ strocnxt

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::strocnxt

Definition at line 55 of file ice_flux.f90.

◆ strocny

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::strocny

Definition at line 55 of file ice_flux.f90.

◆ strocnyt

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::strocnyt

Definition at line 55 of file ice_flux.f90.

◆ strtltx

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::strtltx

Definition at line 55 of file ice_flux.f90.

◆ strtlty

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::strtlty

Definition at line 55 of file ice_flux.f90.

◆ swidf

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::swidf

Definition at line 91 of file ice_flux.f90.

◆ swidr

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::swidr

Definition at line 91 of file ice_flux.f90.

◆ swvdf

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::swvdf

Definition at line 91 of file ice_flux.f90.

◆ swvdr

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::swvdr

Definition at line 91 of file ice_flux.f90.

◆ tair

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::tair

Definition at line 91 of file ice_flux.f90.

◆ tf

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::tf

Definition at line 91 of file ice_flux.f90.

◆ tref

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::tref

Definition at line 120 of file ice_flux.f90.

◆ uatm

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::uatm

Definition at line 91 of file ice_flux.f90.

◆ uocn

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::uocn

Definition at line 55 of file ice_flux.f90.

◆ vatm

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::vatm

Definition at line 91 of file ice_flux.f90.

◆ vocn

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::vocn

Definition at line 55 of file ice_flux.f90.

◆ wind

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::wind

Definition at line 164 of file ice_flux.f90.

◆ zlvl

real (kind=dbl_kind), dimension (:,:), allocatable, save ice_flux::zlvl

Definition at line 91 of file ice_flux.f90.

91  real (kind=dbl_kind), dimension (:,:),allocatable,save :: &
92 
93  & zlvl & ! atm level height (m)
94  &, uatm & ! wind speed (m/s)
95  &, vatm &
96  &, pott & ! air potential temperature (K)
97  &, tair & ! air temperature (K)
98  &, qa & ! specific humidity (kg/kg)
99  &, rhoa & ! air density (kg/m^3)
100  &, swvdr & ! sw down, visible, direct (W/m^2)
101  &, swvdf & ! sw down, visible, diffuse (W/m^2)
102  &, swidr & ! sw down, near IR, direct (W/m^2)
103  &, swidf & ! sw down, near IR, diffuse (W/m^2)
104  &, flw & ! incoming longwave radiation (W/m^2)
105  &, frain & ! rainfall rate (kg/m^2 s)
106  &, fsnow & ! snowfall rate (kg/m^2 s)
107 
108  ! in from ocean
109 
110  &, frzmlt & ! freezing/melting potential (W/m^2)
111  &, sss & ! sea surface salinity (ppt)
112  &, sst & ! sea surface temperature (C)
113  &, tf & ! freezing temperature (C)
114  &, qdp & ! deep ocean heat flux (W/m^2)
115  &, hmix ! mixed layer depth (m)