calc_temp_m.F90 File Reference

Computation of temperature, water content and age. More...

Go to the source code of this file.

Modules
module	calc_temp_m
	Computation of temperature, water content and age.

Functions/Subroutines
subroutine, public	calc_temp_m::calc_temp_poly (dxi, deta, dzeta_c, dzeta_t, dzeta_r, dtime_temp)
	Computation of temperature, water content and age in polythermal mode. More...
subroutine, public	calc_temp_m::calc_temp_cold (dxi, deta, dzeta_c, dzeta_t, dzeta_r, dtime_temp)
	Computation of temperature and age in cold-ice mode. More...
subroutine, public	calc_temp_m::calc_temp_const ()
	Isothermal mode: Setting of the temperature and age to constant values. More...
subroutine	calc_temp_m::calc_temp2 (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 an ice column with a temperate base overlain by cold ice. More...
subroutine	calc_temp_m::calc_temp3 (at1, at2_1, at2_2, at3_1, at3_2, at4_1, at4_2, at5, at6, at7, atr1, am1, am2, alb1, aw1, aw2, aw3, aw4, aw5, aw7, aw8, aw9, aqtld, ai1, ai2, ai3, dzeta_t, dtime_temp, dtt_2dxi, dtt_2deta, i, j)
	Computation of temperature, water content and age for an ice column with a temperate base overlain by a temperate-ice layer. More...
subroutine	calc_temp_m::calc_temp_r (atr1, alb1, i, j)
	Computation of temperature and age for an ice-free column. More...
subroutine	calc_temp_m::shift_cts_upward (at1, at2_1, at2_2, at3_1, at3_2, at4_1, at4_2, at5, at6, at7, atr1, am1, am2, alb1, aw1, aw2, aw3, aw4, aw5, aw7, aw8, aw9, aqtld, ai1, ai2, ai3, dzeta_t, dtime_temp, dtt_2dxi, dtt_2deta, dtime_temp_inv, i, j)
	Upward shifting of the CTS. More...

Detailed Description

Computation of temperature, water content and age.

Copyright

Copyright 2009-2017 Ralf Greve

License

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_m.F90.