/*************************************************
 *            BEGIN RVL UNIT TEST 7              *
 * Test of Operator, DerivTest and other     *
 * methods - Operator implements                 *
 *               f(x) = x.*x.*x                  *
 *************************************************/

1. construct 10D RnSpace, several FOs, input Vector x


2. construct OpFO, initialze vector to const = 2


3. within separate scope, instantiate OperatorEval,
   write out result

Vector Object
member of space:
RnSpace: simple dense vector space
dimension = 10
data container:
RnArray Local Data Container object
length = 10
samples: 
data[0] = 8
data[1] = 8
data[2] = 8
data[3] = 8
data[4] = 8
data[5] = 8
data[6] = 8
data[7] = 8
data[8] = 8
data[9] = 8

4. scale x, evaluate at scaled version of x, print value:

Vector Object
member of space:
RnSpace: simple dense vector space
dimension = 10
data container:
RnArray Local Data Container object
length = 10
samples: 
data[0] = 64
data[1] = 64
data[2] = 64
data[3] = 64
data[4] = 64
data[5] = 64
data[6] = 64
data[7] = 64
data[8] = 64
data[9] = 64

5. construct random search direction


6. carry out derivative check - true if convergence rate estimates >= 1.95
convergence results reported in ut7/ut7.out

DerivTest returned true - success!

/*************************************************
 *              END RVL UNIT TEST 7              *
 *************************************************/