Changeset 3049 for LMDZ6/branches/DYNAMICO-conv/libf/phydev
- Timestamp:
- Oct 29, 2017, 11:13:59 AM (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ6/branches/DYNAMICO-conv/libf/phydev/inifis_mod.F90
r2311 r3049 1 ! $Id :$1 ! $Id$ 2 2 MODULE inifis_mod 3 3 … … 6 6 SUBROUTINE inifis(prad, pg, pr, pcpp) 7 7 ! Initialize some physical constants and settings 8 USE print_control_mod, ONLY: init_print_control8 USE init_print_control_mod, ONLY: init_print_control 9 9 USE comcstphy, ONLY: rradius, & ! planet radius (m) 10 10 rr, & ! recuced gas constant: R/molar mass of atm
Note: See TracChangeset
for help on using the changeset viewer.