function compute(forma){
var m=""
var cg=""
var ti=""
var tf=""
var q=""
var cala=""

ct=(eval(forma.tf.value)-(eval(forma.ti.value)))
forma.cala.value="("+forma.m.value+" x " +forma.cg.value+" x "+ct+")"
q=(eval(forma.m.value)*eval(forma.cg.value)*ct)
forma.q.value=q
if (forma.q.value<0){
forma.q.value=-q }
}

function comp(formb){
var m=""
var cg=""
var ti=""
var tf=""
var q=""
var calb=""

ct=(eval(formb.tf.value)-(eval(formb.ti.value)))
mt=(eval(formb.m.value)*ct)
formb.calb.value="("+formb.q.value+" /[ " +formb.m.value+" x "+ct+"])"
cg=(eval(formb.q.value)/mt)
formb.cg.value=cg
if (formb.cg.value<0){
formb.cg.value=-cg }
}

function calculate(formc){
var m=""
var cg=""
var ti=""
var tf=""
var q=""
var calc=""

ct=(eval(formc.tf.value)-(eval(formc.ti.value)))
cgt=(eval(formc.cg.value)*ct)
formc.calc.value="("+formc.q.value+" /[ " +formc.cg.value+" x "+ct+"])"
m=(eval(formc.q.value)/cgt)
formc.m.value=m
if (formc.m.value<0){
formc.m.value=-m }
}

function calc(formd){
var m=""
var cg=""
var ti=""
var tf=""
var q=""
var cald=""

mcg=(eval(formd.m.value)*(eval(formd.cg.value)))
mcgq=(eval(formd.q.value)/mcg)
formd.cald.value="("+formd.ti.value+" + { " +formd.q.value+" /[ "+formd.m.value+" x "+formd.cg.value+"]})"
tf=(eval(formd.ti.value)+mcgq)
formd.tf.value=tf
}