<?php
  include "fraction.inc.php3";

  $nl = "<br>\n";

  echo "Test for fraction.inc module<br>";

  // Create a new instance of the fractionTool.
  $fractool = new FractionTool();
  
  echo $nl;
  echo "Creating a $fractool->createFraction var1 of 2/5 from string$nl";
  $var1 = $fractool->createFraction ("2/5");
  echo "fraction is: " . $var1->toString() . $nl;
  echo "In double: " . $var1->toDouble() .$nl;

  echo $nl;
  echo "Creating a $fractool->createFraction var2 of 12/2 (6) from array$nl";
  $var2 = $fractool->createFraction (array(12, 2));
  echo "fraction is: " . $var2->toString() . $nl;

  echo $nl;
  echo "Creating a $fractool->createFraction var3 of 5.2 (5 1/5) from double$nl";
  $var3 = $fractool->createFraction (5.2);
  echo "fraction is: " . $var3->toString() . $nl;
  $var3->reduce();
  echo "after reduce, var3 is: " . $var3->toString() .$nl;

  echo $nl;
  echo "Creating a $fractool->createFraction var4 of 15/2 (7 1/2) from string$nl";
  $var4 = $fractool->createFraction ("15/2");
  echo "fraction is: " . $var4->toString() . $nl;
 
  echo $nl;
  echo "Creating a $fractool->createFraction var5 of -2 27/13 (4 1/13) from string$nl"; 
  $var5 = $fractool->createFraction ("-2 27/13");
  echo "fraction is: " . $var5->toString() . $nl;

  echo $nl;
  echo "Adding var2 to var1, var1 should be 6 2/5: ";
  $var1->add($var2);
  //print "myvar is: ". $myvar->toString() . "<br>";
  echo $var1->toString();
  echo " (" . ($var1->equals("6 2/5")?"true":"false") . ")$nl";


  echo $nl;
  echo "Subtracting var3 from var1, var1 should be 1 1/5: ";
  $var1->subtract($var3);
  echo $var1->toString();
  echo " (" . ($var1->equals("1 1/5")?"true":"false") . ")$nl";

  echo $nl;
  echo "Multiplying var1 by var4, var1 should be 9: ";
  $var1->multiply($var4);
  echo $var1->toString();
  echo " (" . ($var1->equals("9")?"true":"false") . ")$nl";

  echo $nl;
  echo "Dividing var1 by 6, var1 should be 3/2 (1 1/2): ";
  $var1->divide($fractool->createFraction(6));
  echo $var1->toString();
  echo " (" . ($var1->equals("3/2")?"true":"false") . ")$nl";

  echo $nl;
  echo "Multiply var1 (3/2) by 4/5 using fractionTool (var1 not modified)"
    . "and save to newvar, newvar should be 6/5 (1 1/5) :$nl";
  $newvar = $fractool->multiply ($var1, $fractool->createFraction("4/5"));
  echo "var1 is: " . $var1->toString()
    . " (" . ($var1->equals("3/2")?"true":"false") . ")$nl";
  echo "result variable (newvar) is: " . $newvar->toString()
    . " (" . ($newvar->equals("6/5")?"true":"false") .")$nl";

  echo $nl;
  $var8 = $fractool->createFraction ("120/50");
  echo "GCD of 120/50 is: " . ($fractool->gcd($var8->num,$var8->denom)) . $nl;
  echo "LCD of 2 and 5 is: " . ($fractool->lcm(50,2)) . $nl;
  $var8->reduce();
  echo "After reduce: $var8->num / $var8->denom $nl";

  $var9 = $fractool->createFraction (array(-11, -121));
  echo "var9 is $var9$nl";
  echo "var9 is " . $var9->toString() .$nl;
  $var9->reduce();
  echo "after reduce, var9 is: " . $var9->toString() . $nl;

?>