/////////////////////////////////////////////////////////////////////////////
//
// javascript source code for the angulation calculator at:
// http://www.natew.com/frames.cgi/software/html.SnowboardCalculator
//
// I'd put a copyright notice here:
//
// Xxxxxxxxx (c) 2001 Xxxx Xxxxxxxx.  Xxx xxxxxx xxxxxxxx.
//
// But that would be silly.  The key concepts here are not mine - if
// anyone deserves copyright on this it's Pythagoras, and he's dead.
//
// Nate Waddoups, 4 April 2002
//
/////////////////////////////////////////////////////////////////////////////

var rPi = 3.1415926535;

function SolveForCarve (form)
{
  var rSidecutRadius = form.elements["SidecutRadius"].value;
  var rInclination = form.elements["Inclination"].value * rPi / 180;
  var rAngulation= form.elements["Angulation"].value * rPi / 180;

  var rEdgeAngle = rInclination + rAngulation;

  var rEdgeAngleDegrees = rEdgeAngle * 180 / rPi;

  document.all["EdgeAngle"].innerHTML = 
      Math.round (rEdgeAngleDegrees * 100) / 100;

  var rCarveRadius = rSidecutRadius * Math.cos (rEdgeAngle);

  document.all["CarveRadius"].innerHTML = 
      Math.round (rCarveRadius * 100) / 100;

  var rSpeed = Math.sqrt (Math.tan (rInclination) * rCarveRadius * 9.81);

  document.all["SpeedMetric"].innerHTML = 
      Math.round (rSpeed * 100) / 100;

  document.all["SpeedLame"].innerHTML = 
      Math.round (rSpeed * 2.237 * 100) / 100;

  var rCentForce = ((rSpeed * rSpeed) / rCarveRadius) / 9.81;

  document.all["CentForce"].innerHTML = 
      Math.round (rCentForce * 100) / 100;

  var rTotalForce = Math.sqrt ((rCentForce * rCentForce) + 1);

  document.all["TotalForce"].innerHTML =
      Math.round (rTotalForce * 100) / 100;

}

/////////////////////////////////////////////////////////////////////////////
// EOF.  Stop reading here ->