% this .m file tests the function M-file pricePerAreaOfPizza.m
% Written by I. Aydin and CISC106-010 students
% on  9/17/2007

% Test case 1

tolerance = 0.001;
expected = 0.127;
actual = pricePerAreaOfPizza(10, 9.99);
diff = expected - actual;

if ( abs(diff) <= tolerance)
   disp('Test 1 passed')
else
   disp('Test 1 failed')
end