function CircleofConfusion_calc(CircleofConfusionform)
{
var CircleofConfusion_form = document.CircleofConfusionform.format.options[document.CircleofConfusionform.format.selectedIndex].value;
CircleofConfusion = CircleofConfusion_form;
}

function HyperFocal_calc(focal, fstop, CircleofConfusion)
{
var out_unit = document.Hyperfocalform.out_unit.options[document.Hyperfocalform.out_unit.selectedIndex].value;
var hft  = (focal * focal) / (fstop * CircleofConfusion);
if (out_unit == 1) {
	if (hft/1000 > 99999) {
	hyperfocal = "Infinity";
		}
	else {
	hyperfocal = Math.round(hft/100)/10;
		}
	}
else {
	if (hft/304.8 > 99999) {
	hyperfocal = "Infinity";
		}
	else {
	hyperfocal = Math.round(hft/30.48)/10;
		}
	}
}

function FillGrid(Hyperfocalform)
{
// f/2.8
       HyperFocal_calc(Hyperfocalform.FocLength01.value, 2.8, CircleofConfusion);
       Hyperfocalform.HD01.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength02.value, 2.8, CircleofConfusion);
       Hyperfocalform.HD02.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength03.value, 2.8, CircleofConfusion);
       Hyperfocalform.HD03.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength04.value, 2.8, CircleofConfusion);
       Hyperfocalform.HD04.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength05.value, 2.8, CircleofConfusion);
       Hyperfocalform.HD05.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength06.value, 2.8, CircleofConfusion);
       Hyperfocalform.HD06.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength07.value, 2.8, CircleofConfusion);
       Hyperfocalform.HD07.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength08.value, 2.8, CircleofConfusion);
       Hyperfocalform.HD57.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength09.value, 2.8, CircleofConfusion);
       Hyperfocalform.HD65.value  =  hyperfocal;

// f/4.0
       HyperFocal_calc(Hyperfocalform.FocLength01.value, 4.0, CircleofConfusion);
       Hyperfocalform.HD08.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength02.value, 4.0, CircleofConfusion);
       Hyperfocalform.HD09.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength03.value, 4.0, CircleofConfusion);
       Hyperfocalform.HD10.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength04.value, 4.0, CircleofConfusion);
       Hyperfocalform.HD11.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength05.value, 4.0, CircleofConfusion);
       Hyperfocalform.HD12.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength06.value, 4.0, CircleofConfusion);
       Hyperfocalform.HD13.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength07.value, 4.0, CircleofConfusion);
       Hyperfocalform.HD14.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength08.value, 4.0, CircleofConfusion);
       Hyperfocalform.HD58.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength09.value, 4.0, CircleofConfusion);
       Hyperfocalform.HD66.value  =  hyperfocal;

// f/5.6
       HyperFocal_calc(Hyperfocalform.FocLength01.value, 5.6, CircleofConfusion);
       Hyperfocalform.HD15.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength02.value, 5.6, CircleofConfusion);
       Hyperfocalform.HD16.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength03.value, 5.6, CircleofConfusion);
       Hyperfocalform.HD17.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength04.value, 5.6, CircleofConfusion);
       Hyperfocalform.HD18.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength05.value, 5.6, CircleofConfusion);
       Hyperfocalform.HD19.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength06.value, 5.6, CircleofConfusion);
       Hyperfocalform.HD20.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength07.value, 5.6, CircleofConfusion);
       Hyperfocalform.HD21.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength08.value, 5.6, CircleofConfusion);
       Hyperfocalform.HD59.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength09.value, 5.6, CircleofConfusion);
       Hyperfocalform.HD67.value  =  hyperfocal;

// f/8.0
       HyperFocal_calc(Hyperfocalform.FocLength01.value, 8.0, CircleofConfusion);
       Hyperfocalform.HD22.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength02.value, 8.0, CircleofConfusion);
       Hyperfocalform.HD23.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength03.value, 8.0, CircleofConfusion);
       Hyperfocalform.HD24.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength04.value, 8.0, CircleofConfusion);
       Hyperfocalform.HD25.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength05.value, 8.0, CircleofConfusion);
       Hyperfocalform.HD26.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength06.value, 8.0, CircleofConfusion);
       Hyperfocalform.HD27.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength07.value, 8.0, CircleofConfusion);
       Hyperfocalform.HD28.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength08.value, 8.0, CircleofConfusion);
       Hyperfocalform.HD60.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength09.value, 8.0, CircleofConfusion);
       Hyperfocalform.HD68.value  =  hyperfocal;

// f/11.0
       HyperFocal_calc(Hyperfocalform.FocLength01.value, 11.0, CircleofConfusion);
       Hyperfocalform.HD29.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength02.value, 11.0, CircleofConfusion);
       Hyperfocalform.HD30.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength03.value, 11.0, CircleofConfusion);
       Hyperfocalform.HD31.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength04.value, 11.0, CircleofConfusion);
       Hyperfocalform.HD32.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength05.value, 11.0, CircleofConfusion);
       Hyperfocalform.HD33.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength06.value, 11.0, CircleofConfusion);
       Hyperfocalform.HD34.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength07.value, 11.0, CircleofConfusion);
       Hyperfocalform.HD35.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength08.value, 11.0, CircleofConfusion);
       Hyperfocalform.HD61.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength09.value, 11.0, CircleofConfusion);
       Hyperfocalform.HD69.value  =  hyperfocal;

// f/16.0
       HyperFocal_calc(Hyperfocalform.FocLength01.value, 16.0, CircleofConfusion);
       Hyperfocalform.HD36.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength02.value, 16.0, CircleofConfusion);
       Hyperfocalform.HD37.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength03.value, 16.0, CircleofConfusion);
       Hyperfocalform.HD38.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength04.value, 16.0, CircleofConfusion);
       Hyperfocalform.HD39.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength05.value, 16.0, CircleofConfusion);
       Hyperfocalform.HD40.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength06.value, 16.0, CircleofConfusion);
       Hyperfocalform.HD41.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength07.value, 16.0, CircleofConfusion);
       Hyperfocalform.HD42.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength08.value, 16.0, CircleofConfusion);
       Hyperfocalform.HD62.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength09.value, 16.0, CircleofConfusion);
       Hyperfocalform.HD70.value  =  hyperfocal;

// f/22.0
       HyperFocal_calc(Hyperfocalform.FocLength01.value, 22.0, CircleofConfusion);
       Hyperfocalform.HD43.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength02.value, 22.0, CircleofConfusion);
       Hyperfocalform.HD44.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength03.value, 22.0, CircleofConfusion);
       Hyperfocalform.HD45.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength04.value, 22.0, CircleofConfusion);
       Hyperfocalform.HD46.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength05.value, 22.0, CircleofConfusion);
       Hyperfocalform.HD47.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength06.value, 22.0, CircleofConfusion);
       Hyperfocalform.HD48.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength07.value, 22.0, CircleofConfusion);
       Hyperfocalform.HD49.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength08.value, 22.0, CircleofConfusion);
       Hyperfocalform.HD63.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength09.value, 22.0, CircleofConfusion);
       Hyperfocalform.HD71.value  =  hyperfocal;

// f/32.0
       HyperFocal_calc(Hyperfocalform.FocLength01.value, 32.0, CircleofConfusion);
       Hyperfocalform.HD50.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength02.value, 32.0, CircleofConfusion);
       Hyperfocalform.HD51.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength03.value, 32.0, CircleofConfusion);
       Hyperfocalform.HD52.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength04.value, 32.0, CircleofConfusion);
       Hyperfocalform.HD53.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength05.value, 32.0, CircleofConfusion);
       Hyperfocalform.HD54.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength06.value, 32.0, CircleofConfusion);
       Hyperfocalform.HD55.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength07.value, 32.0, CircleofConfusion);
       Hyperfocalform.HD56.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength08.value, 32.0, CircleofConfusion);
       Hyperfocalform.HD64.value  =  hyperfocal;
       HyperFocal_calc(Hyperfocalform.FocLength09.value, 32.0, CircleofConfusion);
       Hyperfocalform.HD72.value  =  hyperfocal;

 }
