SICOPOLIS V5-dev  Revision 1173
Functions/Subroutines
calc_temp_enth_m Module Reference

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

Detailed Description

Computation of temperature, water content and age with the enthalpy method.

Function/Subroutine Documentation

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.