10 July 2014 3:44:55.557 PM TETRAHEDRON_ARBQ_RULE_PRB FORTRAN77 version Test the TETRAHEDRON_ARBQ_RULE library. TEST01 Quadrature rule for the reference tetrahedron. Polynomial exactness degree DEGREE = 8 Number of nodes N = 44 J W X Y Z 1 0.164537E-02 -0.161177E-01 0.799860E-03 1.14075 2 0.142023E-01 -0.714883E-02 0.172391 0.786070 3 0.931167E-02 0.458992 -0.174472 -0.399143 4 0.954964E-02 -0.452099 -0.263294 0.353609 5 0.166053E-01 0.110956 -0.629572E-01 0.818940 6 0.147233E-01 0.182522 0.167838 0.476496 7 0.169601E-01 -0.150749 -0.782694E-01 0.762897 8 0.155840E-01 -0.287732 -0.123469 -0.388006 9 0.212175E-01 0.368075 -0.216988 0.399755 10 0.120674E-01 0.478816 -0.462944E-01 0.114466 11 0.256962E-01 -0.347878 -0.129563 0.250917 12 0.304461E-01 -0.354829E-01 -0.226811 0.417462 13 0.265737E-01 0.259165 0.133007 -0.274778 14 0.227767E-01 -0.130504E-02 0.491941 0.303193 15 0.303973E-01 -0.349400E-01 0.300200 -0.344250 16 0.344598E-01 -0.166046 0.140774 0.397054 17 0.391902E-01 0.101009 -0.225926 -0.307089 18 0.368287E-01 -0.358747 -0.108320 -0.198990 19 0.237014E-01 -0.347307 -0.374230 0.152626E-01 20 0.498396E-01 -0.863574E-01 -0.147806 -0.154235E-03 21 0.308556E-01 0.290117 -0.344951 0.412103E-01 22 0.526017E-01 0.104209 0.288367E-01 0.324891 23 0.503024E-01 -0.641939E-01 0.255813 -0.695790E-01 24 0.255667E-01 -0.201699 0.440437 -0.334099E-01 25 0.378055E-01 0.184617 0.399857 -0.130353E-01 26 0.488183E-01 0.378889 -0.995659E-01 -0.839032E-01 27 0.214430E-01 -0.481872 -0.150975E-01 -0.450140E-01 28 0.138781E-01 0.682172 -0.395652 -0.745152E-01 29 0.650296E-02 0.397864 0.225662 -0.399394 30 0.160044E-01 -0.697589 -0.389965 -0.125421 31 0.163947E-01 0.274296E-02 0.813500 -0.141582 32 0.212691E-01 0.164569E-01 -0.445104 -0.185824 33 0.221550E-01 -0.461835 -0.453565 -0.324551 34 0.189945E-01 0.157509 0.665015 -0.331712 35 0.193700E-01 0.539918 -0.467462 -0.316816 36 0.168752E-01 -0.140391 0.701265 -0.337215 37 0.709101E-02 0.445340E-01 -0.510724 -0.395001 38 0.206706E-01 -0.423436 0.226332 -0.333644 39 0.129502E-01 -0.721418 -0.272716 -0.351939 40 0.145084E-01 0.727812 -0.286163 -0.322617 41 0.111868E-01 0.490189 0.185631 -0.278004 42 0.240124E-02 -0.875889 -0.556637 -0.372058 43 0.196018E-02 0.763238E-02 1.05606 -0.397275 44 0.142736E-02 0.931743 -0.566425 -0.382107 Sum 0.942809 Volume 0.942809 TEST02 Get a quadrature rule for the reference tetrahedron. Then write it to a file. Polynomial exactness degree DEGREE = 8 Quadrature rule written to file "tetrahedron08.txt". TEST03 Get a quadrature rule for the reference square. Set up GNUPLOT graphics input. Polynomial exactness degree DEGREE = 8 Created tetrahedron file "tetrahedron08_vertices.txt". Created node file "tetrahedron08_nodes.txt". Created command file "tetrahedron08_commands.txt". TEST04 Get a quadrature rule for the reference tetrahedron. Test its accuracy. Polynomial exactness degree DEGREE = 8 RMS error = 0.174408E-16 TETRAHEDRON_ARBQ_RULE_PRB Normal end of execution. 10 July 2014 3:44:55.590 PM