function [ x, y ] = padua_point_set ( l )

%*****************************************************************************80
%
%% padua_point_set() sets the Padua points.
%
%  Licensing:
%
%    This code is distributed under the MIT license.
%
%  Modified:
%
%    29 May 2014
%
%  Author:
%
%    John Burkardt
%
%  Reference:
%
%    Marco Caliari, Stefano de Marchi, Marco Vianello,
%    Bivariate interpolation on the square at new nodal sets,
%    Applied Mathematics and Computation,
%    Volume 165, Number 2, 2005, pages 261-274.
%
%  Input:
%
%    integer L, the level.
%    0 <= L <= 10.
%
%  Output:
%
%    real X(N), Y(N), the Padua points.
%
  n = ( ( l + 1 ) * ( l + 2 ) ) / 2;
  x = zeros ( n, 1 );
  y = zeros ( n, 1 );

  if ( l == 0 )
    x( 1) =  0.000000000000000;
    y( 1) =  0.000000000000000;    
  elseif ( l == 1 )
    x( 1) = -1.000000000000000;
    y( 1) = -1.000000000000000;    
    x( 2) = -1.000000000000000;
    y( 2) =  1.000000000000000;    
    x( 3) =  1.000000000000000;
    y( 3) =  0.000000000000000;    
  elseif ( l == 2 )
    x( 1) = -1.000000000000000;
    y( 1) = -1.000000000000000;    
    x( 2) = -1.000000000000000;
    y( 2) =  0.5000000000000001;
    x( 3) =  0.000000000000000;
    y( 3) = -0.4999999999999998;    
    x( 4) =  0.000000000000000;
    y( 4) =  1.000000000000000;    
    x( 5) =  1.000000000000000;
    y( 5) = -1.000000000000000;
    x( 6) =  1.000000000000000;
    y( 6) =  0.5000000000000001;    
  elseif ( l == 3 )
    x( 1) = -1.000000000000000;
    y( 1) = -1.000000000000000;    
    x( 2) = -1.000000000000000;
    y( 2) =  0.000000000000000;
    x( 3) = -1.000000000000000;
    y( 3) =  1.000000000000000;    
    x( 4) = -0.4999999999999998;
    y( 4) = -0.7071067811865475;    
    x( 5) = -0.4999999999999998;
    y( 5) =  0.7071067811865476;    
    x( 6) =  0.5000000000000001;
    y( 6) = -1.000000000000000;    
    x( 7) =  0.5000000000000001;
    y( 7) =  0.000000000000000;    
    x( 8) =  0.5000000000000001;
    y( 8) =  1.000000000000000;    
    x( 9) =  1.000000000000000;
    y( 9) = -0.7071067811865475;    
    x(10) =  1.000000000000000;
    y(10) =  0.7071067811865476;    
  elseif ( l == 4 )
    x( 1) = -1.000000000000000;
    y( 1) = -1.000000000000000;   
    x( 2) = -1.000000000000000;
    y( 2) = -0.3090169943749473;    
    x( 3) = -1.000000000000000;
    y( 3) =  0.8090169943749475;    
    x( 4) = -0.7071067811865475;
    y( 4) = -0.8090169943749473;    
    x( 5) = -0.7071067811865475;
    y( 5) =  0.3090169943749475;
    x( 6) = -0.7071067811865475;
    y( 6) =  1.000000000000000;    
    x( 7) =  0.000000000000000;
    y( 7) = -1.000000000000000;   
    x( 8) =  0.000000000000000;
    y( 8) = -0.3090169943749473;    
    x( 9) =  0.000000000000000;
    y( 9) =  0.8090169943749475;    
    x(10) =  0.7071067811865476;
    y(10) = -0.8090169943749473;    
    x(11) =  0.7071067811865476;
    y(11) =  0.3090169943749475; 
    x(12) =  0.7071067811865476;
    y(12) =  1.000000000000000;    
    x(13) =  1.000000000000000;
    y(13) = -1.000000000000000;   
    x(14) =  1.000000000000000;
    y(14) = -0.3090169943749473;    
    x(15) =  1.000000000000000;
    y(15) =  0.8090169943749475;    
  elseif ( l == 5 )
    x( 1) = -1.000000000000000;
    y( 1) = -1.000000000000000;
    x( 2) = -1.000000000000000;
    y( 2) = -0.4999999999999998;    
    x( 3) = -1.000000000000000;
    y( 3) =  0.5000000000000001;    
    x( 4) = -1.000000000000000;
    y( 4) =  1.000000000000000;    
    x( 5) = -0.8090169943749473;
    y( 5) = -0.8660254037844387;
    x( 6) = -0.8090169943749473;
    y( 6) =  0.000000000000000;   
    x( 7) = -0.8090169943749473;
    y( 7) =  0.8660254037844387;
    x( 8) = -0.3090169943749473;
    y( 8) = -1.000000000000000;   
    x( 9) = -0.3090169943749473;
    y( 9) = -0.4999999999999998;    
    x(10) = -0.3090169943749473;
    y(10) =  0.5000000000000001;
    x(11) = -0.3090169943749473;
    y(11) =  1.000000000000000;   
    x(12) =  0.3090169943749475;
    y(12) = -0.8660254037844387;
    x(13) =  0.3090169943749475;
    y(13) =  0.000000000000000;    
    x(14) =  0.3090169943749475;
    y(14) =  0.8660254037844387;    
    x(15) =  0.8090169943749475;
    y(15) = -1.000000000000000;    
    x(16) =  0.8090169943749475;
    y(16) = -0.4999999999999998;    
    x(17) =  0.8090169943749475;
    y(17) =  0.5000000000000001;
    x(18) =  0.8090169943749475;
    y(18) =  1.000000000000000;
    x(19) =  1.000000000000000;
    y(19) = -0.8660254037844387;    
    x(20) =  1.000000000000000;
    y(20) =  0.000000000000000;
    x(21) =  1.000000000000000;
    y(21) =  0.8660254037844387; 
  elseif ( l == 6 )   
    x( 1) = -1.000000000000000;
    y( 1) = -1.000000000000000;   
    x( 2) = -1.000000000000000;
    y( 2) = -0.6234898018587335;    
    x( 3) = -1.000000000000000;
    y( 3) =  0.2225209339563144;    
    x( 4) = -1.000000000000000;
    y( 4) =  0.9009688679024191;    
    x( 5) = -0.8660254037844387;
    y( 5) = -0.9009688679024190;    
    x( 6) = -0.8660254037844387;
    y( 6) = -0.2225209339563143;    
    x( 7) = -0.8660254037844387;
    y( 7) =  0.6234898018587336;
    x( 8) = -0.8660254037844387;
    y( 8) =  1.000000000000000;
    x( 9) = -0.4999999999999998;
    y( 9) = -1.000000000000000;   
    x(10) = -0.4999999999999998;
    y(10) = -0.6234898018587335;    
    x(11) = -0.4999999999999998;
    y(11) =  0.2225209339563144;    
    x(12) = -0.4999999999999998;
    y(12) =  0.9009688679024191;    
    x(13) =  0.000000000000000;
    y(13) = -0.9009688679024190;    
    x(14) =  0.000000000000000;
    y(14) = -0.2225209339563143;
    x(15) =  0.000000000000000;
    y(15) =  0.6234898018587336;    
    x(16) =  0.000000000000000;
    y(16) =  1.000000000000000;
    x(17) =  0.5000000000000001;
    y(17) = -1.000000000000000;    
    x(18) =  0.5000000000000001;
    y(18) = -0.6234898018587335;    
    x(19) =  0.5000000000000001;
    y(19) =  0.2225209339563144;    
    x(20) =  0.5000000000000001;
    y(20) =  0.9009688679024191;    
    x(21) =  0.8660254037844387;
    y(21) = -0.9009688679024190;    
    x(22) =  0.8660254037844387;
    y(22) = -0.2225209339563143;    
    x(23) =  0.8660254037844387;
    y(23) =  0.6234898018587336;
    x(24) =  0.8660254037844387;
    y(24) =  1.000000000000000;    
    x(25) =  1.000000000000000;
    y(25) = -1.000000000000000;   
    x(26) =  1.000000000000000;
    y(26) = -0.6234898018587335;    
    x(27) =  1.000000000000000;
    y(27) =  0.2225209339563144;
    x(28) =  1.000000000000000;
    y(28) =  0.9009688679024191;
  elseif ( l == 7 )    
    x( 1) = -1.000000000000000;
    y( 1) = -1.000000000000000;
    x( 2) = -1.000000000000000;
    y( 2) = -0.7071067811865475;    
    x( 3) = -1.000000000000000;
    y( 3) =  0.000000000000000;   
    x( 4) = -1.000000000000000;
    y( 4) =  0.7071067811865476; 
    x( 5) = -1.000000000000000;
    y( 5) =  1.000000000000000;    
    x( 6) = -0.9009688679024190;
    y( 6) = -0.9238795325112867;    
    x( 7) = -0.9009688679024190;
    y( 7) = -0.3826834323650897;    
    x( 8) = -0.9009688679024190;
    y( 8) =  0.3826834323650898;    
    x( 9) = -0.9009688679024190;
    y( 9) =  0.9238795325112867;
    x(10) = -0.6234898018587335;
    y(10) = -1.000000000000000;   
    x(11) = -0.6234898018587335;
    y(11) = -0.7071067811865475;
    x(12) = -0.6234898018587335;
    y(12) =  0.000000000000000;   
    x(13) = -0.6234898018587335;
    y(13) =  0.7071067811865476;
    x(14) = -0.6234898018587335;
    y(14) =  1.000000000000000;   
    x(15) = -0.2225209339563143;
    y(15) = -0.9238795325112867;    
    x(16) = -0.2225209339563143;
    y(16) = -0.3826834323650897;    
    x(17) = -0.2225209339563143;
    y(17) =  0.3826834323650898;    
    x(18) = -0.2225209339563143;
    y(18) =  0.9238795325112867;
    x(19) =  0.2225209339563144;
    y(19) = -1.000000000000000;   
    x(20) =  0.2225209339563144;
    y(20) = -0.7071067811865475;
    x(21) =  0.2225209339563144;
    y(21) =  0.000000000000000;
    x(22) =  0.2225209339563144;
    y(22) =  0.7071067811865476;
    x(23) =  0.2225209339563144;
    y(23) =  1.000000000000000;   
    x(24) =  0.6234898018587336;
    y(24) = -0.9238795325112867;    
    x(25) =  0.6234898018587336;
    y(25) = -0.3826834323650897;    
    x(26) =  0.6234898018587336;
    y(26) =  0.3826834323650898;    
    x(27) =  0.6234898018587336;
    y(27) =  0.9238795325112867;
    x(28) =  0.9009688679024191;
    y(28) = -1.000000000000000;   
    x(29) =  0.9009688679024191;
    y(29) = -0.7071067811865475;
    x(30) =  0.9009688679024191;
    y(30) =  0.000000000000000;   
    x(31) =  0.9009688679024191;
    y(31) =  0.7071067811865476;
    x(32) =  0.9009688679024191;
    y(32) =  1.000000000000000;   
    x(33) =  1.000000000000000;
    y(33) = -0.9238795325112867;    
    x(34) =  1.000000000000000;
    y(34) = -0.3826834323650897;    
    x(35) =  1.000000000000000;
    y(35) =  0.3826834323650898;    
    x(36) =  1.000000000000000;
    y(36) =  0.9238795325112867; 
  elseif ( l == 8 ) 
    x( 1) = -1.000000000000000;
    y( 1) = -1.000000000000000;   
    x( 2) = -1.000000000000000;
    y( 2) = -0.7660444431189779;    
    x( 3) = -1.000000000000000;
    y( 3) = -0.1736481776669303;    
    x( 4) = -1.000000000000000;
    y( 4) =  0.5000000000000001;    
    x( 5) = -1.000000000000000;
    y( 5) =  0.9396926207859084;    
    x( 6) = -0.9238795325112867;
    y( 6) = -0.9396926207859083;    
    x( 7) = -0.9238795325112867;
    y( 7) = -0.4999999999999998;    
    x( 8) = -0.9238795325112867;
    y( 8) =  0.1736481776669304;    
    x( 9) = -0.9238795325112867;
    y( 9) =  0.7660444431189780;
    x(10) = -0.9238795325112867;
    y(10) =  1.000000000000000;
    x(11) = -0.7071067811865475;
    y(11) = -1.000000000000000;   
    x(12) = -0.7071067811865475;
    y(12) = -0.7660444431189779;    
    x(13) = -0.7071067811865475;
    y(13) = -0.1736481776669303;    
    x(14) = -0.7071067811865475;
    y(14) =  0.5000000000000001;    
    x(15) = -0.7071067811865475;
    y(15) =  0.9396926207859084;    
    x(16) = -0.3826834323650897;
    y(16) = -0.9396926207859083;    
    x(17) = -0.3826834323650897;
    y(17) = -0.4999999999999998;    
    x(18) = -0.3826834323650897;
    y(18) =  0.1736481776669304;    
    x(19) = -0.3826834323650897;
    y(19) =  0.7660444431189780;
    x(20) = -0.3826834323650897;
    y(20) =  1.000000000000000;    
    x(21) =  0.000000000000000;
    y(21) = -1.000000000000000;   
    x(22) =  0.000000000000000;
    y(22) = -0.7660444431189779;    
    x(23) =  0.000000000000000;
    y(23) = -0.1736481776669303;    
    x(24) =  0.000000000000000;
    y(24) =  0.5000000000000001;    
    x(25) =  0.000000000000000;
    y(25) =  0.9396926207859084;    
    x(26) =  0.3826834323650898;
    y(26) = -0.9396926207859083;    
    x(27) =  0.3826834323650898;
    y(27) = -0.4999999999999998;    
    x(28) =  0.3826834323650898;
    y(28) =  0.1736481776669304;    
    x(29) =  0.3826834323650898;
    y(29) =  0.7660444431189780;
    x(30) =  0.3826834323650898;
    y(30) =  1.000000000000000;
    x(31) =  0.7071067811865476;
    y(31) = -1.000000000000000;   
    x(32) =  0.7071067811865476;
    y(32) = -0.7660444431189779;    
    x(33) =  0.7071067811865476;
    y(33) = -0.1736481776669303;    
    x(34) =  0.7071067811865476;
    y(34) =  0.5000000000000001;    
    x(35) =  0.7071067811865476;
    y(35) =  0.9396926207859084;    
    x(36) =  0.9238795325112867;
    y(36) = -0.9396926207859083;    
    x(37) =  0.9238795325112867;
    y(37) = -0.4999999999999998;    
    x(38) =  0.9238795325112867;
    y(38) =  0.1736481776669304;    
    x(39) =  0.9238795325112867;
    y(39) =  0.7660444431189780;
    x(40) =  0.9238795325112867;
    y(40) =  1.000000000000000;    
    x(41) =  1.000000000000000;
    y(41) = -1.000000000000000;   
    x(42) =  1.000000000000000;
    y(42) = -0.7660444431189779;    
    x(43) =  1.000000000000000;
    y(43) = -0.1736481776669303;    
    x(44) =  1.000000000000000;
    y(44) =  0.5000000000000001;
    x(45) =  1.000000000000000;
    y(45) =  0.9396926207859084;   
  elseif ( l == 9 ) 
    x( 1) = -1.000000000000000;
    y( 1) = -1.000000000000000;   
    x( 2) = -1.000000000000000;
    y( 2) = -0.8090169943749473;    
    x( 3) = -1.000000000000000;
    y( 3) = -0.3090169943749473;    
    x( 4) = -1.000000000000000;
    y( 4) =  0.3090169943749475;
    x( 5) = -1.000000000000000;
    y( 5) =  0.8090169943749475;    
    x( 6) = -1.000000000000000;
    y( 6) =  1.000000000000000;   
    x( 7) = -0.9396926207859083;
    y( 7) = -0.9510565162951535;    
    x( 8) = -0.9396926207859083;
    y( 8) = -0.5877852522924730;
    x( 9) = -0.9396926207859083;
    y( 9) =  0.000000000000000;   
    x(10) = -0.9396926207859083;
    y(10) =  0.5877852522924731;    
    x(11) = -0.9396926207859083;
    y(11) =  0.9510565162951535;
    x(12) = -0.7660444431189779;
    y(12) = -1.000000000000000;   
    x(13) = -0.7660444431189779;
    y(13) = -0.8090169943749473;    
    x(14) = -0.7660444431189779;
    y(14) = -0.3090169943749473;    
    x(15) = -0.7660444431189779;
    y(15) =  0.3090169943749475;    
    x(16) = -0.7660444431189779;
    y(16) =  0.8090169943749475; 
    x(17) = -0.7660444431189779;
    y(17) =  1.000000000000000;   
    x(18) = -0.4999999999999998;
    y(18) = -0.9510565162951535;    
    x(19) = -0.4999999999999998;
    y(19) = -0.5877852522924730;
    x(20) = -0.4999999999999998;
    y(20) =  0.000000000000000;   
    x(21) = -0.4999999999999998;
    y(21) =  0.5877852522924731;    
    x(22) = -0.4999999999999998;
    y(22) =  0.9510565162951535;
    x(23) = -0.1736481776669303;
    y(23) = -1.000000000000000;   
    x(24) = -0.1736481776669303;
    y(24) = -0.8090169943749473;    
    x(25) = -0.1736481776669303;
    y(25) = -0.3090169943749473;    
    x(26) = -0.1736481776669303;
    y(26) =  0.3090169943749475;    
    x(27) = -0.1736481776669303;
    y(27) =  0.8090169943749475;
    x(28) = -0.1736481776669303;
    y(28) =  1.000000000000000;   
    x(29) =  0.1736481776669304;
    y(29) = -0.9510565162951535;    
    x(30) =  0.1736481776669304;
    y(30) = -0.5877852522924730;
    x(31) =  0.1736481776669304;
    y(31) =  0.000000000000000;   
    x(32) =  0.1736481776669304;
    y(32) =  0.5877852522924731;    
    x(33) =  0.1736481776669304;
    y(33) =  0.9510565162951535;
    x(34) =  0.5000000000000001;
    y(34) = -1.000000000000000;   
    x(35) =  0.5000000000000001;
    y(35) = -0.8090169943749473;    
    x(36) =  0.5000000000000001;
    y(36) = -0.3090169943749473;    
    x(37) =  0.5000000000000001;
    y(37) =  0.3090169943749475;    
    x(38) =  0.5000000000000001;
    y(38) =  0.8090169943749475;
    x(39) =  0.5000000000000001;
    y(39) =  1.000000000000000;   
    x(40) =  0.7660444431189780;
    y(40) = -0.9510565162951535;    
    x(41) =  0.7660444431189780;
    y(41) = -0.5877852522924730;
    x(42) =  0.7660444431189780;
    y(42) =  0.000000000000000;   
    x(43) =  0.7660444431189780;
    y(43) =  0.5877852522924731;    
    x(44) =  0.7660444431189780;
    y(44) =  0.9510565162951535;
    x(45) =  0.9396926207859084;
    y(45) = -1.000000000000000;   
    x(46) =  0.9396926207859084;
    y(46) = -0.8090169943749473;    
    x(47) =  0.9396926207859084;
    y(47) = -0.3090169943749473;    
    x(48) =  0.9396926207859084;
    y(48) =  0.3090169943749475;    
    x(49) =  0.9396926207859084;
    y(49) =  0.8090169943749475;
    x(50) =  0.9396926207859084;
    y(50) =  1.000000000000000;   
    x(51) =  1.000000000000000;
    y(51) = -0.9510565162951535;
    x(52) =  1.000000000000000;
    y(52) = -0.5877852522924730;    
    x(53) =  1.000000000000000;
    y(53) =  0.000000000000000;   
    x(54) =  1.000000000000000;
    y(54) =  0.5877852522924731;
    x(55) =  1.000000000000000;
    y(55) =  0.9510565162951535;    
  elseif ( l == 10 )
    x( 1) = -1.000000000000000;
    y( 1) = -1.000000000000000;   
    x( 2) = -1.000000000000000;
    y( 2) = -0.8412535328311811;    
    x( 3) = -1.000000000000000;
    y( 3) = -0.4154150130018863;    
    x( 4) = -1.000000000000000;
    y( 4) =  0.1423148382732851;    
    x( 5) = -1.000000000000000;
    y( 5) =  0.6548607339452851;    
    x( 6) = -1.000000000000000;
    y( 6) =  0.9594929736144974;    
    x( 7) = -0.9510565162951535;
    y( 7) = -0.9594929736144974;    
    x( 8) = -0.9510565162951535;
    y( 8) = -0.6548607339452850;    
    x( 9) = -0.9510565162951535;
    y( 9) = -0.1423148382732850;    
    x(10) = -0.9510565162951535;
    y(10) =  0.4154150130018864;    
    x(11) = -0.9510565162951535;
    y(11) =  0.8412535328311812;
    x(12) = -0.9510565162951535;
    y(12) =  1.000000000000000;
    x(13) = -0.8090169943749473;
    y(13) = -1.000000000000000;   
    x(14) = -0.8090169943749473;
    y(14) = -0.8412535328311811;    
    x(15) = -0.8090169943749473;
    y(15) = -0.4154150130018863;    
    x(16) = -0.8090169943749473;
    y(16) =  0.1423148382732851;    
    x(17) = -0.8090169943749473;
    y(17) =  0.6548607339452851;    
    x(18) = -0.8090169943749473;
    y(18) =  0.9594929736144974;    
    x(19) = -0.5877852522924730;
    y(19) = -0.9594929736144974;    
    x(20) = -0.5877852522924730;
    y(20) = -0.6548607339452850;    
    x(21) = -0.5877852522924730;
    y(21) = -0.1423148382732850;    
    x(22) = -0.5877852522924730;
    y(22) =  0.4154150130018864;    
    x(23) = -0.5877852522924730;
    y(23) =  0.8412535328311812;
    x(24) = -0.5877852522924730;
    y(24) =  1.000000000000000;
    x(25) = -0.3090169943749473;
    y(25) = -1.000000000000000;   
    x(26) = -0.3090169943749473;
    y(26) = -0.8412535328311811;    
    x(27) = -0.3090169943749473;
    y(27) = -0.4154150130018863;    
    x(28) = -0.3090169943749473;
    y(28) =  0.1423148382732851;    
    x(29) = -0.3090169943749473;
    y(29) =  0.6548607339452851;    
    x(30) = -0.3090169943749473;
    y(30) =  0.9594929736144974;    
    x(31) =  0.000000000000000;
    y(31) = -0.9594929736144974;    
    x(32) =  0.000000000000000;
    y(32) = -0.6548607339452850;    
    x(33) =  0.000000000000000;
    y(33) = -0.1423148382732850;    
    x(34) =  0.000000000000000;
    y(34) =  0.4154150130018864;
    x(35) =  0.000000000000000;
    y(35) =  0.8412535328311812;    
    x(36) =  0.000000000000000;
    y(36) =  1.000000000000000; 
    x(37) =  0.3090169943749475;
    y(37) = -1.000000000000000;    
    x(38) =  0.3090169943749475;
    y(38) = -0.8412535328311811;    
    x(39) =  0.3090169943749475;
    y(39) = -0.4154150130018863;    
    x(40) =  0.3090169943749475;
    y(40) =  0.1423148382732851;    
    x(41) =  0.3090169943749475;
    y(41) =  0.6548607339452851;    
    x(42) =  0.3090169943749475;
    y(42) =  0.9594929736144974;    
    x(43) =  0.5877852522924731;
    y(43) = -0.9594929736144974;    
    x(44) =  0.5877852522924731;
    y(44) = -0.6548607339452850;    
    x(45) =  0.5877852522924731;
    y(45) = -0.1423148382732850;    
    x(46) =  0.5877852522924731;
    y(46) =  0.4154150130018864;    
    x(47) =  0.5877852522924731;
    y(47) =  0.8412535328311812;
    x(48) =  0.5877852522924731;
    y(48) =  1.000000000000000;
    x(49) =  0.8090169943749475;
    y(49) = -1.000000000000000;   
    x(50) =  0.8090169943749475;
    y(50) = -0.8412535328311811;    
    x(51) =  0.8090169943749475;
    y(51) = -0.4154150130018863;    
    x(52) =  0.8090169943749475;
    y(52) =  0.1423148382732851;    
    x(53) =  0.8090169943749475;
    y(53) =  0.6548607339452851;    
    x(54) =  0.8090169943749475;
    y(54) =  0.9594929736144974;    
    x(55) =  0.9510565162951535;
    y(55) = -0.9594929736144974;    
    x(56) =  0.9510565162951535;
    y(56) = -0.6548607339452850;    
    x(57) =  0.9510565162951535;
    y(57) = -0.1423148382732850;    
    x(58) =  0.9510565162951535;
    y(58) =  0.4154150130018864;    
    x(59) =  0.9510565162951535;
    y(59) =  0.8412535328311812;
    x(60) =  0.9510565162951535;
    y(60) =  1.000000000000000;    
    x(61) =  1.000000000000000;
    y(61) = -1.000000000000000;   
    x(62) =  1.000000000000000;
    y(62) = -0.8412535328311811;    
    x(63) =  1.000000000000000;
    y(63) = -0.4154150130018863;    
    x(64) =  1.000000000000000;
    y(64) =  0.1423148382732851;    
    x(65) =  1.000000000000000;
    y(65) =  0.6548607339452851; 
    x(66) =  1.000000000000000;
    y(66) =  0.9594929736144974;
  else
    fprintf ( 1, '\n' );
    fprintf ( 1, 'PADUA_POINT_SET - Fatal error!\n' );
    fprintf ( 1, '  Illegal value of L = %d\n', l );
    fprintf ( 1, '  Legal values are 1 through 10.\n' );
    error ( 'PADUA_POINT_SET - Fatal error!' );
  end

  return
end
