<!--
function solve(form){
E1 = eval(form.E1.value * Math.pow(10,9));
E2 = eval(form.E2.value * Math.pow(10,9));
v1 = eval(form.v1.value);
v2 = eval(form.v2.value);
R1x = eval(form.R1x.value * Math.pow(10,-3));
R1y = eval(form.R1y.value * Math.pow(10,-3));
R2x = eval(form.R2x.value * Math.pow(10,-3));
R2y = eval(form.R2y.value * Math.pow(10,-3));

EE = 1 / ( (1-v1*v1) / (2*E1) + (1-v2*v2) / (2*E2) );

if (form.R1x.value == 0) R1x = Math.tan(Math.PI/2);
if (form.R1y.value == 0) R1y = Math.tan(Math.PI/2);
if (form.R2x.value == 0) R2x = Math.tan(Math.PI/2);
if (form.R2y.value == 0) R2y = Math.tan(Math.PI/2);
Rx = 1 / ( 1/R1x + 1/R2x );
Ry = 1 / ( 1/R1y + 1/R2y );
L = Math.min(Rx/Ry,Ry/Rx);
RR = 1 / ( 1/Rx + 1/Ry);

P = eval(form.P.value);
z = eval(form.z.value);
F = 5*P/z;
n = eval(form.n.value);
omega = 2*Math.PI*n/60;
U = -3/2*omega*R2x;

K = 1 / ( 1 + Math.sqrt( Math.log(16/L) /( 2*L) ) - (Math.sqrt(Math.log(4))) + 0.16*Math.log(L) );
a1 = K * Math.pow( ( 1 + 2*(1-K*K)/(Math.PI*K*K) - 0.25 * Math.log(K)),1/3);
b1 = a1/K;
a = a1 * Math.pow(3*F*RR/EE,1/3);
b = b1 * Math.pow(3*F*RR/EE,1/3);

etha  = eval(form.etha.value);
alpha = eval(form.alpha.value)*Math.pow(10,-9);
coef  = EE*Rx/(etha*U);
L   = alpha*EE*Math.pow(coef,-0.25);
M   = Math.pow(Ry/Rx,-0.5)*F/(Rx*Rx*EE)*Math.pow(coef,0.75);
L1  = Rx/Ry;
HRI = 145*Math.pow(1+0.796*Math.pow(L1,14/15),-15/7)/(M*M);
HRP = 1.29*Math.pow(1+0.691*L1,-2/3)*Math.pow(L,2/3);
HEI = 3.18*Math.pow(1+0.006*Math.log(L1)+0.63*Math.pow(L1,4/7),-14/25)*Math.pow(M,-2/15);
HEP = 1.48*Math.pow(1+0.006*Math.log(L1)+0.63*Math.pow(L1,4/7),-7/20)*Math.pow(M,-1/12)*Math.pow(L,3/4);
sc  = (3/2)*(1+Math.exp(-1.2*HEI/HRI));
Hc1 = Math.pow(Math.pow(HRI,3/2)+Math.pow(Math.pow(HEI,-4)+0.1*Math.pow(L1,4),-3/8),2*sc/3);
Hc2 = Math.pow( Math.pow(HRP,-8)+Math.pow(HEP,-8),-sc/8);
H = Math.pow(Hc1+Hc2,1/sc);
hc = H*Rx*Math.pow(coef,-1/2);

form.EE.value = Math.round(EE * Math.pow(10,-9)*100)/100;
form.RR.value = Math.round(RR * Math.pow(10,3)*100)/100;
form.a.value = Math.round(a*Math.pow(10,3)*100)/100;
form.b.value = Math.round(b*Math.pow(10,3)*100)/100;
form.pm.value = Math.round(F/(Math.PI*a*b)*Math.pow(10,-9)*100)/100;
form.pmax.value = Math.round(1.5*F/(Math.PI*a*b)*Math.pow(10,-9)*100)/100;
form.L.value = Math.round(L*100)/100;
form.M.value = Math.round(M*100)/100;
form.H.value = Math.round(H*100)/100;
form.hc.value = Math.round(hc*Math.pow(10,6)*100)/100;

} 
function reset(form) {}

// -->