!     Last change:  RJ   23 Feb 2002    8:43 pm
PROGRAM problem5
USE Optimization
CALL InitOptimization()
!CALL Fibonacci(WithPath("Tables.HTM"))
CALL TrivialSearch(WithPath("Tables.HTM"))
END PROGRAM problem5