Changeset 1826 for trunk/LMDZ.GENERIC/libf/phystd/dyn1d/rcm1d.F
- Timestamp:
- Nov 28, 2017, 4:55:47 PM (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/LMDZ.GENERIC/libf/phystd/dyn1d/rcm1d.F
r1802 r1826 827 827 enddo 828 828 829 ! Initialize cloud fraction and oceanic ice 830 ! ----------------------------------------- 831 hice=0. 832 do ilayer=1,llm 833 cloudfrac(1,ilayer)=0. 834 enddo 835 totcloudfrac=0. 829 836 830 837 ! Initialize slab ocean
Note: See TracChangeset
for help on using the changeset viewer.