17 May 2007  11:00:49.324 AM
 
TEST_TET_MESH_PRB
  FORTRAN90 version
  Test the routines in TEST_TET_MESH.
 
TEST01
  P00_TEST_NUM reports the number of problems.
  P00_TITLE returns a title for each problem.
  P00_HEADER prints some information about each problem.
 
  The number of tests available =      4
 
  Test number:             1
  Title:             "#1: The 3x1x1 box."
 
P01:
  Sample problem #1
  The channel.
  3 x 1 x 1 box.
 
  Test number:             2
  Title:             "#2: The vertical cylinder."
 
P02:
  Sample problem #2
  The vertical cylinder.
  radius R =    1.00000    
  height H =    4.00000    
 
  Test number:             3
  Title:             "#3: The unit cube."
 
P03:
  Sample problem #3
  The unit cube.
 
  Test number:             4
  Title:             "#4: The unit sphere."
 
P04:
  Sample problem #4
  The unit sphere.
 
TEST02
  P00_TEST_NUM reports the number of problems.
  P00_SAMPLE returns sample points from the region.
 
  Test number       =         1
  Title:            =   "#1: The 3x1x1 box."
  Dimension DIM_NUM =         3
  Number of samples N =      20
  Initial SEED:       =     123456789
 
 
  The sample points:
 
  Row         1             2             3       
  Col
 
    1    2.95170       .699951       .275312    
    2    1.98331       .809842       .910005    
    3    .913389       .484259       .985392    
    4    1.04138       .548013       .613791    
    5    2.91430       .881942       .128992    
    6    2.78832       .763443       .533767    
    7    .213261       .404085       .730667    
    8    1.90707       .879175       .688990    
    9    2.35795       .231286       .237979    
   10    2.85169       .621155       .528212    
   11    2.20002      0.587902E-01   .465905    
   12    .906821       .209399       .293960    
   13    1.79400       .461151       .910975    
   14    1.02926      0.690122E-01   .619393    
   15    .914522      0.326007E-01   .438395    
   16    .606207       .616997       .851307    
   17    1.38401       .886003      0.249377E-01
   18    .663620       .536860       .192213    
   19    1.96347       .987301       .918497    
   20    1.60388       .685267       .394949    
 
 
  Test number       =         2
  Title:            =   "#2: The vertical cylinder."
  Dimension DIM_NUM =         3
  Number of samples N =      20
  Initial SEED:       =     123456789
 
 
  The sample points:
 
  Row         1             2             3       
  Col
 
    1    .935744      -.102854       2.23469    
    2    .380710      -.848883       3.55127    
    3    .178766     -0.494279E-02   3.59503    
    4   -.670352       .581064       2.73693    
    5   -.236725      -.689062       3.35045    
    6   -.790662       .371393       3.24340    
    7   -.118169     -0.908686E-01   1.63963    
    8    .955618      -.269165       .414000    
    9   -.265367      -.512835       3.41784    
   10    .304554      -.198997       2.96096    
   11   -.602977       .160442       .180627    
   12    .612442       .704234       .164589    
   13  -0.813113E-01  -.560071       3.63510    
   14    .844122      -.349479       3.52711    
   15   -.189809      -.287926       2.49909    
   16   -.907570      -.405802       2.12447    
   17   0.932887E-01   .801081       2.83204    
   18    .543541       .580003       1.17379    
   19    .248064     -0.256080E-01   2.37909    
   20    .796142      -.505004       2.25843    
 
 
  Test number       =         3
  Title:            =   "#3: The unit cube."
  Dimension DIM_NUM =         3
  Number of samples N =      20
  Initial SEED:       =     123456789
 
 
  The sample points:
 
  Row         1             2             3       
  Col
 
    1    .526913      0.921887E-01   .981483    
    2    .387869       .131022       .501787    
    3    .512005       .848747       .378780    
    4    .277729       .102401       .405839    
    5    .700431       .320663       .292661    
    6    .152813       .362698       .740938    
    7   0.438785E-01   .129158       .110637    
    8    .886849       .739053       .232340    
    9    .827936       .810950       .361300    
   10   0.535236E-01   .627651       .902366    
   11   0.169752E-01   .530536       .547154    
   12    .888047       .898476       .815088    
   13    .425768       .498782       .139382    
   14    .932022       .914930       .583040    
   15    .160316      0.902806E-01   .798180    
   16    .862260       .239768       .410944    
   17    .644861       .282535      0.119195E-01
   18    .565256       .682934       .414144    
   19    .937130       .835367       .736172    
   20   0.899037E-01   .359572       .684804    
 
 
  Test number       =         4
  Title:            =   "#4: The unit sphere."
  Dimension DIM_NUM =         3
  Number of samples N =      20
  Initial SEED:       =     123456789
 
 
  The sample points:
 
  Row         1             2             3       
  Col
 
    1    .747368      -.210437      -.529145    
    2    .387869       .131022       .501787    
    3    .512005       .848747       .378780    
    4    .277729       .102401       .405839    
    5    .700431       .320663       .292661    
    6    .152813       .362698       .740938    
    7   0.438785E-01   .129158       .110637    
    8    .886849       .739053       .232340    
    9    .827936       .810950       .361300    
   10   0.535236E-01   .627651       .902366    
   11   0.169752E-01   .530536       .547154    
   12    .888047       .898476       .815088    
   13    .425768       .498782       .139382    
   14    .932022       .914930       .583040    
   15    .160316      0.902806E-01   .798180    
   16    .862260       .239768       .410944    
   17    .644861       .282535      0.119195E-01
   18    .565256       .682934       .414144    
   19    .937130       .835367       .736172    
   20   0.899037E-01   .359572       .684804    
 
 
TEST_TET_MESH_PRB
  Normal end of execution.
 
17 May 2007  11:00:49.326 AM