8 April 2023 7:37:42.908 AM toms178_test(): FORTRAN90 version Test TOMS178(). toms178_test01 hooke seeks a minimizer of F(X). Here we use the Rosenbrock function. Initial estimate X = 1 -1.20000 2 1.00000 F(X) = 24.2000 Number of iterations taken = 19 X* = 1 1.00000 2 1.00000 F(X*) = 0.151339E-10 TEST02 HOOKE seeks a minimizer of F(X). Here we use the Woods function. Initial estimate X = 1 -3.00000 2 -1.00000 3 -3.00000 4 -1.00000 F(X) = 19192.0 Number of iterations taken = 19 X* = 1 1.00004 2 1.00007 3 0.999968 4 0.999935 F(X*) = 0.483269E-08 TOMS178_TEST Normal end of execution. 8 April 2023 7:37:42.909 AM