function rule_num = nco_tetrahedron_rule_num ( DUMMY ) %*****************************************************************************80 % %% NCO_TETRAHEDRON_RULE_NUM returns the number of NCO rules available. % % Licensing: % % This code is distributed under the GNU LGPL license. % % Modified: % % 31 January 2007 % % Author: % % John Burkardt % % Reference: % % Peter Silvester, % Symmetric Quadrature Formulae for Simplexes, % Mathematics of Computation, % Volume 24, Number 109, January 1970, pages 95-100. % % Parameters: % % Output, integer RULE_NUM, the number of rules available. % rule_num = 7; return end