Mash ParametersInfusions
Grist Mass: " /> /> lb
/> kg
First Infusion: " />
Post-Boil Volume: " /> /> gal
/> L
Second Infusion:
(First Sparge)
" />
Potential Extract:
(AICG; Default 77%)
" /> /> %
/> point-gal/lb
Third Infusion:
(Second Sparge)
" />
Lauter Deadspace:
(Default 0)
" /> Fourth Infusion:
(Third Sparge)
" />
"; */ } $eff = $exp1*$eff1+$exp2*$eff2+$exp3*$eff3+$exp4*$eff4; /* Overall lauter efficiency */ $extract_tot = 11.49*$mass*$extract*$eff; $vol1 = $vol1-$absorption; $boil1 = $vol1+$vol2+$vol3+$vol4; $sgp_tot1 = $extract_tot/$boil1; $sgp_tot2 = $sgp_tot1*$boil1/$boil2; $sg_tot1 = 1+($sgp_tot1/(258.6-(($sgp_tot1/258.2)*227.1))); $sg_tot2 = 1+($sgp_tot2/(258.6-(($sgp_tot2/258.2)*227.1))); if ($vol_unit == "liter") {$boil1 = $boil1/0.26417; $boil2 = $boil2/0.26417; $vol_disp = "L";} else {$vol_disp = $vol_unit;} $boiloff = $boil1-$boil2; $boiloffpct = 100*$boiloff/$boil1; $effpct = 100*$eff; $vol1_r = round($vol1,2); $vol2_r = round($vol2,2); $vol3_r = round($vol3,2); $vol4_r = round($vol4,2); $boil1_r = round($boil1,2); $boil2_r = round($boil2,2); $sgp1_r = round($sgp1,1); $sg1_r = round($sg1,3); $sgp2_r = round($sgp2,1); $sg2_r = round($sg2,3); $sgp3_r = round($sgp3,1); $sg3_r = round($sg3,3); $sgp4_r = round($sgp4,1); $sg4_r = round($sg4,3); $sgp_tot1_r = round($sgp_tot1,1); $sgp_tot2_r = round($sgp_tot2,1); $sg_tot1_r = round($sg_tot1,3); $sg_tot2_r = round($sg_tot2,3); $boiloff_r = round($boiloff,2); $boiloffpct_r = round($boiloffpct,1); $effpct_r = round($effpct,1); echo "";} else {echo "";} echo "";} else {echo "";} echo "";} else {echo "";} echo "
Results
Pre-Boil:"; echo $boil1_r . " " . $vol_disp . " at " . $sgp_tot1_r . "°P (" . $sg_tot1_r . ")"; if ($vol1 != 0) {echo "First Runnings:"; echo $vol1_r . " " . $vol_disp . " at " . $sgp1_r . "°P (" . $sg1_r . ")
Post-Boil:"; echo $boil2_r . " " . $vol_disp . " at " . $sgp_tot2_r . "°P (" . $sg_tot2_r . ")"; if ($vol2 != 0) {echo "Second Runnings:"; echo $vol2_r . " " . $vol_disp . " at " . $sgp2_r . "°P (" . $sg2_r . ")
Boiloff:"; echo $boiloff_r . " " . $vol_disp . " (" . $boiloffpct_r . "%)"; if ($vol3 != 0) {echo "Third Runnings:"; echo $vol3_r . " " . $vol_disp . " at " . $sgp3_r . "°P (" . $sg3_r . ")
Lauter Efficiency:"; echo $effpct_r . "%"; if ($vol4 != 0) {echo "Fourth Runnings:"; echo $vol4_r . " " . $vol_disp . " at " . $sgp4_r . "°P (" . $sg4_r . ")
";} else {echo "";} } ?>