|
SICOPOLIS V3.3
|
|
SICOPOLIS V3.3
|
Computation of temperature, water content and age with the enthalpy method. More...
Functions/Subroutines | |
| subroutine, public | calc_temp_enth (dxi, deta, dzeta_c, dzeta_t, dzeta_r, dtime_temp) |
| Main subroutine of calc_temp_enth_m: Computation of temperature, water content and age with the enthalpy method. More... | |
| subroutine | calc_temp_enth_1_a (at1, at2_1, at2_2, at3_1, at3_2, at4_1, at4_2, at5, at6, at7, atr1, acb1, acb2, acb3, acb4, alb1, ai1, ai2, dtime_temp, dtt_2dxi, dtt_2deta, i, j, ct1, ct2, ct3, ct4, ce5, ce6, ce7, ctr1, ccbe1, ccb2, ccb3, ccb4, clb1, ct1_sg, ct2_sg, ct3_sg, ct4_sg, adv_vert_sg, abs_adv_vert_sg, ci1, ci2, dtt_dxi, dtt_deta) |
| Computation of temperature and age for a cold ice column with the enthalpy method: Abbreviations. More... | |
| subroutine | calc_temp_enth_1_b (ctr1, clb1, i, j, lgs_a0, lgs_a1, lgs_a2, lgs_b) |
| Computation of temperature and age for a cold ice column with the enthalpy method: Set-up of the equations for the bedrock temperature. More... | |
| subroutine | calc_temp_enth_1_d (ct1, ct2, ct3, ct4, ci1, ci2, ct1_sg, ct2_sg, ct3_sg, ct4_sg, adv_vert_sg, abs_adv_vert_sg, dtime_temp, dtt_dxi, dtt_deta, dtt_2dxi, dtt_2deta, i, j, lgs_a0, lgs_a1, lgs_a2, lgs_b) |
| Computation of temperature and age for a cold ice column with the enthalpy method: Set-up of the equations for the age of ice. More... | |
| subroutine | calc_temp_enth_2_a1 (at1, at2_1, at2_2, at3_1, at3_2, at4_1, at4_2, at5, atr1, alb1, ai1, aqtlde, dtime_temp, dtt_2dxi, dtt_2deta, i, j, ct1, ct2, ct3, ct4, ce5, ctr1, clb1, ct1_sg, ct2_sg, ct3_sg, ct4_sg, adv_vert_sg, abs_adv_vert_sg, ci1, cqtlde, dtt_dxi, dtt_deta) |
| Computation of temperature and age for an ice column with a temperate base with the enthalpy method: Abbreviations I. More... | |
| subroutine | calc_temp_enth_2_b (ctr1, clb1, i, j, lgs_a0, lgs_a1, lgs_a2, lgs_b) |
| Computation of temperature and age for an ice column with a temperate base with the enthalpy method: Set-up of the equations for the bedrock temperature. More... | |
| subroutine | calc_temp_enth_2_d (ct1, ct2, ct3, ct4, ci1, ci2, ct1_sg, ct2_sg, ct3_sg, ct4_sg, adv_vert_sg, abs_adv_vert_sg, dtime_temp, dtt_dxi, dtt_deta, dtt_2dxi, dtt_2deta, i, j, lgs_a0, lgs_a1, lgs_a2, lgs_b) |
| Computation of temperature and age for an ice column with a temperate base with the enthalpy method: Set-up of the equations for the age of ice. More... | |
| subroutine | calc_temp_enth_ssa (at1, at2_1, at2_2, at3_1, at3_2, at4_1, at4_2, at5, at6, at7, atr1, alb1, ai1, ai2, dtime_temp, dtt_2dxi, dtt_2deta, i, j) |
| Computation of temperature and age for ice shelves (floating ice) with the enthalpy method. More... | |
Computation of temperature, water content and age with the enthalpy method.
| subroutine, public calc_temp_enth_m::calc_temp_enth | ( | real(dp), intent(in) | dxi, |
| real(dp), intent(in) | deta, | ||
| real(dp), intent(in) | dzeta_c, | ||
| real(dp), intent(in) | dzeta_t, | ||
| real(dp), intent(in) | dzeta_r, | ||
| real(dp), intent(in) | dtime_temp | ||
| ) |
Main subroutine of calc_temp_enth_m: Computation of temperature, water content and age with the enthalpy method.
Definition at line 54 of file calc_temp_enth_m.F90.
| subroutine calc_temp_enth_m::calc_temp_enth_1_a | ( | real(dp), dimension(0:kcmax), intent(in) | at1, |
| real(dp), dimension(0:kcmax), intent(in) | at2_1, | ||
| real(dp), dimension(0:kcmax), intent(in) | at2_2, | ||
| real(dp), dimension(0:kcmax), intent(in) | at3_1, | ||
| real(dp), dimension(0:kcmax), intent(in) | at3_2, | ||
| real(dp), dimension(0:kcmax), intent(in) | at4_1, | ||
| real(dp), dimension(0:kcmax), intent(in) | at4_2, | ||
| real(dp), dimension(0:kcmax), intent(in) | at5, | ||
| real(dp), dimension(0:kcmax), intent(in) | at6, | ||
| real(dp), intent(in) | at7, | ||
| real(dp), intent(in) | atr1, | ||
| real(dp), intent(in) | acb1, | ||
| real(dp), intent(in) | acb2, | ||
| real(dp), intent(in) | acb3, | ||
| real(dp), intent(in) | acb4, | ||
| real(dp), intent(in) | alb1, | ||
| real(dp), dimension(0:kcmax), intent(in) | ai1, | ||
| real(dp), dimension(0:kcmax), intent(in) | ai2, | ||
| real(dp), intent(in) | dtime_temp, | ||
| real(dp), intent(in) | dtt_2dxi, | ||
| real(dp), intent(in) | dtt_2deta, | ||
| integer(i4b), intent(in) | i, | ||
| integer(i4b), intent(in) | j, | ||
| real(dp), dimension(0:kcmax), intent(out) | ct1, | ||
| real(dp), dimension(0:kcmax), intent(out) | ct2, | ||
| real(dp), dimension(0:kcmax), intent(out) | ct3, | ||
| real(dp), dimension(0:kcmax), intent(out) | ct4, | ||
| real(dp), dimension(0:kcmax), intent(out) | ce5, | ||
| real(dp), dimension(0:kcmax), intent(out) | ce6, | ||
| real(dp), dimension(0:kcmax), intent(out) | ce7, | ||
| real(dp), intent(out) | ctr1, | ||
| real(dp), intent(out) | ccbe1, | ||
| real(dp), intent(out) | ccb2, | ||
| real(dp), intent(out) | ccb3, | ||
| real(dp), intent(out) | ccb4, | ||
| real(dp), intent(out) | clb1, | ||
| real(dp), dimension(0:kcmax), intent(out) | ct1_sg, | ||
| real(dp), dimension(0:kcmax), intent(out) | ct2_sg, | ||
| real(dp), dimension(0:kcmax), intent(out) | ct3_sg, | ||
| real(dp), dimension(0:kcmax), intent(out) | ct4_sg, | ||
| real(dp), dimension(0:kcmax), intent(out) | adv_vert_sg, | ||
| real(dp), dimension(0:kcmax), intent(out) | abs_adv_vert_sg, | ||
| real(dp), dimension(0:kcmax), intent(out) | ci1, | ||
| real(dp), dimension(0:kcmax), intent(out) | ci2, | ||
| real(dp), intent(out) | dtt_dxi, | ||
| real(dp), intent(out) | dtt_deta | ||
| ) |
Computation of temperature and age for a cold ice column with the enthalpy method: Abbreviations.
Definition at line 833 of file calc_temp_enth_m.F90.
| subroutine calc_temp_enth_m::calc_temp_enth_1_b | ( | real(dp), intent(in) | ctr1, |
| real(dp), intent(in) | clb1, | ||
| integer(i4b), intent(in) | i, | ||
| integer(i4b), intent(in) | j, | ||
| real(dp), dimension(0:kcmax+ktmax+krmax+imax+jmax), intent(out) | lgs_a0, | ||
| real(dp), dimension(0:kcmax+ktmax+krmax+imax+jmax), intent(out) | lgs_a1, | ||
| real(dp), dimension(0:kcmax+ktmax+krmax+imax+jmax), intent(out) | lgs_a2, | ||
| real(dp), dimension(0:kcmax+ktmax+krmax+imax+jmax), intent(out) | lgs_b | ||
| ) |
Computation of temperature and age for a cold ice column with the enthalpy method: Set-up of the equations for the bedrock temperature.
Definition at line 1019 of file calc_temp_enth_m.F90.
| subroutine calc_temp_enth_m::calc_temp_enth_1_d | ( | real(dp), dimension(0:kcmax), intent(in) | ct1, |
| real(dp), dimension(0:kcmax), intent(in) | ct2, | ||
| real(dp), dimension(0:kcmax), intent(in) | ct3, | ||
| real(dp), dimension(0:kcmax), intent(in) | ct4, | ||
| real(dp), dimension(0:kcmax), intent(in) | ci1, | ||
| real(dp), dimension(0:kcmax), intent(in) | ci2, | ||
| real(dp), dimension(0:kcmax), intent(in) | ct1_sg, | ||
| real(dp), dimension(0:kcmax), intent(in) | ct2_sg, | ||
| real(dp), dimension(0:kcmax), intent(in) | ct3_sg, | ||
| real(dp), dimension(0:kcmax), intent(in) | ct4_sg, | ||
| real(dp), dimension(0:kcmax), intent(in) | adv_vert_sg, | ||
| real(dp), dimension(0:kcmax), intent(in) | abs_adv_vert_sg, | ||
| real(dp), intent(in) | dtime_temp, | ||
| real(dp), intent(in) | dtt_dxi, | ||
| real(dp), intent(in) | dtt_deta, | ||
| real(dp), intent(in) | dtt_2dxi, | ||
| real(dp), intent(in) | dtt_2deta, | ||
| integer(i4b), intent(in) | i, | ||
| integer(i4b), intent(in) | j, | ||
| real(dp), dimension(0:kcmax+ktmax+krmax+imax+jmax), intent(out) | lgs_a0, | ||
| real(dp), dimension(0:kcmax+ktmax+krmax+imax+jmax), intent(out) | lgs_a1, | ||
| real(dp), dimension(0:kcmax+ktmax+krmax+imax+jmax), intent(out) | lgs_a2, | ||
| real(dp), dimension(0:kcmax+ktmax+krmax+imax+jmax), intent(out) | lgs_b | ||
| ) |
Computation of temperature and age for a cold ice column with the enthalpy method: Set-up of the equations for the age of ice.
Definition at line 1231 of file calc_temp_enth_m.F90.
| subroutine calc_temp_enth_m::calc_temp_enth_2_a1 | ( | real(dp), dimension(0:kcmax), intent(in) | at1, |
| real(dp), dimension(0:kcmax), intent(in) | at2_1, | ||
| real(dp), dimension(0:kcmax), intent(in) | at2_2, | ||
| real(dp), dimension(0:kcmax), intent(in) | at3_1, | ||
| real(dp), dimension(0:kcmax), intent(in) | at3_2, | ||
| real(dp), dimension(0:kcmax), intent(in) | at4_1, | ||
| real(dp), dimension(0:kcmax), intent(in) | at4_2, | ||
| real(dp), dimension(0:kcmax), intent(in) | at5, | ||
| real(dp), intent(in) | atr1, | ||
| real(dp), intent(in) | alb1, | ||
| real(dp), dimension(0:kcmax), intent(in) | ai1, | ||
| real(dp), dimension(0:kcmax), intent(in) | aqtlde, | ||
| real(dp), intent(in) | dtime_temp, | ||
| real(dp), intent(in) | dtt_2dxi, | ||
| real(dp), intent(in) | dtt_2deta, | ||
| integer(i4b), intent(in) | i, | ||
| integer(i4b), intent(in) | j, | ||
| real(dp), dimension(0:kcmax), intent(out) | ct1, | ||
| real(dp), dimension(0:kcmax), intent(out) | ct2, | ||
| real(dp), dimension(0:kcmax), intent(out) | ct3, | ||
| real(dp), dimension(0:kcmax), intent(out) | ct4, | ||
| real(dp), dimension(0:kcmax), intent(out) | ce5, | ||
| real(dp), intent(out) | ctr1, | ||
| real(dp), intent(out) | clb1, | ||
| real(dp), dimension(0:kcmax), intent(out) | ct1_sg, | ||
| real(dp), dimension(0:kcmax), intent(out) | ct2_sg, | ||
| real(dp), dimension(0:kcmax), intent(out) | ct3_sg, | ||
| real(dp), dimension(0:kcmax), intent(out) | ct4_sg, | ||
| real(dp), dimension(0:kcmax), intent(out) | adv_vert_sg, | ||
| real(dp), dimension(0:kcmax), intent(out) | abs_adv_vert_sg, | ||
| real(dp), dimension(0:kcmax), intent(out) | ci1, | ||
| real(dp), dimension(0:kcmax), intent(out) | cqtlde, | ||
| real(dp), intent(out) | dtt_dxi, | ||
| real(dp), intent(out) | dtt_deta | ||
| ) |
Computation of temperature and age for an ice column with a temperate base with the enthalpy method: Abbreviations I.
Definition at line 1680 of file calc_temp_enth_m.F90.
| subroutine calc_temp_enth_m::calc_temp_enth_2_b | ( | real(dp), intent(in) | ctr1, |
| real(dp), intent(in) | clb1, | ||
| integer(i4b), intent(in) | i, | ||
| integer(i4b), intent(in) | j, | ||
| real(dp), dimension(0:kcmax+ktmax+krmax+imax+jmax), intent(out) | lgs_a0, | ||
| real(dp), dimension(0:kcmax+ktmax+krmax+imax+jmax), intent(out) | lgs_a1, | ||
| real(dp), dimension(0:kcmax+ktmax+krmax+imax+jmax), intent(out) | lgs_a2, | ||
| real(dp), dimension(0:kcmax+ktmax+krmax+imax+jmax), intent(out) | lgs_b | ||
| ) |
Computation of temperature and age for an ice column with a temperate base with the enthalpy method: Set-up of the equations for the bedrock temperature.
Definition at line 1876 of file calc_temp_enth_m.F90.
| subroutine calc_temp_enth_m::calc_temp_enth_2_d | ( | real(dp), dimension(0:kcmax), intent(in) | ct1, |
| real(dp), dimension(0:kcmax), intent(in) | ct2, | ||
| real(dp), dimension(0:kcmax), intent(in) | ct3, | ||
| real(dp), dimension(0:kcmax), intent(in) | ct4, | ||
| real(dp), dimension(0:kcmax), intent(in) | ci1, | ||
| real(dp), dimension(0:kcmax), intent(in) | ci2, | ||
| real(dp), dimension(0:kcmax), intent(in) | ct1_sg, | ||
| real(dp), dimension(0:kcmax), intent(in) | ct2_sg, | ||
| real(dp), dimension(0:kcmax), intent(in) | ct3_sg, | ||
| real(dp), dimension(0:kcmax), intent(in) | ct4_sg, | ||
| real(dp), dimension(0:kcmax), intent(in) | adv_vert_sg, | ||
| real(dp), dimension(0:kcmax), intent(in) | abs_adv_vert_sg, | ||
| real(dp), intent(in) | dtime_temp, | ||
| real(dp), intent(in) | dtt_dxi, | ||
| real(dp), intent(in) | dtt_deta, | ||
| real(dp), intent(in) | dtt_2dxi, | ||
| real(dp), intent(in) | dtt_2deta, | ||
| integer(i4b), intent(in) | i, | ||
| integer(i4b), intent(in) | j, | ||
| real(dp), dimension(0:kcmax+ktmax+krmax+imax+jmax), intent(out) | lgs_a0, | ||
| real(dp), dimension(0:kcmax+ktmax+krmax+imax+jmax), intent(out) | lgs_a1, | ||
| real(dp), dimension(0:kcmax+ktmax+krmax+imax+jmax), intent(out) | lgs_a2, | ||
| real(dp), dimension(0:kcmax+ktmax+krmax+imax+jmax), intent(out) | lgs_b | ||
| ) |
Computation of temperature and age for an ice column with a temperate base with the enthalpy method: Set-up of the equations for the age of ice.
Definition at line 2126 of file calc_temp_enth_m.F90.
| subroutine calc_temp_enth_m::calc_temp_enth_ssa | ( | real(dp), dimension(0:kcmax), intent(in) | at1, |
| real(dp), dimension(0:kcmax), intent(in) | at2_1, | ||
| real(dp), dimension(0:kcmax), intent(in) | at2_2, | ||
| real(dp), dimension(0:kcmax), intent(in) | at3_1, | ||
| real(dp), dimension(0:kcmax), intent(in) | at3_2, | ||
| real(dp), dimension(0:kcmax), intent(in) | at4_1, | ||
| real(dp), dimension(0:kcmax), intent(in) | at4_2, | ||
| real(dp), dimension(0:kcmax), intent(in) | at5, | ||
| real(dp), dimension(0:kcmax), intent(in) | at6, | ||
| real(dp), intent(in) | at7, | ||
| real(dp), intent(in) | atr1, | ||
| real(dp), intent(in) | alb1, | ||
| real(dp), dimension(0:kcmax), intent(in) | ai1, | ||
| real(dp), dimension(0:kcmax), intent(in) | ai2, | ||
| real(dp), intent(in) | dtime_temp, | ||
| real(dp), intent(in) | dtt_2dxi, | ||
| real(dp), intent(in) | dtt_2deta, | ||
| integer(i4b), intent(in) | i, | ||
| integer(i4b), intent(in) | j | ||
| ) |
Computation of temperature and age for ice shelves (floating ice) with the enthalpy method.
Definition at line 2430 of file calc_temp_enth_m.F90.
1.8.11
