source:
LMDZ5/branches/IPSLCM5A2.1_ISO/libf/phyiso/thresh_supersat.F90
Last change on this file was 3331, checked in by , 6 years ago | |
---|---|
|
|
File size: 341 bytes |
Line | |
---|---|
1 | |
2 | |
3 | |
4 | |
5 | |
6 | SUBROUTINE thresh_supersat(t,RH_crit) |
7 | |
8 | IMPLICIT NONE |
9 | |
10 | REAL, intent(in) :: t ! temperature (K) |
11 | REAL, intent(out) :: RH_crit ! seuil de sursaturation en % |
12 | |
13 | |
14 | ! Selon Kaercher and Lohmann (JGR 2002) |
15 | |
16 | RH_crit = 2.583-t/207.83 |
17 | |
18 | END SUBROUTINE thresh_supersat |
19 |
Note: See TracBrowser
for help on using the repository browser.