function [a,b,b2,c,ord]=rktf10_8()
% Autor: Dieter Kaiser
%        Numerische Mathematik
%        Friedrich-Schiller-Universität Jena
%        http://users.minet.uni-jena.de/~kaiserd/
%        dieter.kaiser@uni-jena.de
%
% originales RK:
% http://www.peterstone.name/Maplepgs/Maple/nmthds/RKcoeff/Runge_Kutta_schemes/RK10/RKcoeff10e%288%29_1.pdf
% und dortige Literaturangabe
%
ord=8; % Ordnung des 'niedrigeren' Verfahrens für Fehlerschätzer
c=zeros(20,1);
b=c';
c(2)=.1;
c(3)=.5393578408029817875324851978813024368572734497010090155054997959606637421764517472534;
c(4)=.8090367612044726812987277968219536552859101745515135232582496939409956132646776208802;
c(5)=.3090367612044726812987277968219536552859101745515135232582496939409956132646776208802;
c(6)=.9810741902197952682548795483105620804890567461187248820278053092163063076419899423642;
c(7)=.8333333333333333333333333333333333333333333333333333333333333333333333333333333333333;
c(8)=.3540173658568023763292641859487967421158240538073739683241838300209849970156463319588;
c(9)=.8825276619647323464255014869796690751828678442680521196637911779185276585194132570617;
c(10)=.6426157582403225481570754970204395359595017363632126959098752082638489654570997990908;
c(11)=.3573842417596774518429245029795604640404982636367873040901247917361510345429002009092;
c(12)=.1174723380352676535744985130203309248171321557319478803362088220814723414805867429383;
c(13)=.8333333333333333333333333333333333333333333333333333333333333333333333333333333333333;
c(14)=.3090367612044726812987277968219536552859101745515135232582496939409956132646776208802;
c(15)=.5393578408029817875324851978813024368572734497010090155054997959606637421764517472534;
c(16)=.1;
c(17)=1;
c(18)=.3498714264105279080320677658448041143548631069429738314929662683406443805778248373922;
c(19)=.8329339723109691160809371671991480298189563365282215122470713525026624068157614483493;
c(20)=1;
a=zeros(20);
a(2,1)=.1;
a(3,1)=-.9151765613752914405200150192753421543189513876643697205646603979963048584489560617612;
a(3,2)=1.454534402178273228052500217156644591176224837365378736070160193956968600625407809015;
a(4,1)=.2022591903011181703246819492054884138214775436378783808145624234852489033161694052200;
a(4,2)=0.;
a(4,3)=.6067775709033545109740458476164652414644326309136351424436872704557467099485082156601;
a(5,1)=.1840247147086435751491006934711206642167740479795914178446349661389134467299750502903;
a(5,2)=0.;
a(5,3)=.1979668312271923690681417705103887933706372874633604015557458756877941908534751780490;
a(5,4)=-.7295478473136326291851466715955580230150116089143829614213114788571202431877260745922e-1;
a(6,1)=.8790073402066813373197770941321254759188868249445485340413779789589432902346930000504e-1;
a(6,2)=0.;
a(6,3)=0.;
a(6,4)=.4104597025202606453181748959204534260880353259028486952104060382836232634567776433876;
a(6,5)=.4827137536788664892047269429768961068091327377214213334132614730367887151617429989716;
a(7,1)=.8597005049024603021884802259458084014111326156366002225938797696846728899962000680512e-1;
a(7,2)=0.;
a(7,3)=0.;
a(7,4)=.3308859630407221839488840576587531736482401548384020334486324456561774132656637353804;
a(7,5)=.4896629573094501928445070111358982011780154784337900972107904505844628620805256247950;
a(7,6)=-.7318563750708507367890575805589888163403556150251881958547753987577423101247603364721e-1;
a(8,1)=.1209304491253337206603788549276689539589389969997036788126207242479388194626784582422;
a(8,2)=0.;
a(8,3)=0.;
a(8,4)=0.;
a(8,5)=.2601246757582956228090076178383351743681087564846933618878385480736948525315211889536;
a(8,6)=.3254026215490913301588993343912312593327166759927000007761014763410936811599410398613e-1;
a(8,7)=-.5957802118173610015601222025633051214449536727629307245388558993475804309454741922317e-1;
a(9,1)=.1108543795803914835089361710102184419094257801686565598070379712238628334864034048948;
a(9,2)=0.;
a(9,3)=0.;
a(9,4)=0.;
a(9,5)=0.;
a(9,6)=-.6057614882550055876209249536555168755263444153543392346194660745470782044984741351417e-1;
a(9,7)=.3217637056017783901008987990498789040814043686030771292511102949020610017274377990772;
a(9,8)=.5104857256080630315777590122851234167446721370317523540675895192473116437554194666039;
a(10,1)=.1120544147528790048297150027618023630037176111581722293293926514934695608734670818246;
a(10,2)=0.;
a(10,3)=0.;
a(10,4)=0.;
a(10,5)=0.;
a(10,6)=-.1449427759028659156723498283409807771816684997485068388761852225169215686873306825460;
a(10,7)=-.3332697190962567065897052114157468717094674239921154979687242221418137519998082528658;
a(10,8)=.4992692295568800613533168439699785678602768165926732012403315488354044828766525571429;
a(10,9)=.5095046089296861042360986900453862539866432323529896021850604525937102423941190955351;
a(11,1)=.1139767839641859861380041867369011638907247525414868316403412210309290664271336257765;
a(11,2)=0.;
a(11,3)=0.;
a(11,4)=0.;
a(11,5)=0.;
a(11,6)=-.7688133642033569385862142891208952708213490233909229874063835373263841258915727093324e-1;
a(11,7)=.2395273603243906491077114552718823730197413112010041193395628785781224443177793593046;
a(11,8)=.3977746623680946390478304624889521045647164163434546399026133008178160445613368390966;
a(11,9)=.1075589568736074555506091474414774502571367828232808385470239734312131460138378663157e-1;
a(11,10)=-.3277691241640188741470610873502333953782629923923940719064566523011994227755761389669;
a(12,1)=.7983145282801960463514268644864003227587376304234139453562837151408388507380447344593e-1;
a(12,2)=0.;
a(12,3)=0.;
a(12,4)=0.;
a(12,5)=0.;
a(12,6)=-.5203296868006030765149498876129590687213114438816835269372978568212814716048923869522e-1;
a(12,7)=-.5769541461685488817327843552834335090661592871529687230218639793413055668210844841955e-1;
a(12,8)=.1947819157121041649763062621473828711561429213544093647380902228866390247033946064390;
a(12,9)=.1453849231883250697275248259770711948592034675682365238665823980908913337790067458849;
a(12,10)=-.7829427103516707775539867297256924472520770472391605513350159142016458207969788779419e-1;
a(12,11)=-.1145032993610989121843031642905546709701332184056581226746743953737186161533235079226;
a(13,1)=.9851156101648572801200415003065172784136466773141955595205285811315908348605429600665;
a(13,2)=0.;
a(13,3)=0.;
a(13,4)=.3308859630407221839488840576587531736482401548384020334486324456561774132656637353804;
a(13,5)=.4896629573094501928445070111358982011780154784337900972107904505844628620805256247950;
a(13,6)=-1.378964865748435675821127209307519023539043271485594715263967279333987427873524280873;
a(13,7)=-.8611641950276356666739169996655345733510260609874270933144115020405879169494864941030;
a(13,8)=5.784288136375372200229997854865784360068727896894991726018561768761366739727928637196;
a(13,9)=3.288077619851035668904606159373148054772682529033423565819249490150659566267799708492;
a(13,10)=-2.386339050931363840134223252155278661484014659759541045858065415400776902303795495458;
a(13,11)=-3.254793424836439186545893675877887267477115046747806802699112121425479969838061889986;
a(13,12)=-2.163435416864229823539542113000548208896780364201099991548873084750091865904259172177;
a(14,1)=.8950802957716328910496131323365851381481562792415613459917095170757672839845525640729;
a(14,2)=0.;
a(14,3)=.1979668312271923690681417705103887933706372874633604015557458756877941908534751780490;
a(14,4)=-.7295478473136326291851466715955580230150116089143829614213114788571202431877260745922e-1;
a(14,5)=0;
a(14,6)=-.8512362396620076197390493714459667932893597228757022271661048887740645775128087411721;
a(14,7)=.3983201123185333017197186141743736433364809181037739042318564985414294618462922613810;
a(14,8)=3.639372631810356060294129200470900441320273878939778041762287245257885919339182367288;
a(14,9)=1.548228770398303223653016630751745649199817363489734963130650682036414979412951081310;
a(14,10)=-2.122217147040537160260624274604272610253184611462601244015607790107056265271775849169;
a(14,11)=-1.583503985453261727133843496257532127572691889344342379752907276826529676767705433797;
a(14,12)=-1.715616082859362649220318197513490989126158808275519929730335787990138709296569362588;
a(14,13)=-.2440364057501274521354154444122168754655935983709105660691323307479496900414383703505e-1;
a(15,1)=-.9151765613752914405200150192753421543189513876643697205646603979963048584489560617612;
a(15,2)=1.454534402178273228052500217156644591176224837365378736070160193956968600625407809015;
a(15,3)=0.;
a(15,4)=0.;
a(15,5)=-.7773336436449682335389312285753021378033510536295472863344690943163799350772376765098;
a(15,6)=0.;
a(15,7)=-.9108956621551760695932035558074842001118890917701017996479849775333987275797724426330e-1;
a(15,8)=0.;
a(15,9)=0.;
a(15,10)=0.;
a(15,11)=0.;
a(15,12)=0.;
a(15,13)=.9108956621551760695932035558074842001118890917701017996479849775333987275797724426330e-1;
a(15,14)=.7773336436449682335389312285753021378033510536295472863344690943163799350772376765098;
a(16,1)=.1;
a(16,2)=0.;
a(16,3)=-.1571786657997711633670589982731289218671837541267094194096536643481972116830948646637;
a(16,4)=0.;
a(16,5)=0.;
a(16,6)=0.;
a(16,7)=0.;
a(16,8)=0.;
a(16,9)=0.;
a(16,10)=0.;
a(16,11)=0.;
a(16,12)=0.;
a(16,13)=0.;
a(16,14)=0.;
a(16,15)=.1571786657997711633670589982731289218671837541267094194096536643481972116830948646637;
a(17,1)=.1817813007000952838884720625822623796504438314631995216649446510802956214784300321820;
a(17,2)=.675;
a(17,3)=.3427581598471898399422205534138508717423387347039589199372599557781883490612271042488;
a(17,4)=0.;
a(17,5)=.2591112145483227445129770761917673792677836845431824287781563647721266450257458921699;
a(17,6)=-.3582789667179520890489612767219793977397506346732688024842708024524021503320635232761;
a(17,7)=-1.045948959408833060950500687564099051315881231723784892860799571162295692535474761226;
a(17,8)=.9303278454156269832923005644324287771376016511829657946803974409790117863060139928499;
a(17,9)=1.779509594317081024461421067948244539262757432433277905359997500386920301161540307119;
a(17,10)=.1;
a(17,11)=-.2825475695390440816124777852222872764084893759762111899528770188407477720704209073106;
a(17,12)=-.1593273501199725491692619843734858592780315421275519314618208481319295132597866290481;
a(17,13)=-.1455158946470015108609919610810841113086501305786264049455713518588525807482385112893;
a(17,14)=-.2591112145483227445129770761917673792677836845431824287781563647721266450257458921699;
a(17,15)=-.3427581598471898399422205534138508717423387347039589199372599557781883490612271042488;
a(17,16)=-.675;
a(18,1)=-.1405432591696194049935880642309728209931109816349481672622974266827062274082456309914;
a(18,2)=0;
a(18,3)=0;
a(18,4)=.6190775124686339508176945041423410296262775327124036018411252188043263727981623428573e-3;
a(18,5)=-.1648101828369105144875662014070129800608346871791984733068904834460137624643571218100;
a(18,6)=.1560116185546663409985670090404340324947792898502645738006606370565142850572935687879;
a(18,7)=.3204545454545454545454545454545454545454545454545454545454545454545454545454545454545;
a(18,8)=-.6408653557453341391973994615543907105015388323450935986092024742824038499381585662217;
a(18,9)=-.5481105803045379486502798639056299293510538812388774942449455718123276124990934848978;
a(18,10)=.2040756914119359534206695778748180494905385735080058224163027656477438136826783114993;
a(18,11)=.5600600600600600600600600600600600600600600600600600600600600600600600600600600600601;
a(18,12)=.6029798114732534723853324700088106176409427429355032504919830911264278931693949931685;
a(18,13)=0;
a(18,14)=0;
a(18,15)=0;
a(18,16)=0;
a(18,17)=0;
a(19,1)=.8923398399454375862260249051939673628368218851157303059681095049373334747754496405177e-1;
a(19,2)=0;
a(19,3)=0;
a(19,4)=.3264908679263878598991604636051672680329186975898172806174942179004656055888662388682;
a(19,5)=.4835679940199578991806046079681881212140432043870538663697297286116802176749626620147;
a(19,6)=-.7876708220501189381738499011857006486655752703755416213542231219890482160293737681814e-1;
a(19,7)=-.4486064859629848833950684392541140506344031780762042457806358072800188820774970026463e-2;
a(19,8)=.9364534700331488520270799962630764828601327148434177729511417633126358210872495200262e-2;
a(19,9)=.1693110702176115803225798999032032534133372488276931587472898691700372672977524051297e-1;
a(19,10)=-.8480372042128299822185747503761455341266584598550129941184516482013404459034331828751e-2;
a(19,11)=.3643350484028553453174841911438260388042250549136437751879883007251929991133245789458e-1;
a(19,12)=-.6719447305852451003338231000475570233689627624360284038354841751068653744426274947361e-2;
a(19,13)=0;
a(19,14)=0;
a(19,15)=0;
a(19,16)=0;
a(19,17)=0;
a(19,18)=-.3063505377967608922884795094558955881418754044156391788723475062107908015041965657246e-1;
a(20,1)=.2575449831068576741696364406414717535197540825352339119795874586375194802472461129666e-1;
a(20,2)=0;
a(20,3)=0;
a(20,4)=.3238395239343079241953716528878548292099933275103714970249462391540713160975066161357;
a(20,5)=.3736961607619552026471423356794480865194333229874615861093656983254102843085365515106;
a(20,6)=-.4421456973008890490058634574166360247591984960403788942724844315976048318826509082882e-1;
a(20,7)=10.86444980467137073082313751216401831385053962156612256456330160135453343148930872874;
a(20,8)=-.8445040038303666760504144941889898706516650676083559757105602732379116379472860421760;
a(20,9)=.5666145971430202116273963112558811240771719078932108658188568540772874337222926897913;
a(20,10)=.3043308770057433949906373896765319106034681065627358767307593170204953352067943484463;
a(20,11)=1.800957919717664545885568244681668866390009515999474585281777853150972534649174172155;
a(20,12)=.1815444686636166330161532889923662948522043843309758817188988532906515947864621905935;
a(20,13)=0;
a(20,14)=0;
a(20,15)=0;
a(20,16)=0;
a(20,17)=0;
a(20,18)=-1.047383096110180575379517014465652766403121887347092607531567799644607917509981515034;
a(20,19)=-11.50508618053772825427185252500561036132408879054438977577648864619489383963926726063; 
b(1)=.3333333333333333333333333333333333333333333333333333333333333333333333333333333333333e-1;
b(2)=.25e-1;
b(3)=.3333333333333333333333333333333333333333333333333333333333333333333333333333333333333e-1;
b(4)=0.;
b(5)=.5e-1;
b(6)=0.;
b(7)=.4e-1;
b(8)=0.;
b(9)=.1892374781489234901583064041060123262381623469486258303271944256799821862794952728707;
b(10)=.2774291885177431765083602625606543404285043197180408363394722409866844803871713937960;
b(11)=.2774291885177431765083602625606543404285043197180408363394722409866844803871713937960;
b(12)=.1892374781489234901583064041060123262381623469486258303271944256799821862794952728707;
b(13)=-.4e-1;
b(14)=-.5e-1;
b(15)=-.3333333333333333333333333333333333333333333333333333333333333333333333333333333333333e-1;
b(16)=-.25e-1;
b(17)=.3333333333333333333333333333333333333333333333333333333333333333333333333333333333333e-1;
b2(1)=.3390980481172030905764457977538950868271621470413750753715834318292163876038326592650e-1;
b2(2)=0;
b2(3)=0;
b2(4)=0;
b2(5)=0;
b2(6)=-.1040348977382170149031411914598891042643018781490079289178662877672742487116599924534;
b2(7)=6.892972918716070456586308081658120817663330706393188111166307513904536022960200854824;
b2(8)=.1071878940731399747793190416141235813366960907944514501891551071878940731399747793190;
b2(9)=.2685185185185185185185185185185185185185185185185185185185185185185185185185185185185;
b2(10)=.3050621986030050260708108486983949309441849894493403559123783764015905984696485594743;
b2(11)=-.6817213463996591393268001704303365999147848317000426075841499786962079250106518960375e-3;
b2(12)=.1864943033659261115319749740374673027135114219262845474533190363503845913266413129934;
b2(13)=0;
b2(14)=0;
b2(15)=0;
b2(16)=0;
b2(17)=0;
b2(18)=.1650359951948629044373703893186208273298213007302994544320526582878550698040686178192;
b2(19)=-6.955465737995001316806500780927267156988879238615733592969981156738274105443287424316;
b2(20)=.1010007237963746898670223389369511106643166590802216192865420406505440491005221597895;