calc_temp2.F90 File Reference

Computation of temperature and age for an ice column with a temperate base overlain by cold ice. More...

Go to the source code of this file.

Functions/Subroutines
subroutine	calc_temp2 (at1, at2_1, at2_2, at3_1, at3_2, at4_1, at4_2, at5, at6, at7, atr1, alb1, ai1, ai2, ai4, mean_accum_inv, 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.

---

Detailed Description

Computation of temperature and age for an ice column with a temperate base overlain by cold ice.

Copyright

Copyright 2009-2013 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_temp2.F90.

---

Function/Subroutine Documentation

subroutine calc_temp2	(	real(dp), dimension(0:kcmax)	at1,
		real(dp), dimension(0:kcmax)	at2_1,
		real(dp), dimension(0:kcmax)	at2_2,
		real(dp), dimension(0:kcmax)	at3_1,
		real(dp), dimension(0:kcmax)	at3_2,
		real(dp), dimension(0:kcmax)	at4_1,
		real(dp), dimension(0:kcmax)	at4_2,
		real(dp), dimension(0:kcmax)	at5,
		real(dp), dimension(0:kcmax)	at6,
		real(dp)	at7,
		real(dp)	atr1,
		real(dp)	alb1,
		real(dp), dimension(0:kcmax)	ai1,
		real(dp), dimension(0:kcmax)	ai2,
		real(dp)	ai4,
		real(dp)	mean_accum_inv,
		real(dp)	dtime_temp,
		real(dp)	dtt_2dxi,
		real(dp)	dtt_2deta,
		integer(i4b)	i,
		integer(i4b)	j
	)

Computation of temperature and age for an ice column with a temperate base overlain by cold ice.

Definition at line 37 of file calc_temp2.F90.