Functions/Subroutines | |
subroutine | init_transport |
subroutine | transport_remap (dt) |
subroutine | transport_upwind (dt) |
subroutine | state_to_tracers (nx_block, ny_block, aice0, aicen, trcrn, vicen, vsnon, eicen, esnon, aim, trm) |
subroutine | tracers_to_state (nx_block, ny_block, aim, trm, aice0, aicen, trcrn, vicen, vsnon, eicen, esnon) |
subroutine | global_conservation (l_stop, asum_init, asum_final, atsum_init, atsum_final) |
subroutine | local_max_min (nx_block, ny_block, ilo, ihi, jlo, jhi, trm, tmin, tmax, aimask, trmask) |
subroutine | quasilocal_max_min (nx_block, ny_block, ilo, ihi, jlo, jhi, tmin, tmax) |
subroutine | check_monotonicity (nx_block, ny_block, ilo, ihi, jlo, jhi, iblk, tmin, tmax, aim, trm, l_stop, istop, jstop) |
subroutine | state_to_work (nx_block, ny_block, narr, trcr_depend, aicen, trcrn, vicen, vsnon, aice0, works) |
subroutine | work_to_state (nx_block, ny_block, narr, trcr_depend, aicen, trcrn, vicen, vsnon, aice0, works) |
subroutine | upwind_field (nx_block, ny_block, ilo, ihi, jlo, jhi, dt, narrays, phi, uee, vnn, HTE, HTN, tarea) |
Variables | |
character(len=char_len) | advection |
logical, parameter | l_fixed_area = .false. |
integer(kind=int_kind), parameter | ntrace = 2+ntrcr+nilyr+nslyr |
integer(kind=int_kind), dimension(ntrace) | tracer_type |
integer(kind=int_kind), dimension(ntrace) | depend |
logical(kind=log_kind), dimension(ntrace) | has_dependents |
integer(kind=int_kind), parameter | integral_order = 3 |
logical(kind=log_kind), parameter | l_dp_midpt = .true. |
subroutine ice_transport_driver::check_monotonicity | ( | integer (kind=int_kind),intent(in) | nx_block, | |
integer (kind=int_kind),intent(in) | ny_block, | |||
integer (kind=int_kind),intent(in) | ilo, | |||
integer (kind=int_kind),intent(in) | ihi, | |||
integer (kind=int_kind),intent(in) | jlo, | |||
integer (kind=int_kind),intent(in) | jhi, | |||
integer (kind=int_kind),intent(in) | iblk, | |||
real (kind=dbl_kind),dimension (nx_block,ny_block,ntrace),intent(in) | tmin, | |||
real (kind=dbl_kind),dimension (nx_block,ny_block,ntrace),intent(in) | tmax, | |||
real (kind=dbl_kind),dimension (nx_block,ny_block),intent(in) | aim, | |||
real (kind=dbl_kind),dimension (nx_block,ny_block,ntrace),intent(in) | trm, | |||
logical (kind=log_kind),intent(inout) | l_stop, | |||
integer (kind=int_kind),intent(inout) | istop, | |||
integer (kind=int_kind),intent(inout) | jstop | |||
) |
Definition at line 1443 of file ice_transport_driver.F90.
subroutine ice_transport_driver::global_conservation | ( | logical (kind=log_kind),intent(inout) | l_stop, | |
real (kind=dbl_kind),intent(in) | asum_init, | |||
real (kind=dbl_kind),intent(in) | asum_final, | |||
real (kind=dbl_kind),dimension(ntrace),intent(in),optional | atsum_init, | |||
real (kind=dbl_kind),dimension(ntrace),intent(in),optional | atsum_final | |||
) |
Definition at line 1174 of file ice_transport_driver.F90.
subroutine ice_transport_driver::init_transport | ( | ) |
Definition at line 77 of file ice_transport_driver.F90.
subroutine ice_transport_driver::local_max_min | ( | integer (kind=int_kind),intent(in) | nx_block, | |
integer (kind=int_kind),intent(in) | ny_block, | |||
integer (kind=int_kind),intent(in) | ilo, | |||
integer (kind=int_kind),intent(in) | ihi, | |||
integer (kind=int_kind),intent(in) | jlo, | |||
integer (kind=int_kind),intent(in) | jhi, | |||
real (kind=dbl_kind),dimension (nx_block,ny_block,ntrace),intent(in) | trm, | |||
real (kind=dbl_kind),dimension (nx_block,ny_block,ntrace),intent(out) | tmin, | |||
real (kind=dbl_kind),dimension (nx_block,ny_block,ntrace),intent(out) | tmax, | |||
real (kind=dbl_kind),dimension(nx_block,ny_block),intent(in) | aimask, | |||
real (kind=dbl_kind),dimension (nx_block,ny_block,ntrace),intent(in) | trmask | |||
) |
Definition at line 1254 of file ice_transport_driver.F90.
subroutine ice_transport_driver::quasilocal_max_min | ( | integer (kind=int_kind),intent(in) | nx_block, | |
integer (kind=int_kind),intent(in) | ny_block, | |||
integer (kind=int_kind),intent(in) | ilo, | |||
integer (kind=int_kind),intent(in) | ihi, | |||
integer (kind=int_kind),intent(in) | jlo, | |||
integer (kind=int_kind),intent(in) | jhi, | |||
real (kind=dbl_kind),dimension (nx_block,ny_block,ntrace),intent(inout) | tmin, | |||
real (kind=dbl_kind),dimension (nx_block,ny_block,ntrace),intent(inout) | tmax | |||
) |
Definition at line 1380 of file ice_transport_driver.F90.
subroutine ice_transport_driver::state_to_tracers | ( | integer (kind=int_kind),intent(in) | nx_block, | |
integer (kind=int_kind),intent(in) | ny_block, | |||
real (kind=dbl_kind),dimension (nx_block,ny_block),intent(in) | aice0, | |||
real (kind=dbl_kind),dimension (nx_block,ny_block,ncat),intent(in) | aicen, | |||
real (kind=dbl_kind),dimension (nx_block,ny_block,ntrcr,ncat),intent(in) | trcrn, | |||
real (kind=dbl_kind),dimension (nx_block,ny_block,ncat),intent(in) | vicen, | |||
real (kind=dbl_kind),dimension (nx_block,ny_block,ncat),intent(in) | vsnon, | |||
real (kind=dbl_kind),dimension (nx_block,ny_block,ntilyr),intent(in) | eicen, | |||
real (kind=dbl_kind),dimension (nx_block,ny_block,ntslyr),intent(in) | esnon, | |||
real (kind=dbl_kind),dimension (nx_block,ny_block,0:ncat),intent(out) | aim, | |||
real (kind=dbl_kind),dimension (nx_block,ny_block,ntrace,ncat),intent(out) | trm | |||
) |
Definition at line 874 of file ice_transport_driver.F90.
subroutine ice_transport_driver::state_to_work | ( | integer (kind=int_kind),intent(in) | nx_block, | |
integer (kind=int_kind),intent(in) | ny_block, | |||
integer (kind=int_kind),intent(in) | narr, | |||
integer (kind=int_kind),dimension (ntrcr),intent(in) | trcr_depend, | |||
real (kind=dbl_kind),dimension (nx_block,ny_block,ncat),intent(in) | aicen, | |||
real (kind=dbl_kind),dimension (nx_block,ny_block,ntrcr,ncat),intent(in) | trcrn, | |||
real (kind=dbl_kind),dimension (nx_block,ny_block,ncat),intent(in) | vicen, | |||
real (kind=dbl_kind),dimension (nx_block,ny_block,ncat),intent(in) | vsnon, | |||
real (kind=dbl_kind),dimension (nx_block,ny_block),intent(in) | aice0, | |||
real (kind=dbl_kind),dimension(nx_block,ny_block,narr),intent(out) | works | |||
) |
Definition at line 1597 of file ice_transport_driver.F90.
subroutine ice_transport_driver::tracers_to_state | ( | integer (kind=int_kind),intent(in) | nx_block, | |
integer (kind=int_kind),intent(in) | ny_block, | |||
real (kind=dbl_kind),dimension (nx_block,ny_block,0:ncat),intent(in) | aim, | |||
real (kind=dbl_kind),dimension (nx_block,ny_block,ntrace,ncat),intent(in) | trm, | |||
real (kind=dbl_kind),dimension (nx_block,ny_block),intent(inout) | aice0, | |||
real (kind=dbl_kind),dimension (nx_block,ny_block,ncat),intent(inout) | aicen, | |||
real (kind=dbl_kind),dimension (nx_block,ny_block,ntrcr,ncat),intent(inout) | trcrn, | |||
real (kind=dbl_kind),dimension (nx_block,ny_block,ncat),intent(inout) | vicen, | |||
real (kind=dbl_kind),dimension (nx_block,ny_block,ncat),intent(inout) | vsnon, | |||
real (kind=dbl_kind),dimension (nx_block,ny_block,ntilyr),intent(inout) | eicen, | |||
real (kind=dbl_kind),dimension (nx_block,ny_block,ntslyr),intent(inout) | esnon | |||
) |
Definition at line 1042 of file ice_transport_driver.F90.
subroutine ice_transport_driver::transport_remap | ( | real (kind=dbl_kind),intent(in) | dt | ) |
Definition at line 169 of file ice_transport_driver.F90.
subroutine ice_transport_driver::transport_upwind | ( | real (kind=dbl_kind),intent(in) | dt | ) |
Definition at line 701 of file ice_transport_driver.F90.
subroutine ice_transport_driver::upwind_field | ( | integer (kind=int_kind),intent(in) | nx_block, | |
integer (kind=int_kind),intent(in) | ny_block, | |||
integer (kind=int_kind),intent(in) | ilo, | |||
integer (kind=int_kind),intent(in) | ihi, | |||
integer (kind=int_kind),intent(in) | jlo, | |||
integer (kind=int_kind),intent(in) | jhi, | |||
real (kind=dbl_kind),intent(in) | dt, | |||
integer (kind=int_kind),intent(in) | narrays, | |||
real (kind=dbl_kind),dimension(nx_block,ny_block,narrays),intent(inout) | phi, | |||
real (kind=dbl_kind),dimension(nx_block,ny_block),intent(in) | uee, | |||
real (kind=dbl_kind),dimension(nx_block,ny_block),intent(in) | vnn, | |||
real (kind=dbl_kind),dimension(nx_block,ny_block),intent(in) | HTE, | |||
real (kind=dbl_kind),dimension(nx_block,ny_block),intent(in) | HTN, | |||
real (kind=dbl_kind),dimension(nx_block,ny_block),intent(in) | tarea | |||
) |
Definition at line 1819 of file ice_transport_driver.F90.
subroutine ice_transport_driver::work_to_state | ( | integer (kind=int_kind),intent(in) | nx_block, | |
integer (kind=int_kind),intent(in) | ny_block, | |||
integer (kind=int_kind),intent(in) | narr, | |||
integer (kind=int_kind),dimension (ntrcr),intent(in) | trcr_depend, | |||
real (kind=dbl_kind),dimension (nx_block,ny_block,ncat),intent(out) | aicen, | |||
real (kind=dbl_kind),dimension (nx_block,ny_block,ntrcr,ncat),intent(out) | trcrn, | |||
real (kind=dbl_kind),dimension (nx_block,ny_block,ncat),intent(out) | vicen, | |||
real (kind=dbl_kind),dimension (nx_block,ny_block,ncat),intent(out) | vsnon, | |||
real (kind=dbl_kind),dimension (nx_block,ny_block),intent(out) | aice0, | |||
real (kind=dbl_kind),dimension (nx_block,ny_block,narr),intent(in) | works | |||
) |
Definition at line 1711 of file ice_transport_driver.F90.
character (len=char_len) ice_transport_driver::advection |
Definition at line 36 of file ice_transport_driver.F90.
integer (kind=int_kind),dimension (ntrace) ice_transport_driver::depend |
Definition at line 50 of file ice_transport_driver.F90.
logical (kind=log_kind),dimension (ntrace) ice_transport_driver::has_dependents |
Definition at line 54 of file ice_transport_driver.F90.
integer (kind=int_kind),parameter ice_transport_driver::integral_order = 3 |
Definition at line 57 of file ice_transport_driver.F90.
logical (kind=log_kind),parameter ice_transport_driver::l_dp_midpt = .true. |
Definition at line 61 of file ice_transport_driver.F90.
logical,parameter ice_transport_driver::l_fixed_area = .false. |
Definition at line 41 of file ice_transport_driver.F90.
integer (kind=int_kind),parameter ice_transport_driver::ntrace = 2+ntrcr+nilyr+nslyr |
Definition at line 47 of file ice_transport_driver.F90.
integer (kind=int_kind),dimension (ntrace) ice_transport_driver::tracer_type |
Definition at line 50 of file ice_transport_driver.F90.