function [ x, y, w ] = rule41 ( )

%*****************************************************************************80
%
%% RULE41 returns the rule of degree 41.
%
%  Discussion:
%
%    Order 41 (309 pts)
%    1/6 data for 41-th order quadrature with 58 nodes.
%
%  Licensing:
%
%    This code is distributed under the GNU LGPL license.
%
%  Modified:
%
%    26 June 2014
%
%  Author:
%
%    Original FORTRAN77 version by Hong Xiao, Zydrunas Gimbutas.
%    This MATLAB version by John Burkardt.
%
%  Parameters:
%
%    Output, real X(*), Y(*), the coordinates of the nodes.
%
%    Output, real W(*), the weights.
%
  x = [ ...
       0.00000000000000000000000000000000, ...
       0.00000000000000000000000000000000, ...
       0.00000000000000000000000000000000, ...
      -0.90707509366054513441839735030000, ...
      -0.83678266843431511046582515644399, ...
      -0.94247957093734042414919187055867, ...
      -0.47818348033753518695149771130636, ...
      -0.47786178727052685018858128857025, ...
       0.00000000000000000000000000000000, ...
      -0.82977481051684242521921168766497, ...
      -0.80506207604730995380052139962066, ...
      -0.75892338634994084017742272212251, ...
      -0.66697937351822451848579519358950E-01, ...
      -0.93039119591469919672730326618751, ...
      -0.10179246544689757723568411908004, ...
       0.00000000000000000000000000000000, ...
      -0.11964378950220348999333477645940, ...
      -0.89370315180977679131356546281919, ...
       0.00000000000000000000000000000000, ...
       0.00000000000000000000000000000000, ...
      -0.12537506708828195458087022987466, ...
       0.00000000000000000000000000000000, ...
      -0.86060405291382569981156454363751, ...
      -0.37246528778512515239684348047261, ...
      -0.25224760836480194469992557046715, ...
      -0.77250795122178423033233897226693, ...
      -0.97281903597154664921569844697325, ...
      -0.20361834007684187876306722478542, ...
      -0.14229399114449109919839299325896, ...
       0.00000000000000000000000000000000, ...
      -0.71543818078714833155329003431939E-01, ...
       0.00000000000000000000000000000000, ...
      -0.34072584339074050558489837485303, ...
      -0.25420500317361023538457045471745, ...
      -0.13311178834618634999839119772768, ...
      -0.42835120414075877047497032365690, ...
      -0.28308678232916800143508359259067, ...
      -0.38982610581001483073643842554906, ...
      -0.71358109961060030283458818362239, ...
      -0.67177893900431715796469854575323, ...
      -0.75059812077502214633644715294448, ...
      -0.59464715111368400987629742768832, ...
      -0.55914730411574729626305044953771, ...
      -0.47513641482741620402395711593316, ...
      -0.55098939175943078591819138664469, ...
       0.00000000000000000000000000000000, ...
      -0.66906775613675318713614198789292, ...
      -0.42086181836543388245829813956203, ...
      -0.21245173597369898203729302395941, ...
      -0.25800420807868548956655134212985, ...
      -0.29370336187542435095775000461405, ...
      -0.60047596226514389492291181185375, ...
      -0.64378659978871008420405373260754, ...
      -0.52124100620529880265092320687752, ...
      -0.35101185488933557658235806095652, ...
      -0.14878346974678461727537723668515, ...
       0.00000000000000000000000000000000, ...
       0.00000000000000000000000000000000 ];
  y = [ ... ...
       0.11484303236078189653199134730205E+01, ...
       0.64867318675503157654602022450247E-01, ...
      -0.13336487938297912910317293715113, ...
      -0.50914331749408594839577823579785, ...
      -0.54016766573740110842549247829795, ...
      -0.55659144758280954666377007954550, ...
      -0.41036116782557410608240092285442, ...
      -0.35568548495723222120621918256555, ...
      -0.51447322281830402728376303287297, ...
      -0.50391286234357388108253695826115, ...
      -0.55710779590286589800031532601371, ...
      -0.46781272099145912035205586389519, ...
      -0.55164499869306851582964960390351, ...
      -0.57416322708744445609317793776209, ...
      -0.13038223693758752754332823314062, ...
       0.66182123823402367862263609405308, ...
      -0.51461673052711459891571855445469, ...
      -0.55908758428750220767836487535657, ...
       0.54975195106341269371593215963727, ...
      -0.31822881181210445991186635948848, ...
      -0.31576402673138936793850567085049, ...
       0.42731758372108878724118641820065, ...
      -0.57305121360034517332191987171046, ...
      -0.30895554368016513106704832983371, ...
      -0.31414513744457014202355344166677, ...
      -0.57323223918730283416506419525826, ...
      -0.57206883390058007347834073977517, ...
      -0.55123879656195327272974224654403, ...
      -0.57235407491813576252917143617978, ...
       0.24454257138245059331980778970388, ...
      -0.39589172778651022907750111971765, ...
      -0.57251313359481391919877047590178, ...
      -0.55166089418268212499172347118887, ...
      -0.51370572700173861398292804694009, ...
      -0.22603324747774107959414273668825, ...
      -0.46374623851729501975734765797479, ...
      -0.57244266277976037743059136383490, ...
      -0.51490548014106772939857400939256, ...
      -0.55283101652348038522394903514786, ...
      -0.46689252269607195573705009252807, ...
      -0.51923400712748281983594166768317, ...
      -0.40487430456712229688846342248602, ...
      -0.46537465321601328935261456909651, ...
      -0.55154491728129470377025145643426, ...
      -0.57240622147657917252995100547841, ...
      -0.22943850805370712324762812120392, ...
      -0.57244722857070476735714053106836, ...
      -0.57243826525037158906984485750360, ...
      -0.39438908961583798768936375721498, ...
      -0.22157162536728802662765970391773, ...
      -0.46047385175478172230586878054650, ...
      -0.55148536852211283444706530727333, ...
      -0.51606114317066720323109583010886, ...
      -0.51455997052960895786677902884130, ...
      -0.39271417796087884909400497182759, ...
      -0.46204815328845467442262509683753, ...
      -0.46220719577895767618412315479348, ...
       0.79756730028191280539809974543073 ];
  w = [ ... ...
       0.34355666699665572908084305656243E-04, ...
       0.42399098861468427455877995758264E-02, ...
       0.37154110284138247834042735653067E-02, ...
       0.12458404025090231132925565144087E-02, ...
       0.14185150154704695672229773526671E-02, ...
       0.72851462067084252604660686856037E-03, ...
       0.49283298823596391034884407259565E-02, ...
       0.53613423093296115706064365551043E-02, ...
       0.19577303889005218175716306314385E-02, ...
       0.23541334060017086291762687738959E-02, ...
       0.13574312941869499732389430016423E-02, ...
       0.33325721812546689467184010795628E-02, ...
       0.29644284948173195699449497133337E-02, ...
       0.37091902076730237290376100062468E-03, ...
       0.80403871323958185654768572258748E-02, ...
       0.27933379921942981118737786316620E-02, ...
       0.43548510260672555779566602140770E-02, ...
       0.98750346722284897815375163954063E-03, ...
       0.33140399984357008523996740964860E-02, ...
       0.39548685266133002402731823562045E-02, ...
       0.81907961822989578237987369917385E-02, ...
       0.39990415768416250914981967446877E-02, ...
       0.64543016375148533251238361162029E-03, ...
       0.77525238376409612296793051209554E-02, ...
       0.82098277784420498504581064200822E-02, ...
       0.77505992315050355696141616800802E-03, ...
       0.31460954824696309149912473051966E-03, ...
       0.30771570801706524162859379333622E-02, ...
       0.13758671651214991382998623408107E-02, ...
       0.44530286851553646989910342775063E-02, ...
       0.78835322339101614146632253638963E-02, ...
       0.67359298176593092050484809442566E-03, ...
       0.30115058169438009830398484639718E-02, ...
       0.47516681892344821461215335464754E-02, ...
       0.92897161081570613163976545109188E-02, ...
       0.57624992565964513866295347402457E-02, ...
       0.13386293617916449653435311528237E-02, ...
       0.45476733851440924400633719363253E-02, ...
       0.21881299772745267054828351965957E-02, ...
       0.44103886097359621239681297088827E-02, ...
       0.31408957167973836083480622860722E-02, ...
       0.54951077871372566664971370622657E-02, ...
       0.50946823920529338224773265834011E-02, ...
       0.28852806434905299950945859499645E-02, ...
       0.12012233088773826615649104421917E-02, ...
       0.47576797651663080029937010231751E-02, ...
       0.10565898230048048225468444873170E-02, ...
       0.12889097209731337671344489509095E-02, ...
       0.78373349308822302058968405245672E-02, ...
       0.88868099593492497317748964708364E-02, ...
       0.64917648662630346100035827874498E-02, ...
       0.26315125248814009986883523206499E-02, ...
       0.37615631205534999461032753334140E-02, ...
       0.42869570500049250611205071236900E-02, ...
       0.77283572873216484561057801262313E-02, ...
       0.67055003387097703603196736320573E-02, ...
       0.33782766604571404544711257767029E-02, ...
       0.26121233276609877149517818702563E-02 ];

  return
end
