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

%*****************************************************************************80
%
%% RULE37 returns the rule of degree 37.
%
%  Discussion:
%
%    Order 37 (252 pts)
%    1/6 data for 37-th order quadrature with 49 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.33412271632399888890129019512936, ...
       0.00000000000000000000000000000000, ...
      -0.75613518652324771803726882164662, ...
      -0.84800448035565502181663502981330, ...
      -0.70551641007683071137220723820188, ...
      -0.12346882279099691408072860937378, ...
      -0.14115293561514993591833853717433, ...
       0.00000000000000000000000000000000, ...
      -0.31129235394249030634514266109515, ...
      -0.25517618371949366971568295794296, ...
      -0.22738491727535507077740696347565, ...
      -0.82431411808054765778463063897013, ...
      -0.96025084028127376878602592691577, ...
      -0.88743516782176053029087010855756, ...
      -0.14743801672844793582653341492985, ...
       0.00000000000000000000000000000000, ...
       0.00000000000000000000000000000000, ...
      -0.63852651231947468903625801359977, ...
      -0.91244418004082918428945065210440, ...
       0.00000000000000000000000000000000, ...
      -0.53650720489459350535466965366810, ...
      -0.85277881576583532724521330388158E-01, ...
      -0.16435656319638607339573924940553, ...
      -0.81381272571201343203517786852045, ...
       0.00000000000000000000000000000000, ...
      -0.41910547578514426267307171420310, ...
      -0.48677494045468852012238429335006, ...
      -0.35909034523353810535799934366341, ...
       0.00000000000000000000000000000000, ...
      -0.25248858363296016573959873583852, ...
       0.00000000000000000000000000000000, ...
       0.00000000000000000000000000000000, ...
      -0.39948855862139271795827453837350, ...
       0.00000000000000000000000000000000, ...
       0.00000000000000000000000000000000, ...
      -0.74822550833094322230914938071543, ...
      -0.61214302766947216204021932607674, ...
      -0.82456232718866158786784556422156E-01, ...
       0.00000000000000000000000000000000, ...
      -0.28849633742385887838307907599387, ...
      -0.69338845905777882473767890474803, ...
      -0.17221861996121408821061372532618, ...
      -0.49166762890981157665024971850791, ...
      -0.33772735494586915349190113708600, ...
      -0.56199209754321689406198698034801, ...
      -0.62908155899883917171575081362878, ...
      -0.47085424810000757697255495637523, ...
       0.00000000000000000000000000000000 ];
  y = [ ... ...
       0.80030932175661049330529129464111, ...
      -0.51875656535329760898448830295380, ...
       0.10333868827205359544088392857986E+01, ...
      -0.51993973121116010442502084667746, ...
      -0.57382818530981477957536290227481, ...
      -0.48120343056361501578369820373486, ...
      -0.16501678669005198586553208123293, ...
      -0.44697785411625922396526760726341, ...
       0.25665474437476898507539344982761, ...
      -0.48447626446390567150790800247712, ...
      -0.41922309411584432631191867018353, ...
      -0.34332292689716552850094371729457, ...
      -0.50673434341218750366276527969451, ...
      -0.57217095597866797982914123136412, ...
      -0.54747072920426972017807350995914, ...
      -0.26364744637852948251388994918932, ...
       0.67166192797723746626700329929959, ...
      -0.44283386491499269166138431840481, ...
      -0.42124005904839257204244609933248, ...
      -0.57039245293560439673032555344414, ...
      -0.15872646837427968615407557344963, ...
      -0.43711422090147355697061182546047, ...
      -0.54811072534421336521000509462082, ...
      -0.50551055464016532277335287814759, ...
      -0.55356126813574196138633993389223, ...
       0.10946289447927698298356343395322E+01, ...
      -0.54631433608883669102312593267134, ...
      -0.35483129429226142896168273650094, ...
      -0.33950304358022085403206973553427, ...
       0.88453895937762153767287377553499, ...
      -0.54714013952455212484601864326434, ...
      -0.50545261693006535308892323009918, ...
      -0.27272204187887408822459840414627, ...
      -0.42805065874848260516272058041530, ...
      -0.57184433744987283372049694766113, ...
       0.83856840257338103751495755746255E-01, ...
      -0.57144178004035639723831793597820, ...
      -0.50017785048732220313797140417802, ...
      -0.36587111104193859470979519681048, ...
       0.11419818578211332577350031418259E+01, ...
      -0.23836996263996572403671622331600, ...
      -0.54563400792324411093065715450446, ...
      -0.57169987252525305855247428576888, ...
      -0.57133062792022124429581677109025, ...
      -0.57122090496927329315283644781684, ...
      -0.54470987727952378493452147796822, ...
      -0.57104889149424033456087085228856, ...
      -0.49810325155934541668515841885833, ...
       0.49872349530628412097743604970645 ];

  w = [ ... ...
       0.99626129730910408577949008400168E-03, ...
       0.27626921675168826283774018443100E-02, ...
       0.72692273468131503092373352604759E-03, ...
       0.25303170257571451860803668676728E-02, ...
       0.63229856016814473011800273541530E-03, ...
       0.39910569052688676630224931092243E-02, ...
       0.96322224231485228364344323861314E-02, ...
       0.70914264027495165913238721401754E-02, ...
       0.49912714680319196696789614840510E-02, ...
       0.60134263305403734057625688074224E-02, ...
       0.75284170176253568400370133216087E-02, ...
       0.88334951566927715848362109377594E-02, ...
       0.30494454960037220959042145422116E-02, ...
       0.40623159427664301328639018693128E-03, ...
       0.15854780081932780104600463914237E-02, ...
       0.10744094290784490004353067282619E-01, ...
       0.34547338677747299508167133011287E-02, ...
       0.38698068479336796185125547322801E-02, ...
       0.57440366524074741575884680707207E-02, ...
       0.72357295271785506116849988932337E-03, ...
       0.56884381303256696164588543099345E-02, ...
       0.69047009212170979910711955177161E-02, ...
       0.42884132950362761878776351004925E-02, ...
       0.62924591180266519167258563983064E-02, ...
       0.21172628941575284289686456117100E-02, ...
       0.57748488832703718923029245549870E-03, ...
       0.39252782695269835705405080071355E-02, ...
       0.80200877092618206400095291824248E-02, ...
       0.93274649768244852461773810704269E-02, ...
       0.23598744244779275367141637367377E-02, ...
       0.41453075810464728064443485645257E-02, ...
       0.32896867854980720978623838536080E-02, ...
       0.59742143446146166209795010947358E-02, ...
       0.82279235776610154350252369267537E-02, ...
       0.93156858510830936728471952983330E-03, ...
       0.67163446268129400718735416067323E-02, ...
       0.12493560653618925032728437197660E-02, ...
       0.53054261077983319226673244613556E-02, ...
       0.10755243143420365190907771759900E-01, ...
       0.11403474399353258205391049010235E-03, ...
       0.11790258338603034214469882053681E-01, ...
       0.32403041710010828670599208753256E-02, ...
       0.18705266785451222748868057200548E-02, ...
       0.17176825471147128641632325800221E-02, ...
       0.19029239546031546635251984688755E-02, ...
       0.38621442944772685484213090942755E-02, ...
       0.15746286043986147827363630712349E-02, ...
       0.64138925190696845281721401600690E-02, ...
       0.54555303295239163064914865711407E-02 ];

  return
end
