function [ x, w ] = rule15 ( n )

%*****************************************************************************80
%
%% RULE15 returns the rule of degree 15.
%
%  Licensing:
%
%    This code is distributed under the GNU LGPL license.
%
%  Modified:
%
%    09 July 2014
%
%  Author:
%
%    Original FORTRAN77 version by Hong Xiao, Zydrunas Gimbutas.
%    This MATLAB version by John Burkardt.
%
%  Reference:
%
%    Hong Xiao, Zydrunas Gimbutas,
%    A numerical algorithm for the construction of efficient quadrature
%    rules in two and higher dimensions,
%    Computers and Mathematics with Applications,
%    Volume 59, 2010, pages 663-676.
%
%  Parameters:
%
%    Input, integer N, the number of nodes.
%
%    Output, real X(3,N), the coordinates of the nodes.
%
%    Output, real W(N), the weights.
%
  xs = [ ...
    0.2581521194788427,-.3924996680742822, ...
    0.1343475485954617,0.1747936627600043, ...
    -.3848787335398570,0.2100850707798483, ...
    -.2686158385486640,0.3159539810469303, ...
    -.4733814249823749E-01,0.5356808415765576E-02, ...
    -.8659172184635908E-01,0.8123491343054050E-01, ...
    -.8144631134845116,0.8470041241206219, ...
    -.3254101063610144E-01,0.2249358441935477, ...
    -.7323416768865754,0.5074058326930275, ...
    -.5473570384341295,0.4843265718105462, ...
    0.6303046662358983E-01,-.2378791442311287E-01, ...
    -.2016252113668169,0.2254131257898949, ...
    -.7391871819240758E-01,0.5113049221289290, ...
    -.4373862039365108,-.2968004530699073, ...
    0.1205383163903803,0.1762621366794993, ...
    -.4241098255347354E-02,-.3585193417940622, ...
    0.3627604400494130,0.4202386364031931E-02, ...
    0.1599370643332776E-01,-.2019609279738776E-01, ...
    -.5388551273867861E-01,-.7018353952881240, ...
    0.7557209080267955,0.3646027806298292E-01, ...
    -.6343658219832248,0.5979055439202614, ...
    0.1258503466822884E-01,0.2393555213511634, ...
    -.2519405560194015,0.3851625317792869E-02, ...
    0.1534194382150093,-.1572710635328328, ...
    -.3485301409937485E-02,0.1619818108911392, ...
    -.1584965094812263,0.5304635114647127E-01, ...
    0.3545913748848099,-.4076377260313040, ...
    0.6653928546486268E-01,-.2403180998360646, ...
    0.1737788143712072,-.1667348931062531, ...
    -.2713747582479675,0.4381096513542055, ...
    0.9493532822319652E-01,0.1868738963948708E-02, ...
    -.9680406718713280E-01,-.5105981722468006E-01, ...
    0.3251121848754134,-.2740523676507155, ...
    -.2080245286773480E-01,-.1497129535134266, ...
    0.1705154063812837,0.2921781238709439, ...
    0.1381062592802215,-.4302843831511968, ...
    -.8780905828000338E-01,0.2673000828923510, ...
    -.1794910246123719,-.1944587456799732E-01, ...
    -.2823011707456111,0.3017470453136293, ...
    -.7313431320411609E-01,-.5236633756518274, ...
    0.5967976888559381,-.3762507052448836, ...
    0.2871315908267298,0.8911911441816055E-01, ...
    -.3797896271838643E-01,-.4650879543817582, ...
    0.5030669171001346,0.2750555493489867E-02, ...
    -.7277556508895471,0.7250050953960729, ...
    0.6123006138565600,-.1192649298638286, ...
    -.4930356839927218,-.2645727220089428, ...
    -.1730736170401170,0.4376463390490505, ...
    -.6630962451131286E-01,-.1763224174379790, ...
    0.2426320419492632,-.4200384093190587E-02, ...
    -.5418782850881636,0.5460786691813587, ...
    0.5394663228522688E-01,0.1507657818092707, ...
    -.2047124140944948,0.1018171426999433, ...
    -.5394039692520657,0.4375868265521267, ...
    0.1245513301303478,-.6455557549708775, ...
    0.5210044248405197,-.9855929555799212E-01, ...
    -.7473211662573033,0.8458804618152944, ...
    -.1755388020283085,-.5318861672552897, ...
    0.7074249692836033,-.6267629157220122E-02, ...
    0.6632219831012681E-01,-.6005456915289890E-01, ...
    -.2023381108267559,0.1094534186561336, ...
    0.9288469217061772E-01,-.6473499743579236E-01, ...
    -.3234505788317799,0.3881855762675665, ...
    -.1233025545427212,-.2864321270324415, ...
    0.4097346815751876,0.1989648914526389, ...
    -.5364226464888502,0.3374577550361906, ...
    0.2178991630195039E-01,-.5426229008583486, ...
    0.5208329845563997,-.2014523059829409, ...
    -.1081005526244278,0.3095528586073633, ...
    -.1169567835631198E-01,0.1260374294457714, ...
    -.1143417510894922,0.6829681010950600E-01, ...
    -.2897229857831844,0.2214261756736523, ...
    -.4298175003068387,0.2110526002984961, ...
    0.2187649000083270,0.6578307149076966, ...
    -.1808749039318607,-.4769558109758388, ...
    -.3704630736636612,0.3211543940711805, ...
    0.4930867959248819E-01,-.1193005517808560, ...
    -.3998990653549201,0.5191996171357768, ...
    -.1504520555101911,0.4460532087610402, ...
    -.2956011532508667,0.1975830054753616, ...
    -.6709593039696905,0.4733762984943273, ...
    -.7463137388742009E-02,-.4211815306853685, ...
    0.4286446680740814,0.2049473200886011E-02, ...
    -.2026603403979144,0.2006108671970308, ...
    0.7152086010197926E-01,-.7652447634530471, ...
    0.6937239033510662,0.2166839105383212, ...
    0.3458968024421906,-.5625807129804981, ...
    0.1279853939984014,0.3081799665774158, ...
    -.4361653605757960,-.1577812374505563E-01, ...
    -.6857246456300986,0.7015027693751511, ...
    -.7105996230949263E-03,-.9227565022751169, ...
    0.9234671018982127,-.1882955447783474E-01, ...
    -.7344571519218671,0.7532867063996859, ...
    -.3375217299349303,-.2041740513278847, ...
    0.5416957812628146,0.4996795038021838, ...
    0.1342360979189166,-.6339156017211199, ...
    0.7596408799506882,0.8346506611711336E-01, ...
    -.8431059460678011,-.8820027427037123, ...
    0.8657493528015160,0.1625338990220750E-01, ...
    0.7067742334596752,-.2761780760336056, ...
    -.4305961574260422,-.9186459446440826E-01, ...
    -.1188760024130717,0.2107405968774760, ...
    0.5405133012525005,-.2620825757773786, ...
    -.2784307254751027,0.1458059413495244, ...
    0.3829161242112978,-.5287220655607965, ...
    -.1823158001392015D-13,-.1699106971810907D-13, ...
    0.1569922552833598D-12,0.5359985656924711D-13 ];
  ys = [ ...
    0.3041753823660573,0.7147860232646702E-01, ...
    -.3756539846925305,0.3435025125820099, ...
    -.2037550392031693E-01,-.3231270086616979, ...
    -.2097468053232621,-.1277547373803833, ...
    0.3375015427036143,0.9689475305431051E-01, ...
    -.4380824435589394E-01,-.5308650869840935E-01, ...
    -.5078056203162217,-.4514429365648450, ...
    0.9592485568810678,0.7157685583829504, ...
    -.1630841238981528,-.5526844344847958, ...
    -.2432354197382121,-.3524073903550577, ...
    0.5956428100933059,0.2465506989117151, ...
    -.1438762876493171,-.1026744112624022, ...
    -.5477270770116898,0.2098480507360208, ...
    0.3378790262756754,0.3217216264418476E-01, ...
    -.2731228135353417,0.2409506508911702, ...
    0.4164310762083722,-.2118884369332560, ...
    -.2045426392751013,-.2089419032777848E-01, ...
    0.1408646851164702E-01,0.6807721816119913E-02, ...
    0.8415205240779101,-.4674264849665979, ...
    -.3740940391113035,0.7114522048190210, ...
    -.3241505753779200,-.3873016294411025, ...
    -.2836499225217341,0.1527239209910285, ...
    0.1309260015306806,-.1793772448187649, ...
    0.9302422778043601E-01,0.8635301703831089E-01, ...
    -.1850282445363872,0.8949576270733584E-01, ...
    0.9553248182902167E-01,-.4400731765980834, ...
    0.2659760759699537,0.1740971006281070, ...
    0.2390789648881394,-.6191477088183470E-01, ...
    -.1771641940062932,0.4096210148696401, ...
    -.3492071605621237,-.6041385430752706E-01, ...
    -.5696877119302565E-01,0.1107007915544150, ...
    -.5373202036138137E-01,-.3459278156898313, ...
    0.1287448090157230,0.2171830066740836, ...
    0.1848839297874223,-.1104574175380845, ...
    -.7442651224930893E-01,-.3281604904126481, ...
    0.4171139229086880,-.8895343249598349E-01, ...
    -.2579549661893832,0.5293260794183284E-01, ...
    0.2050223582475361,0.3372003947615109, ...
    -.1854408187554140,-.1517595760060760, ...
    0.6468984972100610,-.3867854217281152, ...
    -.2601130754819361,-.1143225565573846, ...
    -.2686813906552311,0.3830039472125820, ...
    0.5589644756672905,-.3123729843571679, ...
    -.2465914913101748,0.8387518079361266, ...
    -.4169938530361755,-.4217579548999488, ...
    -.2157966455115084,0.6381662091083642, ...
    -.4223695635968309,0.3525993310475737, ...
    -.4054263639319154,0.5282703288436957E-01, ...
    0.2418834699054176,-.1783675542949067, ...
    -.6351591561047869E-01,0.6281322404142361, ...
    -.3177037595374698,-.3104284808767618, ...
    -.2052354320960713,0.1493368700556973, ...
    0.5589856204040973E-01,0.5640658989533277, ...
    -.1938567173577759,-.3702091815955630, ...
    0.6735138338400053,-.2288923009519804, ...
    -.4446215328880427,0.9198353888410614, ...
    -.5452725481528549,-.3745628406882141, ...
    0.7155166182904237,-.5097793710516186, ...
    -.2057372472388190,-.7296366071409344E-01, ...
    0.3105390428539375E-01,0.4190975642870679E-01, ...
    -.9565958696542072E-02,-.1704469647814408, ...
    0.1800129234779798,0.4108633257116824, ...
    -.2614938151491584,-.1493695105625245, ...
    0.4019320943505255,-.3077491917607414, ...
    -.9418290258973967E-01,0.5045350850600017, ...
    -.7995889207082835E-01,-.4245761929892107, ...
    0.6139865417154907,-.2881226497939412, ...
    -.3258638919215674,0.2411323094026556, ...
    -.2950289693335045,0.5389665993088002E-01, ...
    -.1387829845896145,0.5926273772376190E-01, ...
    0.7952024686583803E-01,0.2951121059631410, ...
    -.8840928042931671E-01,-.2067028255338328, ...
    0.4452698313519278E-02,-.3744592234135989, ...
    0.3700065251000597,-.1709423913837525, ...
    0.6551693061916171,-.4842269148078915, ...
    -.1569501964323080,-.2423553347406391, ...
    0.3993055311729469,0.5306418717478397, ...
    -.3686382444016378,-.1620036273461921, ...
    -.4281943455532308,0.8380187065320079E-01, ...
    0.3443924749000115,0.6606824681258688, ...
    -.1592293319651774,-.5014531361606821, ...
    0.4906473846181765,-.2517869588796617, ...
    -.2388604257384930,0.2328287402613732, ...
    -.1146394742743420,-.1181892659870265, ...
    0.8423359525185951,-.3592290945104593, ...
    -.4831068580081231,-.5245097380820163, ...
    0.4499086401585516,0.7460109792348690E-01, ...
    -.4297479750019432,0.3257125900169633, ...
    0.1040353849849871,0.8009161214805088, ...
    -.4141223167275365,-.3867938047529831, ...
    0.1065917694853711D+01,-.5335742447523749, ...
    -.5323434501013379,0.8589493170871557, ...
    -.4457815310633328,-.4131677860238335, ...
    0.4306281486266579,-.5076164667662489, ...
    0.7698831813957928E-01,-.4434925905656182, ...
    0.6544814393259342,-.2109888487602922, ...
    -.5349560233082641,0.9253463114445929, ...
    -.3903902881363264,-.4904567228554135, ...
    -.5186084199612601,0.1009065142816689D+01, ...
    -.8915332085968262E-01,0.6566611013461990, ...
    -.5675077804865333,0.1903042323297749, ...
    -.1747091886794188,-.1559504365035713E-01, ...
    -.9438608628742183E-02,0.4728175542824327, ...
    -.4633789456536745,-.5263345542684673, ...
    0.3894389263656265,0.1368956279028533, ...
    -.1738343488671503D-14,-.2490206331023665D-15, ...
    0.1028727833546315D-12,0.7810443937532853D-13 ];
  zs = [ ...
    0.1149415369298274,0.1149415369297980, ...
    0.1149415369297721,-.1425141964887960, ...
    -.1425141964887534,-.1425141964887875, ...
    -.3897391650202160,-.3897391650202120, ...
    -.3897391650202178,0.7425283167186030, ...
    0.7425283167186189,0.7425283167186136, ...
    -.2856112242082660,-.2856112242082698, ...
    -.2856112242082572,-.3891867546444293, ...
    -.3891867546444389,-.3891867546444343, ...
    0.1847325582324109,0.1847325582324027, ...
    0.1847325582324080,0.5802704682522071, ...
    0.5802704682522261,0.5802704682522338, ...
    -.3914413911049179,-.3914413911049140, ...
    -.3914413911049208,0.4061500673930710, ...
    0.4061500673931097,0.4061500673930845, ...
    0.5808632391400850,0.5808632391400872, ...
    0.5808632391401026,0.1122300778479799D+01, ...
    0.1122300778479790D+01,0.1122300778479803D+01, ...
    -.1702382601410010,-.1702382601409925, ...
    -.1702382601409868,-.2928517214460706E-01, ...
    -.2928517214460719E-01,-.2928517214460035E-01, ...
    -.2378639271913669E-01,-.2378639271913052E-01, ...
    -.2378639271915441E-01,-.3876002482780669, ...
    -.3876002482780664,-.3876002482780634, ...
    -.1573276400467179,-.1573276400467495, ...
    -.1573276400467503,-.9846677659403662E-01, ...
    -.9846677659401415E-01,-.9846677659402990E-01, ...
    0.4195749508887953,0.4195749508888120, ...
    0.4195749508888156,0.1698706478280650, ...
    0.1698706478280417,0.1698706478280619, ...
    0.1001045633396894D+01,0.1001045633396896D+01, ...
    0.1001045633396904D+01,0.1278252986614525, ...
    0.1278252986614319,0.1278252986614156, ...
    0.6699851292944298E-01,0.6699851292952046E-01, ...
    0.6699851292943053E-01,0.1888603052005784, ...
    0.1888603052005364,0.1888603052005152, ...
    0.4162319117452538,0.4162319117452708, ...
    0.4162319117452612,-.1429377419107346, ...
    -.1429377419107034,-.1429377419107302, ...
    0.7526757476604347E-01,0.7526757476604869E-01, ...
    0.7526757476604784E-01,0.5502259745637508E-01, ...
    0.5502259745639024E-01,0.5502259745637604E-01, ...
    -.3783645730290734,-.3783645730290731, ...
    -.3783645730290733,-.3557858186989302E-01, ...
    -.3557858186987815E-01,-.3557858186989157E-01, ...
    -.1180094770935530,-.1180094770935434, ...
    -.1180094770935428,-.1637480027557202, ...
    -.1637480027557221,-.1637480027557144, ...
    0.2977454860475704,0.2977454860475816, ...
    0.2977454860475674,0.2596712604598457, ...
    0.2596712604598533,0.2596712604598482, ...
    0.2271508926955859,0.2271508926955554, ...
    0.2271508926955697,-.2779926178974129, ...
    -.2779926178973848,-.2779926178974117, ...
    -.3823432777224465,-.3823432777224400, ...
    -.3823432777224473,-.3775386322444910, ...
    -.3775386322444932,-.3775386322444943, ...
    -.2829688627011475,-.2829688627011491, ...
    -.2829688627011544,0.9266659902735654, ...
    0.9266659902735608,0.9266659902735637, ...
    0.7042408708164912,0.7042408708164883, ...
    0.7042408708164785,0.4116884047492347, ...
    0.4116884047492301,0.4116884047492345, ...
    0.1190964787818936E-01,0.1190964787820830E-01, ...
    0.1190964787819720E-01,-.9824886296290353E-01, ...
    -.9824886296290938E-01,-.9824886296292371E-01, ...
    -.1210076932793752,-.1210076932793519, ...
    -.1210076932793500,-.2970323317075053, ...
    -.2970323317075050,-.2970323317075011, ...
    0.5828065214604544,0.5828065214604353, ...
    0.5828065214604685,-.3017876570907457, ...
    -.3017876570907429,-.3017876570907401, ...
    -.3862244277990527,-.3862244277990511, ...
    -.3862244277990521,-.3804346304483138, ...
    -.3804346304483134,-.3804346304483132, ...
    0.4614518667838061,0.4614518667838234, ...
    0.4614518667838163,-.2664567796530529, ...
    -.2664567796530461,-.2664567796530568, ...
    -.3834440210666236,-.3834440210666228, ...
    -.3834440210666243,-.2809660745834901, ...
    -.2809660745835049,-.2809660745834982, ...
    0.1843225423322873,0.1843225423322890, ...
    0.1843225423322869,0.7949931745648482, ...
    0.7949931745648681,0.7949931745648552, ...
    -.2296019504049502,-.2296019504049503, ...
    -.2296019504049410,-.3768873297184356, ...
    -.3768873297184376,-.3768873297184345, ...
    -.2779742390429553,-.2779742390429600, ...
    -.2779742390429549,-.3088199065240608, ...
    -.3088199065240601,-.3088199065240508, ...
    -.3819799973245133,-.3819799973245119, ...
    -.3819799973245152,-.4015361795222331, ...
    -.4015361795222343,-.4015361795222284, ...
    -.3045707129688655,-.3045707129688613, ...
    -.3045707129688553,-.3905755491124832E-01, ...
    -.3905755491127184E-01,-.3905755491126780E-01, ...
    -.3726108784532423,-.3726108784532439, ...
    -.3726108784532431,-.2575990026123318, ...
    -.2575990026123464,-.2575990026123427, ...
    -.3954674471205766,-.3954674471205773, ...
    -.3954674471205850,0.7158508859841455, ...
    0.7158508859841465,0.7158508859841323, ...
    -.9143187100549784E-01,-.9143187100549642E-01, ...
    -.9143187100549681E-01,-.2639610543972574, ...
    -.2639610543972473,-.2639610543972535, ...
    -.3003943802989339,0.4275416212259733, ...
    0.1454645115620674,-.1072798570797851 ];
  ws = [ ...
    0.2565379947273549E-02,0.2565379947271849E-02, ...
    0.2565379947272177E-02,0.6723785911414816E-02, ...
    0.6723785911411640E-02,0.6723785911413937E-02, ...
    0.3085562545744757E-02,0.3085562545745181E-02, ...
    0.3085562545744572E-02,0.4446982777989968E-02, ...
    0.4446982777989351E-02,0.4446982777990241E-02, ...
    0.1185105459270273E-02,0.1185105459270278E-02, ...
    0.1185105459270443E-02,0.8364165694309715E-03, ...
    0.8364165694306848E-03,0.8364165694306367E-03, ...
    0.1867492375962935E-02,0.1867492375963348E-02, ...
    0.1867492375962387E-02,0.4264615556690722E-02, ...
    0.4264615556689985E-02,0.4264615556689865E-02, ...
    0.1036750961119152E-02,0.1036750961119384E-02, ...
    0.1036750961118855E-02,0.2897017453521770E-02, ...
    0.2897017453522957E-02,0.2897017453522235E-02, ...
    0.9931774636746942E-03,0.9931774636749676E-03, ...
    0.9931774636745359E-03,0.2968267531327685E-03, ...
    0.2968267531331858E-03,0.2968267531325610E-03, ...
    0.2082824878589059E-02,0.2082824878589280E-02, ...
    0.2082824878589393E-02,0.3532360099744144E-02, ...
    0.3532360099743258E-02,0.3532360099742647E-02, ...
    0.9852850436647919E-02,0.9852850436649995E-02, ...
    0.9852850436648092E-02,0.4465622015302662E-02, ...
    0.4465622015302984E-02,0.4465622015303046E-02, ...
    0.1064447126836857E-01,0.1064447126836189E-01, ...
    0.1064447126836531E-01,0.4362160716691730E-02, ...
    0.4362160716692162E-02,0.4362160716691511E-02, ...
    0.7013986090707679E-02,0.7013986090706681E-02, ...
    0.7013986090707788E-02,0.4089047890127443E-02, ...
    0.4089047890127423E-02,0.4089047890126841E-02, ...
    0.8331696920946515E-03,0.8331696920946096E-03, ...
    0.8331696920947063E-03,0.5692536319085584E-02, ...
    0.5692536319084854E-02,0.5692536319085869E-02, ...
    0.1193994326736248E-01,0.1193994326737174E-01, ...
    0.1193994326736250E-01,0.4894866890556946E-02, ...
    0.4894866890557526E-02,0.4894866890558155E-02, ...
    0.4559845100025953E-02,0.4559845100026132E-02, ...
    0.4559845100026570E-02,0.1112520926249036E-01, ...
    0.1112520926249222E-01,0.1112520926248886E-01, ...
    0.2944181342559152E-02,0.2944181342559592E-02, ...
    0.2944181342559789E-02,0.8953416346063897E-02, ...
    0.8953416346061954E-02,0.8953416346063781E-02, ...
    0.3952683058023190E-02,0.3952683058023330E-02, ...
    0.3952683058022607E-02,0.1439142717612964E-02, ...
    0.1439142717612978E-02,0.1439142717612582E-02, ...
    0.5039224704625283E-02,0.5039224704625251E-02, ...
    0.5039224704625310E-02,0.7617567889070472E-02, ...
    0.7617567889069997E-02,0.7617567889070361E-02, ...
    0.1054110867291372E-01,0.1054110867291354E-01, ...
    0.1054110867291408E-01,0.1741617181694419E-02, ...
    0.1741617181694472E-02,0.1741617181694386E-02, ...
    0.1100640373498494E-01,0.1100640373498203E-01, ...
    0.1100640373498438E-01,0.6926338144663090E-02, ...
    0.6926338144663959E-02,0.6926338144663389E-02, ...
    0.2939871895670393E-02,0.2939871895670890E-02, ...
    0.2939871895670184E-02,0.1098371982889171E-02, ...
    0.1098371982888983E-02,0.1098371982889088E-02, ...
    0.2867324218775673E-02,0.2867324218775326E-02, ...
    0.2867324218775453E-02,0.2627584056743849E-02, ...
    0.2627584056743863E-02,0.2627584056743943E-02, ...
    0.2450903116528004E-02,0.2450903116528749E-02, ...
    0.2450903116529087E-02,0.3781264707127557E-02, ...
    0.3781264707127677E-02,0.3781264707128319E-02, ...
    0.9717660774153364E-02,0.9717660774155940E-02, ...
    0.9717660774153394E-02,0.5844696436169811E-02, ...
    0.5844696436168778E-02,0.5844696436168716E-02, ...
    0.7798609566561363E-02,0.7798609566560966E-02, ...
    0.7798609566562299E-02,0.9537993724461966E-02, ...
    0.9537993724462559E-02,0.9537993724462396E-02, ...
    0.6470868601806971E-02,0.6470868601806687E-02, ...
    0.6470868601806209E-02,0.9788338589999005E-02, ...
    0.9788338589999012E-02,0.9788338589999477E-02, ...
    0.4149912310618085E-02,0.4149912310618563E-02, ...
    0.4149912310618460E-02,0.2801823664802904E-02, ...
    0.2801823664802910E-02,0.2801823664803036E-02, ...
    0.3473047605746596E-02,0.3473047605746489E-02, ...
    0.3473047605747130E-02,0.8146696772355114E-02, ...
    0.8146696772356077E-02,0.8146696772355570E-02, ...
    0.4104346629768971E-02,0.4104346629769071E-02, ...
    0.4104346629768999E-02,0.3673293016416287E-02, ...
    0.3673293016415687E-02,0.3673293016415978E-02, ...
    0.7385814346097036E-02,0.7385814346096885E-02, ...
    0.7385814346097676E-02,0.1952835342529582E-02, ...
    0.1952835342529196E-02,0.1952835342529467E-02, ...
    0.2956577367937866E-02,0.2956577367938132E-02, ...
    0.2956577367937872E-02,0.2429727102722713E-02, ...
    0.2429727102722471E-02,0.2429727102722800E-02, ...
    0.7838569405690889E-02,0.7838569405690287E-02, ...
    0.7838569405690948E-02,0.4786830078294293E-02, ...
    0.4786830078294275E-02,0.4786830078294352E-02, ...
    0.6464879373388097E-03,0.6464879373388156E-03, ...
    0.6464879373387403E-03,0.1094759729336998E-02, ...
    0.1094759729336943E-02,0.1094759729337179E-02, ...
    0.4183486775030887E-02,0.4183486775030987E-02, ...
    0.4183486775031043E-02,0.1388382329059297E-02, ...
    0.1388382329058254E-02,0.1388382329057900E-02, ...
    0.1547261679853963E-02,0.1547261679853909E-02, ...
    0.1547261679853913E-02,0.5245559039887955E-03, ...
    0.5245559039888078E-03,0.5245559039885548E-03, ...
    0.4714073461717449E-03,0.4714073461717063E-03, ...
    0.4714073461712849E-03,0.1734297963526248E-02, ...
    0.1734297963526404E-02,0.1734297963527124E-02, ...
    0.2194380264311005E-02,0.2194380264311055E-02, ...
    0.2194380264311861E-02,0.1505920846848116E-02, ...
    0.1505920846847692E-02,0.1505920846848549E-02, ...
    0.1092191482369307E-01,0.1402579642206070E-01, ...
    0.9137907285788647E-02,0.8807144129412933E-02 ];

  x(1,1:n) = xs(1:n);
  x(2,1:n) = ys(1:n);
  x(3,1:n) = zs(1:n);
  w(1:n) = ws(1:n);

  return
end

