www/includes/formulas.php

changeset 89
082c23b26055
parent 88
0a39cbdcf085
child 90
d4246abee34e
equal deleted inserted replaced
88:0a39cbdcf085 89:082c23b26055
173 return 486.8693 * ($og - $fg) / (4.749804 - $fg); 173 return 486.8693 * ($og - $fg) / (4.749804 - $fg);
174 return 0; 174 return 0;
175 } 175 }
176 176
177 177
178 /*
179 * Kleurwerking naar SRM
180 */
181 function kw_to_srm($colormethod, $c) {
182
183 if ($colormethod == "Morey")
184 return 1.49 * pow($c, 0.69);
185 if ($colormethod == "Mosher")
186 return 0.3 * $c + 4.7;
187 if ($colormethod == "Daniels")
188 return 0.2 * $c + 8.4;
189 }
190
191
192
193 function kw_to_ebc($colormethod, $c) {
194 return srm_to_ebc(kw_to_srm($colormethod, $c));
195 }
196
197
178 198
179 /* 199 /*
180 200
181 Brouwhulp data.pas 201 Brouwhulp data.pas
182 202
535 Result := FIBUMax.Value / (1000 * (((FOGMax.Value + FOGMin.Value) / 2) - 1)); 555 Result := FIBUMax.Value / (1000 * (((FOGMax.Value + FOGMin.Value) / 2) - 1));
536 end; 556 end;
537 end; 557 end;
538 558
539 559
540 CalcOG;
541 CalcBitterness; 560 CalcBitterness;
542 561
543 // Get concentration of ions in diluted brewwater (1) and target water (2) in mmol/l 562 // Get concentration of ions in diluted brewwater (1) and target water (2) in mmol/l
544 Ca1 := W.Calcium.Value / MMCa; 563 Ca1 := W.Calcium.Value / MMCa;
545 Ca2 := W2.Calcium.Value / MMCa; 564 Ca2 := W2.Calcium.Value / MMCa;

mercurial