165
+ − 1 // **************************************************************
+ − 2 // OSTC - diving computer code
+ − 3 // Copyright (C) 2008 HeinrichsWeikamp GbR
+ − 4 //
+ − 5 // This program is free software: you can redistribute it and/or modify
+ − 6 // it under the terms of the GNU General Public License as published by
+ − 7 // the Free Software Foundation, either version 3 of the License, or
+ − 8 // (at your option) any later version.
+ − 9 //
+ − 10 // This program is distributed in the hope that it will be useful,
+ − 11 // but WITHOUT ANY WARRANTY; without even the implied warranty of
+ − 12 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ − 13 // GNU General Public License for more details.
+ − 14 //
+ − 15 // You should have received a copy of the GNU General Public License
+ − 16 // along with this program. If not, see <http://www.gnu.org/licenses/>.
+ − 17 //
+ − 18 // HISTORY
+ − 19 // 2011-01-20; jDG Cleanup addressing.
+ − 20 //
+ − 21 // **************************************************************
+ − 22
+ − 23 rom const float buhlmann_a[32] =
+ − 24 { // ??? Data ZH-L16A, from Tauchmedizin 1995 ???
+ − 25 //---a for N2 ----------------------------------------------------------------
+ − 26 1.2599, /// WARNING ZH-L16c-1990 gives different values: 1.3318
+ − 27 1.0000, /// ... 1.0048
+ − 28 0.8618, /// ... 0.8653
+ − 29 0.7562, /// ... 0.7520
+ − 30 0.6200, /// ... 0.6194
+ − 31 0.5043, /// ... 0.5043
+ − 32 0.4410, /// ... 0.4396
+ − 33 0.4000, /// ... 0.3977
+ − 34 0.3750, /// ... 0.3701
+ − 35 0.3500, /// ... 0.3456
+ − 36 0.3295, /// ... 0.3269
+ − 37 0.3065, /// ... 0.3065
+ − 38 0.2835, /// ... 0.2848
+ − 39 0.2610, /// ... 0.2622
+ − 40 0.2480, /// ... 0.2486
+ − 41 0.2327, /// ... 0.2341
+ − 42 //---- a of He ---------------------------------------------------------------
+ − 43 1.7424, /// ... 1,7443
+ − 44 1.3830, /// ... 1,3800
+ − 45 1.1919, /// ... 1,1879
+ − 46 1.0458, /// ... 1,0455
+ − 47 .9220, /// ... 0,9211
+ − 48 .8205, /// ... 0,8232
+ − 49 .7305, /// ... 0,7321
+ − 50 .6502, /// ... 0,6508
+ − 51 .5950, /// ... 0,5981
+ − 52 .5545, /// ... 0,5568
+ − 53 .5333, /// ... 0,5285
+ − 54 .5189, /// ... 0,5178
+ − 55 .5181, /// ... 0,5137
+ − 56 .5176, /// ... 0,5196
+ − 57 .5172, /// ... 0,5150
+ − 58 .5119 /// ... 0,5109
+ − 59 };
+ − 60
+ − 61 rom const float buhlmann_b[] =
+ − 62 {
+ − 63 //---- b for N2 --------------------------------------------------------------
+ − 64 0.5050, /// WARNING ZH-L16c gives a different value: 0.5241
+ − 65 0.6514, /// All the other values matches ZH-L16c-1990
+ − 66 0.7222,
+ − 67 0.7825,
+ − 68 0.8126,
+ − 69 0.8434,
+ − 70 0.8693,
+ − 71 0.8910,
+ − 72 0.9092,
+ − 73 0.9222,
+ − 74 0.9319,
+ − 75 0.9403,
+ − 76 0.9477,
+ − 77 0.9544,
+ − 78 0.9602,
+ − 79 0.9653,
+ − 80 //---- b for He --------------------------------------------------------------
+ − 81 0.4245,
+ − 82 0.5747,
+ − 83 0.6527,
+ − 84 0.7223,
+ − 85 0.7582,
+ − 86 0.7957,
+ − 87 0.8279,
+ − 88 0.8553,
+ − 89 0.8757,
+ − 90 0.8903,
+ − 91 0.8997,
+ − 92 0.9073,
+ − 93 0.9122,
+ − 94 0.9171,
+ − 95 0.9217,
+ − 96 0.9267
+ − 97 };
+ − 98
+ − 99 rom const float buhlmann_ht[] =
+ − 100 {
+ − 101 //---- N2 --------------------------------------------------------------------
+ − 102 4, // Compartiment length, in minute, for nitrogen.
+ − 103 8,
+ − 104 12,
+ − 105 18,
+ − 106 27,
+ − 107 39,
+ − 108 55,
+ − 109 77,
+ − 110 109,
+ − 111 146,
+ − 112 187,
+ − 113 239,
+ − 114 305,
+ − 115 390,
+ − 116 498,
+ − 117 635,
+ − 118 //---- He --------------------------------------------------------------------
+ − 119 1.51, // Compartiment half-life, in minute, for helium.
+ − 120 3.02,
+ − 121 4.72,
+ − 122 6.99,
+ − 123 10.21,
+ − 124 14.48,
+ − 125 20.53,
+ − 126 29.11,
+ − 127 41.20,
+ − 128 55.19,
+ − 129 70.69,
+ − 130 90.34,
+ − 131 115.29,
+ − 132 147.42,
+ − 133 188.24,
+ − 134 240.03
+ − 135 };
+ − 136
+ − 137 rom const float e2secs[] =
+ − 138 {
+ − 139 //---- N2 --------------------------------------------------------------------
+ − 140 5.7596E-03, // und zwar 1 - 2^(-2sec/HT)
+ − 141 2.8839E-03,
+ − 142 1.8467e-03,
+ − 143 1.2481e-03,
+ − 144 8.5537E-04,
+ − 145 6.0308E-04,
+ − 146 4.2541E-04,
+ − 147 3.0002E-04,
+ − 148 2.1195E-04,
+ − 149 1.5824E-04,
+ − 150 1.2355E-04,
+ − 151 9.6669E-05,
+ − 152 7.5751E-05,
+ − 153 5.92E-05,
+ − 154 4.64E-05,
+ − 155 3.64E-05,
+ − 156 //---- He --------------------------------------------------------------------
+ − 157 0.01518479275,
+ − 158 0.007621439546,
+ − 159 0.004883145696,
+ − 160 0.003299965996,
+ − 161 0.002260409686,
+ − 162 0.00159437032,
+ − 163 0.001124788578,
+ − 164 0.0007933953673,
+ − 165 0.0005606414716,
+ − 166 0.0004185553604,
+ − 167 0.0003267948866,
+ − 168 0.0002557222899,
+ − 169 0.0002003867723,
+ − 170 0.0001567161546,
+ − 171 0.0001227342122,
+ − 172 9.625377675E-5
+ − 173 };
+ − 174
+ − 175 rom const float e1min[] =
+ − 176 {
+ − 177 //---- N2 --------------------------------------------------------------------
+ − 178 0.1591036, // Integration constant for 1 minute,
+ − 179 0.08299596, // ie. 1 - 2^(-1/ht)
+ − 180 0.053942353,
+ − 181 0.036774196,
+ − 182 0.02534539,
+ − 183 0.017935055,
+ − 184 0.012684012,
+ − 185 8.961515534E-3,
+ − 186 6.338971845E-3,
+ − 187 4.73633146E-3,
+ − 188 3.699808187E-3,
+ − 189 2.89599589E-3,
+ − 190 2.270033275E-3,
+ − 191 1.775722E-3,
+ − 192 1.390893611E-3,
+ − 193 1.090974815E-3,
+ − 194 //---- e 1min He -------------------------------------------------------------
+ − 195 0.368108684,
+ − 196 0.2050840824,
+ − 197 0.1365792957,
+ − 198 0.09440463235,
+ − 199 0.06563586265,
+ − 200 0.04674161154,
+ − 201 0.03319905126,
+ − 202 0.02353005571,
+ − 203 0.0166832282,
+ − 204 0.01248075064,
+ − 205 0.009757532198,
+ − 206 0.007643290133,
+ − 207 0.005994168431,
+ − 208 0.004690816669,
+ − 209 0.003675481163,
+ − 210 0.002883586737
+ − 211 };
+ − 212
+ − 213 rom const float e10min[] =
+ − 214 {
+ − 215 //---- N2 --------------------------------------------------------------------
+ − 216 // Die 10 min Werte in float Notation:
+ − 217 // und zwar 1 - 2^(-10/ht)
+ − 218 0.823223, // 1 - 2^(-10/4.0)
+ − 219 0.579552,
+ − 220 0.425651,
+ − 221 0.312487,
+ − 222 0.226416,
+ − 223 0.165547,
+ − 224 0.11984,
+ − 225 0.0860863,
+ − 226 0.0616117,
+ − 227 0.0463665,
+ − 228 0.0363881,
+ − 229 0.0285855,
+ − 230 0.0224698,
+ − 231 0.017616,
+ − 232 0.0138222,
+ − 233 0.0108563,
+ − 234 //---- He --------------------------------------------------------------------
+ − 235 0.989851,
+ − 236 0.899258,
+ − 237 0.769737,
+ − 238 0.629027,
+ − 239 0.492821,
+ − 240 0.380407,
+ − 241 0.286538,
+ − 242 0.211886,
+ − 243 0.154849,
+ − 244 0.118026,
+ − 245 0.0934005,
+ − 246 0.0738569,
+ − 247 0.0583504,
+ − 248 0.0459303,
+ − 249 0.0361528,
+ − 250 0.0284646,
+ − 251 };
+ − 252
