| blob | f36f6870dbf3662537d994c0953ee9abfd5eb2c7 |
1 MODULE module_soilpsd
2 ! Soil particle-size distributions, based on data collected by G.H. McTainsh (g.mctainsh@griffith.edu.au) and collegues,
3 ! Griffith University, Australia. The data has been processed by Harry Butler (harry.butler@usq.edu.au),
4 ! University of Southern Queensland, Australia, and Martina Klose (mklose@uni-koeln.de), University of Cologne, Germany.
5 integer, parameter :: mmax=4
7 real(8), dimension(3, mmax) :: csandm ! Coefs for minimally dispersed, Simpson Desert, sand
8 data csandm / 0.0287, 3.6153, 0.2775, &
9 & 0.2811, 4.9918, 0.3023, &
10 & 0.0516, 3.9315, 0.1417, &
11 & 0.6387, 4.7173, 0.2432 /
12 !
13 real(8), dimension(3, mmax) :: closam ! Coefs for minimally dispersed, Eulo, loamy sand (orig sandy loam)
14 data closam / 0.5000, 6.0674, 0.4039, &
15 & 0.1997, 4.3282, 0.3998, &
16 & 0.2191, 5.2793, 0.3488, &
17 & 0.0812, 6.6426, 0.2216 /
18 !
19 real(8), dimension(3, mmax) :: csalom ! Coefs for minimally dispersed, Tambo, sandy loam
20 data csalom / 0.0240, 6.6566, 0.1000, &
21 & 0.0536, 6.0663, 0.1227, &
22 & 0.3184, 5.1840, 0.7462, &
23 & 0.6039, 6.0685, 0.4063 /
24 !
25 real(8), dimension(3, mmax) :: csilom ! Coefs for minimally dispersed, Thargominda, silt loam (orig loam)
26 data csilom / 0.0278, 5.2068, 0.1921, &
27 & 0.5000, 4.3275, 0.4544, &
28 & 0.3054, 3.5848, 1.0721, &
29 & 0.1669, 4.1432, 0.1877 /
30 !
31 real(8), dimension(3, mmax) :: csiltm ! Coefs for minimally dispersed, not available, use same as for silt loam
32 data csiltm / 0.0278, 5.2068, 0.1921, &
33 & 0.5000, 4.3275, 0.4544, &
34 & 0.3054, 3.5848, 1.0721, &
35 & 0.1669, 4.1432, 0.1877 /
36 !
37 real(8), dimension(3, mmax) :: cloamm ! Coefs for minimally dispersed, Wellington, loam
38 data cloamm / 0.0695, 6.9010, 0.1000, &
39 & 0.1047, 6.6666, 0.1614, &
40 & 0.5000, 5.5720, 0.7295, &
41 & 0.3258, 6.3005, 0.3549 /
42 !
43 real(8), dimension(3, mmax) :: csclom ! Coefs for minimally dispersed, Yandama, sandy clay loam (orig clay loam)
44 data csclom / 0.4999, 5.1720, 0.3064, &
45 & 0.2490, 4.6158, 0.2783, &
46 & 0.0139, 4.9110, 0.1000, &
47 & 0.2372, 5.0185, 0.9259 /
48 !
49 real(8), dimension(3, mmax) :: csiclm ! Coefs for minimally dispersed, Yandama (McDonald et al., 1990), silty clay loam, not normalized
50 data csiclm / 1.2597, 4.7986, 0.3751, &
51 & 0.8107, 5.2549, 0.3047, &
52 & 0.4482, 5.1246, 1.2550, &
53 & 0., 0., 0. /
54 !
55 real(8), dimension(3, mmax) :: ccloam ! Coefs for minimally dispersed, Manilla, clay loam
56 data ccloam / 0.1842, 6.3110, 0.2071, &
57 & 0.4243, 6.0792, 0.4049, &
58 & 0.3273, 5.5946, 0.7726, &
59 & 0.0642, 6.5793, 0.1000 /
60 !
61 real(8), dimension(3, mmax) :: csaclm ! Coefs for minimally dispersed, Thargomindah (McDonald et al., 1990), sandy clay, not normalized
62 data csaclm / 0.3124, 4.1426, 0.1717, &
63 & 0.9564, 3.9501, 1.7750, &
64 & 1.0340, 4.3088, 0.4340, &
65 & 0., 0., 0. /
66 !
67 real(8), dimension(3, mmax) :: csilcm ! Coefs for minimally dispersed, Cooper Floodplain - Windorah, silty clay (orig light clay)
68 data csilcm / 0.2709, 4.9160, 0.1971, &
69 & 0.0631, 4.5807, 0.1635, &
70 & 0.1350, 3.8960, 0.8092, &
71 & 0.5310, 4.5301, 0.4887 /
72 !
73 real(8), dimension(3, mmax) :: cclaym ! Coefs for minimally dispersed, Walgett, clay
74 data cclaym / 0.2408, 4.5855, 0.6331, &
75 & 0.0594, 3.3126, 1.1665, &
76 & 0.0273, 5.3894, 0.1000, &
77 & 0.6725, 5.3148, 0.3924 /
78 !
79 real(8), dimension(3, mmax) :: csandf ! Coefs for fully dispersed, Simpson Desert, sand
80 data csandf / 0.0231, 3.6724, 0.2341, &
81 & 0.0362, 3.9598, 0.1257, &
82 & 0.2628, 4.9933, 0.2986, &
83 & 0.6779, 4.7374, 0.2498 /
84 !
85 real(8), dimension(3, mmax) :: closaf ! Coefs for fully dispersed, Eulo, loamy sand (orig sandy loam)
86 data closaf / 0.1354, 5.5976, 0.4288, &
87 & 0.1073, 2.3499, 1.0898, &
88 & 0.1692, 4.0550, 0.2113, &
89 & 0.5880, 4.1982, 0.7748 /
90 !
91 real(8), dimension(3, mmax) :: csalof ! Coefs for fully dispersed, Tambo, sandy loam
92 data csalof / 0.0115, 5.3900, 0.1141, &
93 & 0.3043, 4.6980, 1.0132, &
94 & 0.0840, 6.6115, 0.1339, &
95 & 0.6002, 6.0494, 0.3178 /
96 !
97 real(8), dimension(3, mmax) :: csilof ! Coefs for fully dispersed, Thargominda, silt loam (orig loam)
98 data csilof / 0.1816, 3.1175, 1.0169, &
99 & 0.4454, 4.3491, 0.6154, &
100 & 0.0568, 4.1250, 0.1000, &
101 & 0.3162, 4.1594, 0.3017 /
102 !
103 real(8), dimension(3, mmax) :: csiltf ! Coefs for fully dispersed, not available, use same as for silt loam
104 data csiltf / 0.1816, 3.1175, 1.0169, &
105 & 0.4454, 4.3491, 0.6154, &
106 & 0.0568, 4.1250, 0.1000, &
107 & 0.3162, 4.1594, 0.3017 /
108 !
109 real(8), dimension(3, mmax) :: cloamf ! Coefs for fully dispersed, Wellington, loam
110 data cloamf / 0.0378, 5.0205, 0.5601, &
111 & 0.0511, 0.5580, 0.3886, &
112 & 0.4003, 1.7677, 0.6877, &
113 & 0.5108, 2.9973, 0.5489 /
114 !
115 real(8), dimension(3, mmax) :: csclof ! Coefs for fully dispersed, Yandama, sandy clay loam (orig clay loam)
116 data csclof / 0.1364, 3.3869, 1.3277, &
117 & 0.0642, 6.1715, 0.3463, &
118 & 0.0767, 4.4147, 0.2243, &
119 & 0.7227, 4.9219, 0.4983 /
120 !
121 real(8), dimension(3, mmax) :: csiclf ! Coefs for fully dispersed, Yandama (McDonald et al., 1990), silty clay loam, not normalized
122 data csiclf / 0.5844, 4.6079, 0.6141, &
123 & 0.3304, 5.2050, 0.2897, &
124 & 0.0522, 7.0553, 1.0000, &
125 & 0.0330, 0.6931, 1.0000 /
126 !
127 real(8), dimension(3, mmax) :: ccloaf ! Coefs for fully dispersed, Manilla, clay loam
128 data ccloaf / 0.3988, 2.0568, 0.9444, &
129 & 0.5000, 3.5758, 0.6679, &
130 & 0.0145, 4.4626, 0.1000, &
131 & 0.0867, 5.0406, 0.4590 /
132 !
133 real(8), dimension(3, mmax) :: csaclf ! Coefs for fully dispersed, Thargomindah (McDonald et al., 1990), sandy clay, not normalized
134 data csaclf / 1.1285, 4.2288, 0.4296, &
135 & 0.7275, 3.8558, 1.2898, &
136 & 0.2438, 4.1222, 0.1379, &
137 & 0., 0., 0. /
138 !
139 real(8), dimension(3, mmax) :: csilcf ! Coefs for fully dispersed, Cooper Floodplain - Windorah, silt clay (orig light clay)
140 data csilcf / 0.3927, 3.6159, 0.5702, &
141 & 0.1160, 1.3131, 0.2704, &
142 & 0.4588, 2.3768, 0.6913, &
143 & 0.0325, 1.0150, 0.1154 /
144 !
145 real(8), dimension(3, mmax) :: cclayf ! Coefs for fully dispersed, Walgett, clay
146 data cclayf / 0.5000, 3.0166, 0.7156, &
147 & 0.1124, 0.6297, 0.4159, &
148 & 0.3698, 1.5791, 0.6059, &
149 & 0.0178, 3.8284, 0.1509 /
150 !
151 END MODULE module_soilpsd