thermcell_old_mod_h.f90 Source File


Files dependent on this one

sourcefile~~thermcell_old_mod_h.f90~~AfferentGraph sourcefile~thermcell_old_mod_h.f90 thermcell_old_mod_h.f90 sourcefile~calltherm_mod.f90 calltherm_mod.F90 sourcefile~calltherm_mod.f90->sourcefile~thermcell_old_mod_h.f90 sourcefile~calltherm_mod.f90~2 calltherm_mod.F90 sourcefile~calltherm_mod.f90~2->sourcefile~thermcell_old_mod_h.f90 sourcefile~physiq_mod.f90 physiq_mod.F90 sourcefile~physiq_mod.f90->sourcefile~calltherm_mod.f90 sourcefile~physiq_mod.f90~2 physiq_mod.F90 sourcefile~physiq_mod.f90~2->sourcefile~calltherm_mod.f90 sourcefile~old_lmdz1d.f90 old_lmdz1d.f90 sourcefile~old_lmdz1d.f90->sourcefile~physiq_mod.f90 sourcefile~scm.f90 scm.f90 sourcefile~scm.f90->sourcefile~physiq_mod.f90 sourcefile~callphysiq_mod.f90 callphysiq_mod.f90 sourcefile~callphysiq_mod.f90->sourcefile~physiq_mod.f90 sourcefile~callphysiq_mod.f90~2 callphysiq_mod.f90 sourcefile~callphysiq_mod.f90~2->sourcefile~physiq_mod.f90 sourcefile~calfis.f90 calfis.f90 sourcefile~calfis.f90->sourcefile~callphysiq_mod.f90

Contents


Source Code

MODULE thermcell_old_mod_h
  IMPLICIT NONE; PRIVATE
  PUBLIC r_aspect_thermals, l_mix_thermals, w2di_thermals
  real, parameter :: r_aspect_thermals = 2.
  real, parameter :: l_mix_thermals = 30.
  integer, parameter :: w2di_thermals = 0
END MODULE thermcell_old_mod_h