|
SICOPOLIS V3.2
|
Computation of temperature and age for an ice column with a temperate base with the enthalpy method. More...
Go to the source code of this file.
Functions/Subroutines | |
| subroutine | calc_temp_enth_2 (at1, at2_1, at2_2, at3_1, at3_2, at4_1, at4_2, at5, at6, at7, atr1, alb1, ai1, ai2, aqtlde, am3, dtime_temp, dtt_2dxi, dtt_2deta, i, j) |
| Computation of temperature and age for an ice column with a temperate base with the enthalpy method. 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_a2 (at6, at7, ai2, am3, temp_c_val, omega_c_val, i, j, ce6, ce7, ci2, cm3) |
| Computation of temperature and age for an ice column with a temperate base with the enthalpy method: Abbreviations II. 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_c (ct1, ct2, ct3, ct4, ce5, ce6, ce7, ct1_sg, ct2_sg, ct3_sg, ct4_sg, cm3, adv_vert_sg, abs_adv_vert_sg, dtime_temp, dtt_dxi, dtt_deta, dtt_2dxi, dtt_2deta, i, j, kcmin, 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 ice enthalpy. 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... | |
Computation of temperature and age for an ice column with a temperate base with the enthalpy method.
Copyright 2013-2016 Ralf Greve, Heinz Blatter
This file is part of SICOPOLIS.
SICOPOLIS is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation, either version 3 of the License, or (at your option) any later version.
SICOPOLIS is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details.
You should have received a copy of the GNU General Public License along with SICOPOLIS. If not, see http://www.gnu.org/licenses/.
Definition in file calc_temp_enth_2.F90.
| subroutine calc_temp_enth_2 | ( | 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), dimension(0:kcmax), intent(in) | aqtlde, | ||
| real(dp), dimension(0:kcmax), intent(in) | am3, | ||
| 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 an ice column with a temperate base with the enthalpy method.
Definition at line 37 of file calc_temp_enth_2.F90.
| subroutine 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 275 of file calc_temp_enth_2.F90.
| subroutine calc_temp_enth_2_a2 | ( | real(dp), dimension(0:kcmax), intent(in) | at6, |
| real(dp), intent(in) | at7, | ||
| real(dp), dimension(0:kcmax), intent(in) | ai2, | ||
| real(dp), dimension(0:kcmax), intent(in) | am3, | ||
| real(dp), dimension(0:kcmax), intent(in) | temp_c_val, | ||
| real(dp), dimension(0:kcmax), intent(in) | omega_c_val, | ||
| integer(i4b), intent(in) | i, | ||
| integer(i4b), intent(in) | j, | ||
| real(dp), dimension(0:kcmax), intent(out) | ce6, | ||
| real(dp), dimension(0:kcmax), intent(out) | ce7, | ||
| real(dp), dimension(0:kcmax), intent(out) | ci2, | ||
| cm3 | |||
| ) |
Computation of temperature and age for an ice column with a temperate base with the enthalpy method: Abbreviations II.
Definition at line 410 of file calc_temp_enth_2.F90.
| subroutine 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, | ||
| 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 483 of file calc_temp_enth_2.F90.
| subroutine calc_temp_enth_2_c | ( | 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) | ce5, | ||
| real(dp), dimension(0:kcmax), intent(in) | ce6, | ||
| ce7, | |||
| 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) | cm3, | ||
| 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, | ||
| integer(i2b), intent(in) | kcmin, | ||
| 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, | ||
| 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 ice enthalpy.
Definition at line 550 of file calc_temp_enth_2.F90.
| subroutine 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, | ||
| 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 735 of file calc_temp_enth_2.F90.
1.8.5
