Changeset 489 for LMDZ.3.3/branches/rel-LF/libf
- Timestamp:
- Feb 6, 2004, 3:15:17 PM (21 years ago)
- Location:
- LMDZ.3.3/branches/rel-LF/libf/phylmd
- Files:
-
- 4 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ.3.3/branches/rel-LF/libf/phylmd/albedo.F
r486 r489 22 22 ccc PARAMETER (fmagic=0.7) 23 23 cccIM => a remplacer 24 PARAMETER (fmagic=1.1) 24 PARAMETER (fmagic=1.3) 25 c PARAMETER (fmagic=1.1) 25 26 c PARAMETER (fmagic=1.0) 26 27 c PARAMETER (fmagic=0.7) … … 143 144 ccc PARAMETER (fmagic=0.7) 144 145 cccIM => a remplacer 145 PARAMETER (fmagic=1.1) 146 PARAMETER (fmagic=1.3) 147 c PARAMETER (fmagic=1.1) 146 148 c PARAMETER (fmagic=1.0) 147 149 c PARAMETER (fmagic=0.7) -
LMDZ.3.3/branches/rel-LF/libf/phylmd/clmain.F
r486 r489 1408 1408 ENDIF 1409 1409 cIM cf JLD/ GKtest 1410 IF ( nsrf . EQ. is_ter) THEN1410 IF ( nsrf .NE. is_oce ) THEN 1411 1411 cIM 261103 kstable = kstable_ter 1412 1412 kstable = ksta_ter -
LMDZ.3.3/branches/rel-LF/libf/phylmd/interface_surf.F90
r486 r489 647 647 648 648 649 z0_new = 0.00 1649 z0_new = 0.002 650 650 z0_new = SQRT(z0_new**2+rugoro**2) 651 651 alblw(1:knon) = alb_new(1:knon) … … 700 700 !IM: KstaTER0.8 & LMD_ARMIP5 alb_new(1 : knon) = 0.8 701 701 !IM: KstaTER0.77 & LMD_ARMIP6 702 alb_new(1 : knon) = 0. 77702 alb_new(1 : knon) = 0.8 703 703 704 704 ! -
LMDZ.3.3/branches/rel-LF/libf/phylmd/orografi.F
r177 r489 1741 1741 GKWAKE=0.50 1742 1742 C 1743 GKLIFT=0.50 1743 C GKLIFT=0.50 1744 GKLIFT=0.25 1744 1745 GVCRIT =0.0 1745 1746 C
Note: See TracChangeset
for help on using the changeset viewer.