CCPP SciDoc v7.0.0  v7.0.0
Common Community Physics Package Developed at DTC
 
Loading...
Searching...
No Matches
namelist_soilveg_ruc.F90
1
3
5
6 use machine , only : kind_phys
7
8 implicit none
9 save
10
11 INTEGER max_slopetyp
12 INTEGER max_soiltyp
13 INTEGER max_vegtyp
14
15 parameter(max_slopetyp = 30)
16 parameter(max_soiltyp = 30)
17 parameter(max_vegtyp = 30)
18
19 real(kind_phys) slope_data(max_slopetyp)
21 real(kind_phys) albtbl(max_vegtyp)
22 real(kind_phys) z0tbl(max_vegtyp)
23 real(kind_phys) lemitbl(max_vegtyp)
24 real(kind_phys) pctbl(max_vegtyp)
25 real(kind_phys) shdtbl(max_vegtyp)
26 INTEGER ifortbl(max_vegtyp)
27 real(kind_phys) rstbl(max_vegtyp)
28 real(kind_phys) rgltbl(max_vegtyp)
29 real(kind_phys) hstbl(max_vegtyp)
30 real(kind_phys) snuptbl(max_vegtyp)
31 real(kind_phys) laitbl(max_vegtyp)
32 real(kind_phys) maxalb(max_vegtyp)
33 real(kind_phys) mfsno(max_vegtyp)
34 real(kind_phys) sncovfac(max_vegtyp)
35 LOGICAL lparam
36 real(kind_phys) topt_data
37 real(kind_phys) cmcmax_data
38 real(kind_phys) cfactr_data
39 real(kind_phys) rsmax_data
40 INTEGER bare
41 INTEGER glacier
42 INTEGER natural
43 INTEGER crop
44 INTEGER urban
45 INTEGER defined_veg
46 INTEGER defined_soil
47 INTEGER defined_slope
49 real(kind_phys) bb(max_soiltyp)
50 real(kind_phys) drysmc(max_soiltyp)
51 real(kind_phys) hc(max_soiltyp)
52 real(kind_phys) maxsmc(max_soiltyp)
53 real(kind_phys) refsmc(max_soiltyp)
54 real(kind_phys) satpsi(max_soiltyp)
55 real(kind_phys) satdk(max_soiltyp)
56 real(kind_phys) satdw(max_soiltyp)
57 real(kind_phys) wltsmc(max_soiltyp)
58 real(kind_phys) qtz(max_soiltyp)
59 real(kind_phys) refsmcnoah(max_soiltyp)
60 real(kind_phys) wltsmcnoah(max_soiltyp)
61 real(kind_phys) bbnoah(max_soiltyp)
62 real(kind_phys) satdknoah(max_soiltyp)
63 real(kind_phys) satpsinoah(max_soiltyp)
64 real(kind_phys) maxsmcnoah(max_soiltyp)
65 end module namelist_soilveg_ruc