<!--
//created by Joseph Roland
//www.cytographica.com

function recepie(form)
{
var slip = form.slip.value;
var conc = form.conc.value;
var dna = (400/conc)*(slip);
var en = 3.2*slip;
var ec = (100*slip)-(dna);
var ef = 10*slip;
var media = (300*slip);
var total = media + ec + en + ef + dna;
var adna = document.getElementById("adna");
var aen = document.getElementById("aen");
var aec = document.getElementById("aec");
var aef = document.getElementById("aef");
var amedia = document.getElementById("amedia");
var atotal = document.getElementById("atotal");

if (form.conc.value > 0)
{
	if (form.slip.value > 0)
	{
	adna.firstChild.nodeValue=Math.round(10*dna)/10;
	aec.firstChild.nodeValue=Math.round(10*ec)/10;
	aen.firstChild.nodeValue=Math.round(10*en)/10;
	aef.firstChild.nodeValue=Math.round(10*ef)/10;
	amedia.firstChild.nodeValue=Math.round(10*media)/10;
	atotal.firstChild.nodeValue=Math.round(10*total)/10;
	}
	else
	{
	adna.firstChild.nodeValue=" ";
	aec.firstChild.nodeValue=" ";
	aen.firstChild.nodeValue=" ";
	aef.firstChild.nodeValue=" ";
	amedia.firstChild.nodeValue=" ";
	atotal.firstChild.nodeValue=" ";
	}
}
else
{
	alert("You must enter a DNA concentration");
}
}
// JavaScript Document