15 January 2012   8:55:38.179 PM
 
TEST_OPT_CON_PRB
  FORTRAN90 version
  Test the TEST_OPT_CON library.
 
TEST01
  For each problem, print the title.
 
Problem	 Title
 
     1  f(x) = - exp(prod(x)) * sin(sum(x)).              
     2  f(x) = - exp(x(1)*x(2)^2*x(3)^3*x(4)^4) * sin(sum(
     3  f(x) = -1000 * product(x) * exp(-x(1)-2x(2)-3x(3)-
     4  f(x) = -100 * product(x) * exp(-x(4)) / (1+x(1)+x(
     5  f(x) = (x(1)-3/11)^2+(x(2)-6/13)^2+(x(3)-12/23)^4+
     6  f(x) = - sin(1/x(1)+1/x(2)+1/x(3)+1/x(4))         
     7  f(x) = Langerman2 function                        
     8  f(x) = Langerman10 function                       
 
TEST02
  For each problem, evaluate the function at many points.
  Number of sample points =   100000
 
  Problem        1
  f(x) = - exp(prod(x)) * sin(sum(x)).
    M =            4
 
    I      A(i)      B(i)
 
     1      0.0000      1.0000
     2      0.0000      1.0000
     3      0.0000      1.0000
     4      0.0000      1.0000
 
  Max(F) =    1.61628    
  Min(F) =   -1.02605    
  F(X*)  =   -1.02620    
 
  Problem        2
  f(x) = - exp(x(1)*x(2)^2*x(3)^3*x(4)^4) * sin(sum(
    M =            4
 
    I      A(i)      B(i)
 
     1      0.0000      1.0000
     2      0.0000      1.0000
     3      0.0000      1.0000
     4      0.0000      1.0000
 
  Max(F) =    1.44850    
  Min(F) =   -1.00024    
  F(X*)  =   -1.00009    
 
  Problem        3
  f(x) = -1000 * product(x) * exp(-x(1)-2x(2)-3x(3)-
    M =            4
 
    I      A(i)      B(i)
 
     1      0.0000      1.0000
     2      0.0000      1.0000
     3      0.0000      1.0000
     4      0.0000      1.0000
 
  Max(F) =  -0.973845E-05
  Min(F) =   -7.60389    
  F(X*)  =   -7.63152    
 
  Problem        4
  f(x) = -100 * product(x) * exp(-x(4)) / (1+x(1)+x(
    M =            4
 
    I      A(i)      B(i)
 
     1      0.0000      1.0000
     2      0.0000      1.0000
     3      0.0000      1.0000
     4      0.0000      1.0000
 
  Max(F) =  -0.112023E-05
  Min(F) =   -9.16460    
  F(X*)  =   -9.19699    
 
  Problem        5
  f(x) = (x(1)-3/11)^2+(x(2)-6/13)^2+(x(3)-12/23)^4+
    M =            4
 
    I      A(i)      B(i)
 
     1      0.0000      1.0000
     2      0.0000      1.0000
     3      0.0000      1.0000
     4      0.0000      1.0000
 
  Max(F) =   0.989515    
  Min(F) =   0.556688E-04
  F(X*)  =    0.00000    
 
  Problem        6
  f(x) = - sin(1/x(1)+1/x(2)+1/x(3)+1/x(4))
    M =            4
 
    I      A(i)      B(i)
 
     1      0.0000      1.0000
     2      0.0000      1.0000
     3      0.0000      1.0000
     4      0.0000      1.0000
 
  Max(F) =    1.00000    
  Min(F) =   -1.00000    
  F(X*)  =   -1.00000    
 
  Problem        7
  f(x) = Langerman2 function
    M =            2
 
    I      A(i)      B(i)
 
     1      0.0000     10.0000
     2      0.0000     10.0000
 
  Max(F) =   -13.0000    
  Min(F) =   -13.0000    
  X* is not given.
 
  Problem        8
  f(x) = Langerman10 function
    M =           10
 
    I      A(i)      B(i)
 
     1      0.0000     10.0000
     2      0.0000     10.0000
     3      0.0000     10.0000
     4      0.0000     10.0000
     5      0.0000     10.0000
     6      0.0000     10.0000
     7      0.0000     10.0000
     8      0.0000     10.0000
     9      0.0000     10.0000
    10      0.0000     10.0000
 
  Max(F) =   0.859384E-01
  Min(F) =  -0.922965E-01
  X* is not given.
 
TEST_OPT_CON_PRB
  Normal end of execution.
 
15 January 2012   8:55:38.568 PM