diff options
author | torset | 2009-02-13 13:53:28 +0000 |
---|---|---|
committer | torset | 2009-02-13 13:53:28 +0000 |
commit | c697402219634b3515b21f3eedf9dd88a9e45448 (patch) | |
tree | acb889443db30252de6e9f831c1a8c9bfea7040c /src/elementaryFunctions/log/testFloatLog.c | |
parent | b43ab503b0b67e612aa1b486ce4b87df1fb53401 (diff) | |
download | scilab2c-c697402219634b3515b21f3eedf9dd88a9e45448.tar.gz scilab2c-c697402219634b3515b21f3eedf9dd88a9e45448.tar.bz2 scilab2c-c697402219634b3515b21f3eedf9dd88a9e45448.zip |
add/modify/remove tests
Diffstat (limited to 'src/elementaryFunctions/log/testFloatLog.c')
-rw-r--r-- | src/elementaryFunctions/log/testFloatLog.c | 470 |
1 files changed, 466 insertions, 4 deletions
diff --git a/src/elementaryFunctions/log/testFloatLog.c b/src/elementaryFunctions/log/testFloatLog.c index 3e24aa4e..34b12d89 100644 --- a/src/elementaryFunctions/log/testFloatLog.c +++ b/src/elementaryFunctions/log/testFloatLog.c @@ -148,6 +148,151 @@ -0.6982162977399214431884f,-2.4312485274946018520836f,-1.9223514861397812403254f,\ -0.3352847494467096622905f,-0.0719538807151878373469f} + +#define SOURCE2 {2.6395560009405016899109f,4.1481037065386772155762f,2.8064980218186974525452f,\ +1.2800584640353918075562f,7.7831285959109663963318f,2.1190304495394229888916f,\ +1.121354666538536548615f,6.8568959552794694900513f,1.5312166837975382804871f,\ +6.970850601792335510254f,8.4155184263363480567932f,4.0620247554033994674683f,\ +4.09482547547668218613f,8.7841258011758327484131f,1.1383596854284405708313f,\ +1.9983377400785684585571f,5.6186607433483004570007f,5.8961773291230201721f,\ +6.8539796629920601844788f,8.9062247332185506820679f,5.0422128057107329368591f,\ +3.493615407496690750122f,3.8737787725403904914856f,9.2228986788541078567505f,\ +9.4881842611357569694519f,3.4353372454643249511719f,3.7601187312975525856018f,\ +7.3409405630081892013550f,2.6157614728435873985291f,4.99349383637309074402f,\ +2.6385784195736050605774f,5.25356308557093143463f,5.3762298030778765678406f,\ +1.1999255046248435974121f,2.2563034901395440101624f,6.2740930821746587753296f,\ +7.6084325974807143211365f,0.4855662025511264801025f,6.7239497276023030281067f,\ +2.017172696068882942200f,3.911573919467628002167f,8.3003165572881698608398f,\ +5.8787201577797532081604f,4.8291792999953031539917f,2.2328650346025824546814f,\ +8.4008856676518917083740f,1.2059959070757031440735f,2.8553641680628061294556f,\ +8.6075146449729800224304f,8.494101651012897491455f,5.2570608118548989295959f,\ +9.9312098976224660873413f,6.4885628735646605491638f,9.923190940171480178833f,\ +0.5004197778180241584778f,7.4855065811425447463989f,4.1040589986369013786316f,\ +6.0845263302326202392578f,8.5442108893766999244690f,0.6426467280834913253784f,\ +8.279082938097417354584f,9.2623437754809856414795f,5.6672112690284848213196f,\ +5.711638936772942543030f,8.1601104838773608207703f,0.5689279362559318542481f,\ +5.5959366867318749427795f,1.2493403162807226181030f,7.279222286306321620941f,\ +2.6777664758265018463135f,5.4653349192813038825989f,9.885407658293843269348f,\ +7.3956565884873270988464f,0.0371731072664260864258f,5.9005728596821427345276f,\ +3.096467358991503715515f,2.5522057106718420982361f,6.2518793903291225433350f,\ +1.1574173765257000923157f,6.1170040909200906753540f,6.7839562846347689628601f,\ +3.3200952783226966857910f,0.2587099233642220497131f,5.1744682248681783676147f,\ +3.9168732380494475364685f,2.4135384149849414825439f,5.064434898085892200470f,\ +4.2361020017415285110474f,2.8937275288626551628113f,0.8879321813583374023438f,\ +6.2128817522898316383362f,3.4549844544380903244019f,7.0648676296696066856384f,\ +5.2114724926650524139404f,2.8704008506610989570618f,6.502795079723000526428f,\ +0.8813347620889544487000f,4.498763345181941986084f,7.2272530803456902503967f,\ +8.9767962601035833358765f,2.4278218811377882957458f,4.3377211131155490875244f,\ +9.6770532103255391120911f,5.0685344357043504714966f,5.2329764096066355705261f,\ +5.5969475954771041870117f,5.6173070007935166358948f,4.68176002614200115204f,\ +7.794546722434461116791f,7.9010718129575252532959f,9.8085420625284314155579f,\ +8.1870661024004220962524f,4.2568723810836672782898f,2.4615605548024177551270f,\ +9.2295324662700295448303f,1.000745808705687522888f,4.6782181179150938987732f,\ +3.9504976756870746612549f,0.3661171020939946174622f,5.175368534401059150696f,\ +8.3254515705630183219910f,6.1048321425914764404297f,1.8711117887869477272034f,\ +0.1895748358219861984253f,8.4335647663101553916931f,0.7485948316752910614014f,\ +8.5328151332214474678040f,0.1245901081711053848267f,1.8675393564626574516296f,\ +4.920584075152873992920f,7.4896081397309899330f,9.414957007393240928650f,\ +2.1240556007251143455505f,5.7950199581682682037354f,2.628147569485008716583f,\ +4.3609866220504045486450f,9.1105451015755534172058f,8.0826673656702041625977f,\ +8.1026530498638749122620f,2.5904283951967954635620f,4.1390872886404395103455f,\ +3.599927779287099838257f,6.91278793383389711380f,7.6568587962538003921509f,\ +3.572649653069674968720f,7.6933998242020606994629f,5.4776339093223214149475f,\ +0.9622887428849935531616f,9.5611717319115996360779f,2.2074085660278797149658f,\ +0.1432593585923314094544f,8.1914897728711366653442f,1.3049928424879908561707f,\ +9.6820035576820373535156f,6.5613814676180481910706f,2.4455389659851789474487f,\ +5.2831235667690634727478f,8.4689256362617015838623f,7.8766220854595303535461f,\ +1.262082615867257118225f,7.8838609857484698295593f,3.4530424699187278747559f,\ +2.6598573336377739906311f,9.7098186518996953964233f,8.8752476638182997703552f,\ +2.066752854734659194946f,8.5251609655097126960754f,6.7446978110820055007935f,\ +9.152874383144080638886f,0.2848597615957260131836f,2.367841475643217563629f,\ +7.0153435599058866500854f,1.2025266280397772789001f,8.2874121330678462982178f,\ +3.1610729591920971870422f,5.30519076623022556305f,5.715174819342792034149f,\ +0.4780154302716255187988f,8.2486197212710976600647f,5.7988431211560964584351f,\ +2.7918082987889647483826f,9.5451109297573566436768f,9.0711546363309025764465f,\ +3.3601493109017610549927f,1.1756130633875727653503f,9.2537237703800201416016f,\ +7.2636712575331330299377f,9.0094979386776685714722f,3.9489932497963309288025f,\ +5.6551797501742839813232f,7.0614896761253476142883f,6.7878311965614557266235f,\ +4.1329363686963915824890f,1.402290873229503631592f,4.9523561308160424232483f,\ +4.1948772873729467391968f,8.6262222891673445701599f,2.8575096465647220611572f,\ +2.5121363671496510505676f,3.389101596549153327942f} + + +#define RESULT2 {0.9706107215522056241852f,1.4226512916310911638362f,1.0319374505428213772973f,\ +0.246905751916103338717f,2.0519583905069445073366f,0.7509586489514044060911f,\ +0.1145374781176292794394f,1.9252548546825831721208f,0.4260626375542267973984f,\ +1.9417372548863311987333f,2.1300774331528766758481f,1.4016815575274605976119f,\ +1.4097240974656071177407f,2.1729462062921069964716f,0.1295883538042104654586f,\ +0.6923157050192292327751f,1.7260933336118711167728f,1.7743042306089458204355f,\ +1.9248294562744026059420f,2.1867504404929474226549f,1.6178450344817050243762f,\ +1.2509371333857781660726f,1.3542304576599399901227f,2.2216893784894660157647f,\ +2.2500472625069045662372f,1.2341151000295289552611f,1.3244505343759986892849f,\ +1.993466976516135025221f,0.9615552493321314342367f,1.6081358323702796830901f,\ +0.9702402946929443716684f,1.658906529368289861637f,1.6819873484154954645931f,\ +0.1822594753876470019538f,0.8137278503591067746470f,1.8364289458354570161447f,\ +2.0292571844941731384893f,-0.7224396410182910566178f,1.9056757389571916672f,\ +0.7016968755690818904114f,1.3639398299492546673406f,2.1162936535075722588317f,\ +1.7713390779775688432807f,1.5746765360416834500512f,0.8032855297427843321856f,\ +2.1283371369164427733267f,0.1873057044979935803486f,1.0491993894614395355092f,\ +2.1526356176491328042744f,2.1393719992097341986437f,1.659572089557145968541f,\ +2.2956823132957397959331f,1.870041069148148160650f,2.294874536928924957380f,\ +-0.6923079771535994852982f,2.012968695092798743218f,1.4119764836513208905444f,\ +1.8057488812128539290569f,2.1452539646586252786165f,-0.4421601177273855043381f,\ +2.1137322059948120411832f,2.225957124135133913256f,1.7346971570693363595694f,\ +1.7425060116900870088585f,2.0992577085752079923964f,-0.5640015026903990591478f,\ +1.7220407427170496550417f,0.2226156650313379503636f,1.9850240276979147502345f,\ +0.9849830425057782834486f,1.6984254041571493765161f,2.2910596958626552321903f,\ +2.0008928803872945145770f,-3.2921697020833700086939f,1.7750494410596528993551f,\ +1.1302619000814182470549f,0.9369579698639551867956f,1.83288212099904845864f,\ +0.146191123459191885114f,1.8110724490390321950173f,1.9145604545765595450035f,\ +1.1999934808065779723307f,-1.3520478319474638073672f,1.6437365753918393718180f,\ +1.3652936921609135634270f,0.8810938927039604351421f,1.62224256150308399071f,\ +1.4436435071804869512135f,1.0625454734184220928483f,-0.1188599112506976002157f,\ +1.8266248385955683453119f,1.2398179577704631082469f,1.9551342798915567477991f,\ +1.6508624439841452780087f,1.0544516892385875639349f,1.8722320967378904832401f,\ +-0.1263177455503078638888f,1.5038025468266962292319f,1.9778590304154859413899f,\ +2.194643054750437638489f,0.8869945101840888135314f,1.4673491210608482493427f,\ +2.2697574345222681913015f,1.6230517098794554620156f,1.6549802193742981781810f,\ +1.7222213768989977911161f,1.7258523677080592761968f,1.5436741131934335058418f,\ +2.0534243510350704831069f,2.0669984227965598755361f,2.2832536450533371663596f,\ +2.1025556044304130054456f,1.4485347077928583114925f,0.9007955206863934582984f,\ +2.2224083935232625819367f,0.0007455307285780288533f,1.5429172933929051758639f,\ +1.3738415648213015973766f,-1.0048020456777133624371f,1.6439105509928255699492f,\ +2.1193172771056971726011f,1.8090806121136604467381f,0.6265327936561931876369f,\ +-1.6629714204274992361832f,2.1322195493342954719651f,-0.2895573875226954974060f,\ +2.1439193343978621975054f,-2.0827260644551484070064f,0.62462171221383455677f,\ +1.5934272379201788183423f,2.0135164783675794097917f,2.24229959570391956802f,\ +0.7533272804029441660489f,1.7569989208182723583462f,0.9662792518179295075953f,\ +1.4726983212224467045814f,2.209432545000515446532f,2.089721937569185339356f,\ +2.09219154507008475719f,0.951823265584673561257f,1.4204753018509210793496f,\ +1.2809137839516946399954f,1.9333730200617991190626f,2.0356018208291457582959f,\ +1.273307520236932832702f,2.0403627955950214278857f,1.700673239349282273025f,\ +-0.0384407248228896478159f,2.257710285652239079468f,0.7918192329452391486910f,\ +-1.943098595033752262751f,2.1030957827723826270017f,0.2661975560760838632746f,\ +2.2702688589706512267696f,1.8812011703610473922765f,0.8942655346201515698112f,\ +1.6645175074163265360738f,2.136403657202092354339f,2.0638991426068855616904f,\ +0.2327632262134610163784f,2.0648177566830252516183f,1.2392557177584351268962f,\ +0.9782724873844932389488f,2.273137605702431063293f,2.183266240754464071472f,\ +0.7259787064172199544387f,2.1430219045760425800040f,1.9087566867408878312773f,\ +2.2140679701900434217521f,-1.255758284393388990452f,0.8619787703734573813819f,\ +1.9480996873952269865526f,0.1844248666526293323198f,2.114737753111020968078f,\ +1.1509115140149177580753f,1.668685731123507043350f,1.7431248863402162285752f,\ +-0.7381122661087159420035f,2.1100458798366994450646f,1.7576584357875708608532f,\ +1.0266895216506544131f,2.2560290788762715763482f,2.205099558817555038814f,\ +1.2119854107561658373982f,0.1617897676032789000544f,2.2250260402856771868585f,\ +1.9828853838780200469216f,2.1982793473903963210603f,1.373460672957984574083f,\ +1.73257189512379894403f,1.9546560315313432631967f,1.9151314791431239825670f,\ +1.4189881394992434060498f,0.3381072372999247011016f,1.5998634493586285643119f,\ +1.4338640873752146465137f,2.15480666756291494579f,1.0499504925567986202140f,\ +0.9211335334181942613441f,1.2205648705022635880368f} + + + + + + + + #define CSOURCER {0.3140813848003745079041f,0.5769402063451707363129f,0.1306138429790735244751f,\ 0.0478980806656181812286f,0.4500174494460225105286f,0.0384718659333884716034f,\ 0.483350999653339385986f,0.2981918179430067539215f,0.7112689120694994926453f,\ @@ -420,19 +565,305 @@ 0.3579601167993540777879f,0.9549534865181378284760f,0.8141418225805733266398f,\ 0.7703675837106083168493f,0.1543074266086776613616f} +#define CSOURCE2R {3.9219759730622172355652f,4.6815521270036697387695f,3.361602746881544589996f,\ +5.3368766140192747116089f,2.03906395938247442245f,1.5899897180497646331787f,\ +0.1818151073530316352844f,4.0983706060796976089478f,0.1058345986530184745789f,\ +1.9653097167611122131348f,2.7255953708663582801819f,3.4376550372689962387085f,\ +2.0337020372971892356873f,3.0119446106255054473877f,2.7625959040597081184387f,\ +2.9445307422429323196411f,5.7180739520117640495300f,2.141770124435424804688f,\ +6.8954616272822022438049f,5.8555728476494550704956f,4.2041230341419577598572f,\ +4.2775720171630382537842f,3.1845858739688992500305f,5.7618944440037012100220f,\ +4.2549022240564227104187f,9.7619816288352012634277f,2.518960000015795230866f,\ +4.3911290075629949569702f,0.7593036955222487449646f,2.5593801774084568023682f,\ +0.6706167431548237800598f,7.6511315722018480300903f,0.4173615900799632072449f,\ +3.438271805644035339356f,1.9701673323288559913635f,2.1228986512869596481323f,\ +3.1403985014185309410095f,7.8216253779828548431396f,0.5409323470667004585266f,\ +9.1902069095522165298462f,4.6035157097503542900085f,2.9926850274205207824707f,\ +0.0291663268581032752991f,8.9934705849736928939819f,8.3879271661862730979919f,\ +4.3437494523823261260986f,7.7678761305287480354309f,1.3953176606446504592896f,\ +1.1506372271105647087097f,5.3554199635982513427734f,4.3117330456152558326721f,\ +6.145384786650538444519f,9.2589621385559439659119f,0.9938172809779644012451f,\ +4.2805786477401852607727f,9.431830951943993568420f,0.3273952705785632133484f,\ +9.2132670804858207702637f,9.4490244099870324134827f,9.007069906219840049744f,\ +8.0943161016330122947693f,0.2519542910158634185791f,0.0196450622752308845520f,\ +5.0752213317900896072388f,4.0760429529473185539246f,8.4080461412668228149414f,\ +5.017265700735151767731f,9.1287807654589414596558f,4.4357294728979468345642f,\ +5.9837839566171169281006f,7.7418426470831036567688f,7.9220082703977823257446f,\ +5.5046048713847994804382f,4.0850437059998512268066f,7.2174380579963326454163f,\ +4.768535858020186424255f,6.3930579042062163352966f,9.963865298777818679810f,\ +1.5747882844880223274231f,5.3506936598569154739380f,2.1290646074339747428894f,\ +5.59145063161849975586f,4.304965981282293796539f,0.2280548494309186935425f,\ +5.7614597817882895469666f,7.1491303853690624237061f,9.3216359661892056465149f,\ +1.2326993141323328018188f,2.8655522270128130912781f,0.1247995719313621520996f,\ +5.7694048294797539710999f,3.9386960770934820175171f,6.8885837262496352195740f,\ +9.7023218311369419097900f,8.51576429326087236404f,3.3933044690638780593872f,\ +8.7725317804142832756042f,1.1314024776220321655273f,5.2641283208504319190979f,\ +5.297394050285220146179f,9.2917560925707221031189f,9.7654302977025508880615f,\ +6.2254639761522412300110f,9.822583282366394996643f,7.5429888023063540458679f,\ +5.4547880962491035461426f,7.2860160330310463905334f,0.2525969501584768295288f,\ +4.0251684701070189476013f,0.9831319935619831085205f,2.6086253346875309944153f,\ +3.6363423336297273635864f,1.7466178117319941520691f,9.2341394722461700439453f,\ +7.6051409030333161354065f,5.6402041297405958175659f,3.7970651825889945030212f,\ +8.7762261740863323211670f,8.21742579806596040726f,6.787058124318718910217f,\ +0.8220098121091723442078f,2.5527314469218254089355f,7.4444567272439599037170f,\ +2.2695036139339208602905f,6.836930788122117519379f,9.3650726415216922760010f,\ +5.0530174048617482185364f,2.5248145777732133865356f,6.8188397912308573722839f,\ +2.8363681584596633911133f,1.409485661424696445465f,6.7591095995157957077026f,\ +4.5126775791868567466736f,7.5430292449891567230225f,1.3702143030241131782532f,\ +6.6082405392080545425415f,3.8900542212650179862976f,7.001820541918277740479f,\ +9.168005720712244510651f,2.1228999551385641098022f,2.6978330826386809349060f,\ +3.1998893804848194122314f,0.2321802498772740364075f,7.26544727571308612823f,\ +1.5340585587546229362488f,2.3552638292312622070312f,0.8797382796183228492737f,\ +7.1059537213295698165894f,6.8887275597080588340759f,6.5953194908797740936279f,\ +1.8151161121204495429993f,3.9049659762531518936157f,1.5869047446176409721375f,\ +6.2407150492072105407715f,6.3760355720296502113342f,4.2704886104911565780640f,\ +1.0716815060004591941833f,2.3822965659201145172119f,9.4629473658278584480286f,\ +4.5766852516680955886841f,8.9644787041470408439636f,4.4384705275297164916992f,\ +8.08956819120794534683f,6.8317985069006681442261f,0.3401931514963507652283f,\ +2.3805456422269344329834f,9.4920115964487195014954f,2.1827886346727609634399f,\ +6.1546878470107913017273f,8.3135433867573738098145f,7.7340125897899270057678f,\ +4.2441909667104482650757f,7.262125960551202297211f,7.0999773032963275909424f,\ +4.7457459988072514533997f,9.4386920798569917678833f,1.4596485672518610954285f,\ +0.7141010463237762451172f,6.7337385797873139381409f,6.536924717947840690613f,\ +1.996896131895482540131f,6.01412517949938774109f,1.8993748771026730537415f,\ +2.5839814636856317520142f,0.9878737432882189750671f,0.6199027225375175476074f,\ +0.4034968325868248939514f,7.4001471605151891708374f,6.1626600986346602439880f,\ +6.5835834480822086334229f,2.5145971449092030525208f,3.8433500844985246658325f,\ +4.3964602379128336906433f,6.5407369285821914672852f,5.878106378950178623200f,\ +6.0208318661898374557495f,0.4535020282492041587830f,2.0294443331658840179443f,\ +7.844273825176060199738f,2.6375361625105142593384f} + +#define CSOURCE2I {4.3832763982936739921570f,8.6648589745163917541504f,3.7921421090140938758850f,\ +7.6687160786241292953491f,6.0066213225945830345154f,7.85673560574650764465f,\ +7.3871155502274632453918f,5.5442603398114442825317f,9.9291495559737086296082f,\ +9.757428467273712158203f,3.709622272290289402008f,3.0322382133454084396362f,\ +9.5195201179012656211853f,7.1278580836951732635498f,1.192370061762630939484f,\ +5.0091631803661584854126f,3.2900535268709063529968f,4.8089468106627464294434f,\ +3.3036959776654839515686f,6.3044753577560186386108f,2.1171907847747206687927f,\ +4.4860231317579746246338f,5.9145097108557820320129f,6.8067426700145006179810f,\ +0.7392961112782359123230f,9.4336947053670883178711f,1.2863306934013962745667f,\ +2.0190807711333036422729f,1.9693034281954169273376f,8.9286901615560054779053f,\ +4.6179189579561352729797f,6.2512917164713144302368f,7.0597065938636660575867f,\ +7.0181696489453315734863f,4.0879997471347451210022f,0.6362213846296072006226f,\ +0.6573933875188231468201f,5.3310041315853595733643f,0.3315818728879094123840f,\ +3.157835649326443672180f,3.785823243670165538788f,4.6195234358310699462891f,\ +6.2873698258772492408752f,2.8785153012722730636597f,3.2920487364754080772400f,\ +4.7192330472171306610107f,3.3537696348503232002258f,5.5530697200447320938110f,\ +1.196080814115703105927f,7.6139996573328971862793f,4.7909884760156273841858f,\ +2.8169692959636449813843f,2.380097783170640468597f,3.2942054606974124908447f,\ +2.3067280324175953865051f,2.1362966019660234451294f,4.0549980429932475090027f,\ +3.0953712016344070434570f,6.762971603311598300934f,9.7069163154810667037964f,\ +5.4417965700849890708923f,0.2047479711472988128662f,8.9413649635389447212219f,\ +3.4903638903051614761353f,1.1053651524707674980164f,2.0233777537941932678223f,\ +1.3046909729018807411194f,8.573952978476881980896f,6.3780163740739226341248f,\ +4.0711227245628833770752f,6.6919379355385899543762f,2.042601602151989936829f,\ +8.3104313490912318229675f,0.1221632957458496093750f,4.8844617092981934547424f,\ +9.549877075478434562683f,0.5874312063679099082947f,8.2584649138152599334717f,\ +2.9807415651157498359680f,0.7757596764713525772095f,5.8460923237726092338562f,\ +7.528713606297969818115f,0.5172297963872551918030f,5.9586250688880681991577f,\ +3.8337053125724196434021f,4.9002202786505222320557f,5.2727950783446431159973f,\ +0.6889454741030931472778f,8.843077751807868480682f,7.1912937611341476440430f,\ +0.6942595774307847023010f,1.1522095929831266403198f,4.862680672667920589447f,\ +7.6715826056897640228271f,0.8805298106744885444641f,7.0085612777620553970337f,\ +1.879138792864978313446f,2.0178856328129768371582f,4.0628212550655007362366f,\ +4.0966569539159536361694f,1.769564501009881496429f,3.31293122842907905579f,\ +0.5184767069295048713684f,4.1492417920380830764771f,7.2212355909869074821472f,\ +0.7746253907680511474609f,5.8558783913031220436096f,3.7079446297138929367065f,\ +2.1161167463287711143494f,1.903268527239561080933f,5.607953821308910846710f,\ +9.4247916433960199356079f,6.8177247745916247367859f,2.7342410013079643249512f,\ +2.0717754075303673744202f,1.9379387702792882919312f,6.797837591730058193207f,\ +5.88365742936730384827f,9.331753817386925220490f,5.509122880175709724426f,\ +8.0405469564720988273621f,1.074489727616310119629f,7.4039250845089554786682f,\ +5.6103316973894834518433f,7.6611549546942114830017f,7.8306589089334011077881f,\ +1.4388314681127667427063f,1.6471924725919961929321f,3.1774142337962985038757f,\ +5.0265956297516822814941f,6.9204960623756051064f,7.0065794046968221664429f,\ +8.8706119870766997337341f,6.9797694869339466094971f,6.7989911558106541633606f,\ +3.6159398127347230911255f,2.6739976881071925163269f,0.7736870646476745605469f,\ +1.494100340642035007477f,3.2018390577286481857300f,2.0260545751079916954041f,\ +4.4988587312400341033936f,7.7075743721798062324524f,2.4352242145687341690063f,\ +2.1261148853227496147156f,1.0992341861128807067871f,6.9814807781949639320374f,\ +4.1509064938873052597046f,5.0298188393935561180115f,7.51160675659775733948f,\ +9.9401472182944416999817f,1.82876241393387317657f,3.021917375735938549042f,\ +3.7854864448308944702148f,7.1531985932961106300354f,9.5241537224501371383667f,\ +4.7039186349138617515564f,1.8709417246282100677490f,2.55718790460377931595f,\ +4.4350660685449838638306f,7.2340781940147280693054f,8.7619100883603096008301f,\ +0.3733208635821938514710f,4.2934664245694875717163f,3.1572330510243773460388f,\ +3.682477343827486038208f,1.4587742509320378303528f,6.7683792579919099807739f,\ +5.2619793592020869255066f,4.003625661134719848633f,0.0291080260649323463440f,\ +3.0681814532727003097534f,7.9026939114555716514587f,9.5779503695666790008545f,\ +6.6892711864784359931946f,2.9296159837394952774048f,8.2238993747159838676453f,\ +0.1798455044627189636231f,8.7107013771310448646545f,3.1810243334621191024780f,\ +5.7244732743129134178162f,5.7386581040918827056885f,3.4920182498171925544739f,\ +7.06729766912758350372f,3.5992007283493876457214f,4.0523112565279006958008f,\ +6.1408105725422501564026f,6.5240467619150876998901f,0.2951709320768713951111f,\ +5.6688958965241909027100f,7.1140170888975262641907f,4.5884906593710184097290f,\ +4.7205173922702670097351f,0.6237313523888587951660f,0.8544011274352669715881f,\ +0.1345641072839498519898f,3.5430019116029143333435f,6.7193946428596973419189f,\ +1.3606189610436558723450f,2.1197437215596437454224f} + +#define CRESULT2R {1.7718546901199148102535f,2.2873385372432406548171f,1.6228701567171754938101f,\ +2.2346263074245684698838f,1.8473969837167181218263f,2.0814403666906242662549f,\ +2.000040135761198101250f,1.930738025076279118508f,2.2955316341715112926636f,\ +2.2979125914561788768253f,1.52676863913911398107f,1.5225454413433419098567f,\ +2.2756589535249842626285f,2.0461560089912054216654f,1.10158579014350732628f,\ +1.7596676151017560663092f,1.886619744318301705732f,1.6609534913253483079387f,\ +2.0341867590624715944614f,2.1522631887405574424577f,1.5490800609419352884544f,\ +1.8243154431583954444562f,1.9046961835587756795007f,2.1880745312667504443027f,\ +1.462943224821960486182f,2.6082576924848916988253f,1.0397086540972344526068f,\ +1.5754847768676314423431f,0.746979645400304148595f,2.2287521705924668857790f,\ +1.5403790183895167409389f,2.29053332003721576982f,1.9561479629741382879615f,\ +2.056062919004959077540f,1.5124829204355532130677f,0.7957872878063905197621f,\ +1.1657936572577645151227f,2.247663310479210085902f,-0.4549625893688244437918f,\ +2.273939094117130466088f,1.7851157264602297569667f,1.705510493291471751931f,\ +1.838553591041654167171f,2.2452631537104275061267f,2.1984262619387999748710f,\ +1.858482175867823826820f,2.1354614286115483068329f,1.7449625890299069741474f,\ +0.5066316450005309279803f,2.2309587833094872699746f,1.8633839241242127204856f,\ +1.9110608576794807511590f,2.2575857867741544460216f,1.23571911173189863398f,\ +1.581562045830424700910f,2.2691047577207688057399f,1.4031989962500943658341f,\ +2.2741179432518765501925f,2.4527182982567738989133f,2.5833963585371355620168f,\ +2.2776279862384747332271f,-1.1249835300913728630690f,2.1906906716320380112961f,\ +1.8180097251363194210683f,1.440608273684235829393f,2.157337396250079031290f,\ +1.6456014738468727198750f,2.5276363856092047832647f,2.0501201476301127435420f,\ +1.9792596577711849548109f,2.325636279713856779949f,2.1018269082301319627959f,\ +2.2993946557097193483798f,1.407779382548410174181f,2.1650335217497893580685f,\ +2.3678319878208848869861f,1.8594164774388513006187f,2.56043452139564964298f,\ +1.2152594801616827258073f,1.6876273083151080989239f,1.8280452566376663714465f,\ +2.2383606348726785562064f,1.4669353168458199032642f,1.7855716392006990567154f,\ +1.9344712649878033072781f,2.1595582205209731263551f,2.3711393709457433409682f,\ +0.3451198452895575252697f,2.2295598849908442318224f,1.9730216569827605521681f,\ +1.7597572254564382010500f,1.4119056335367026200345f,2.1320313551579719302254f,\ +2.5151804905590435801344f,2.1472364706413502588589f,2.052431577045615185284f,\ +2.1940570121896025845842f,0.8387289948467516742525f,1.8945610375322186058611f,\ +1.901605848224737327357f,2.2469410116186243620007f,2.3333167208432867845147f,\ +1.8321040495156570848678f,2.3667788410376999763685f,2.345870799293293007537f,\ +1.7064766326923879180555f,2.2351179984798275057756f,1.3127927306468758494873f,\ +1.5145818637157286712380f,0.7618288453812751548355f,1.8221250086585414340590f,\ +2.3127298919002594601579f,1.9513099157402993277799f,2.2649290827240116108499f,\ +2.0646178740610454660498f,1.7857162805439725783430f,2.0523808897592226152540f,\ +2.357637781206334715023f,2.5204455223537904906550f,2.1680868421848340510394f,\ +2.08969579055791898625f,1.0187212773133276222381f,2.351321025745570558740f,\ +1.8003855797977157404688f,2.3290564194645368978343f,2.5020530275623595883872f,\ +1.6589662323678027178175f,1.1034736729371952268508f,2.0179385634489594991692f,\ +1.7529535621370035958222f,1.9548092141654069830992f,2.2757671672542376661852f,\ +2.2978225629400212959297f,2.329897705001075625120f,1.9366802551403343723990f,\ +2.0192737614105338295190f,1.5519072144028889237433f,1.9522381258437428996899f,\ +2.228825942499146339770f,1.3459088341323246496017f,1.2160693133443531976923f,\ +1.708519320712721833999f,2.042657041378174831436f,2.0363649964518035773153f,\ +0.9638512795498686003270f,0.9551846741593900125267f,1.951137961258366582129f,\ +2.107724763084950492242f,2.1435395035941335883933f,2.30219731892690226971f,\ +2.3129821080069814520641f,1.4613961122338947618005f,1.2276638750511146280786f,\ +1.98774702803650615834f,2.2599263943254159769936f,2.3454288218721179859472f,\ +1.5736974684351636710744f,1.1082826047896976451312f,2.2826248447267389884985f,\ +1.852079302129498561413f,2.4440219801181322090144f,2.2846216839061130876587f,\ +2.0916390604994830049179f,2.0880185293365247645170f,1.1554676622252344486697f,\ +1.4781743340729813773748f,2.2621227047071905680298f,1.9617338719614783038026f,\ +2.0915485321054503309313f,2.222172100020261886755f,2.0456349034700243016971f,\ +1.6557620395745074048932f,2.3732960033711649749932f,2.4784302018604411621538f,\ +2.1043456955600268187823f,2.2908052004546388680239f,2.1225525715426596384816f,\ +-0.3059820602804464440006f,2.398801697565509982724f,1.9837316998415748248163f,\ +1.8021669050328577021958f,2.1177911026101683411582f,1.3800624471185749531088f,\ +2.0182134290564768264176f,1.3170274339145702224840f,1.4108532825842892144408f,\ +1.817110834423457665920f,2.2890298175330245911141f,1.8196542505912531861867f,\ +2.1619335403208914669904f,2.0209326327770549269758f,1.7893311710629888899859f,\ +1.8641960608110765829082f,1.882576152038281991352f,1.7816883851861540222217f,\ +1.7954751269073565556056f,1.2730999018963571334240f,1.9486466131391497746961f,\ +2.074605067637334876451f,1.2189909546635331327735f} + +#define CRESULT2I {0.8408843669071919268987f,1.0754371807248737091811f,0.8455094310786673839075f,\ +0.962808271271232585242f,1.2435335418309885202603f,1.371120256581034091425f,\ +1.5461888319559713433904f,0.9342369007616236897817f,1.56013775123029430070f,\ +1.3720388608498168547811f,0.9371355532144381994542f,0.7228179279461685036168f,\ +1.360325287393417292847f,1.1709945644102059958414f,0.4074578726347549695319f,\ +1.0393742565506918218432f,0.5221182542768327827787f,1.1517977305599864656926f,\ +0.4467977216337457035955f,0.8222975857540034683169f,0.4665224019878621564139f,\ +0.8091797065019556978172f,1.0768746352304479074746f,0.8683388375483406251831f,\ +0.1720341159830799382391f,0.7682977019562435838651f,0.4721387487057847609506f,\ +0.4309811115589534114001f,1.20279143843462255070f,1.2916347740244560338141f,\ +1.4265839008392693365579f,0.6850460436644268957807f,1.5117462274209296779759f,\ +1.1152532149987959275705f,1.1217014706271768442747f,0.2911766403909815670303f,\ +0.2063546073155473614680f,0.5982511040925977408023f,0.5499105526382754849379f,\ +0.3309697617869979402450f,0.6882370204600587459964f,0.9959451809388051302108f,\ +1.5661574844082004620560f,0.3097639368523368297304f,0.3740022155825183380884f,\ +0.8268049495959598482742f,0.407572856709710940049f,1.3246230944084764757918f,\ +0.8047604843662868878695f,0.9578156211088914018248f,0.8379992820836518196970f,\ +0.4298072736875270249968f,0.2516111351341220880862f,1.2777930133692467773443f,\ +0.4942674920588698839197f,0.2227403824735175175142f,1.4902323819071812138759f,\ +0.3241206854947055737704f,0.6212066791677098853697f,0.8227777158663325263177f,\ +0.5918914368525474145599f,0.6824004867135488039409f,1.5685992315253338702519f,\ +0.602441091725517741118f,0.2648167750385964080984f,0.2361574036342227733698f,\ +0.2544057494452062195833f,0.7540670573431564882583f,0.9631160038064509043565f,\ +0.5974222702744066415548f,0.7127866343417466055143f,0.2523427003112133637508f,\ +0.9857721947818851582213f,0.0298961055939373325507f,0.5949566736712420533806f,\ +1.1076852186579833059454f,0.0916284996635063769821f,0.6920814866116709040966f,\ +1.0847494758718594365376f,0.1439797822740493671301f,1.2215400197911927548944f,\ +0.9319943094964961982640f,0.1195740768674621451462f,1.5325419323859537090726f,\ +0.5871287736405550461427f,0.6008795873685909283424f,0.5147800680430554276512f,\ +0.5096442477271476700906f,1.2574287319730830247977f,1.55344381002968989769f,\ +0.1197588579388608048815f,0.2845949117488152935174f,0.6146775806026560928785f,\ +0.6690416852557365956f,0.1030338183393550155476f,1.1198962694059428901738f,\ +0.2110181909408466172096f,1.0597850788835401214527f,0.6573038229366630069706f,\ +0.6582686240328038396186f,0.1881909924839933190288f,0.3270668956957688000564f,\ +0.0830914673081940696742f,0.3996821407672082604456f,0.763608851537480148863f,\ +0.1410651270101331844487f,0.677001919140020169685f,1.5027782434779339837405f,\ +0.4840122714003086690227f,1.0939971143713191903402f,1.1354027775868176242113f,\ +1.2025671422981056846169f,1.3200023979900399329068f,0.2878762084297626921980f,\ +0.2659639364881328793544f,0.3309563133803885004447f,1.0613976119428301103653f,\ +0.5905886949329369750572f,0.84881047253311037171f,0.6818405058224251691357f,\ +1.4689172047242584628890f,0.3984077871527766379067f,0.7826684691736193189016f,\ +1.1863976071520063726439f,0.8421875864316380466690f,0.6964016273061860440308f,\ +0.2774051332309265816001f,0.5780614975169666713839f,0.4360596809152573194446f,\ +1.0570616474517706695480f,1.3698760574306645398934f,0.8033735187122362786383f,\ +1.100195299896877587642f,0.7466330742895204153342f,1.3719281224888897341430f,\ +0.5006805450256617273652f,0.6022149721715611692119f,0.1100515320096066840261f,\ +0.1615487638997855912582f,0.9853189831543425203364f,0.6441365190650450989196f,\ +0.9525486295501676137221f,1.540681786544560338825f,0.3234105928346787672822f,\ +0.9457654725170446807780f,0.4366658824494836776964f,1.4454467286135332937391f,\ +0.5286797419321711544171f,0.6306769685466229180548f,0.8502600566998695930110f,\ +1.3901817278534140953639f,0.4379816003966337523146f,1.0872460520812594619855f,\ +0.5452429334871597976786f,0.8427783441184910628863f,1.1492861648773524674283f,\ +1.346792368827264718689f,0.665745289338786183642f,0.2639277343938546960267f,\ +0.7696845111061191291313f,0.6789773815510785626159f,1.1019111077295657974418f,\ +0.0461157104075398602272f,0.5610787453255564605215f,1.4634600366382779501606f,\ +0.9969191986962234741654f,0.1524913254966685227654f,1.2588290814744897971877f,\ +0.7073635046287626293449f,0.4488022872724745648831f,0.0037636205385015429094f,\ +0.6259389684526723840463f,0.8276134607557569244918f,0.9328971084913546540918f,\ +0.9537519653655091023126f,0.3009556732582234217510f,1.3951370123387065724785f,\ +0.2467179687642131191705f,0.9127106501576134345299f,0.4528896475979662383793f,\ +1.2351598243895067774645f,0.7619639996129009551495f,1.0726338584530288322583f,\ +1.220269965181696392165f,1.3029226301867964377124f,1.4189980227900089726489f,\ +1.5051832236136615250643f,0.7225617055791342391302f,0.0478600995604049964105f,\ +0.710883123025403795836f,1.2310328539390928970221f,0.8735414139313334436210f,\ +0.8209275679220129351421f,0.0950735258592600440686f,0.1443422571457730618771f,\ +0.0223460331642115414552f,1.443489200421151252840f,1.2774801572114198311425f,\ +0.1717450012966928174496f,0.6769828145758884918593f} +/* in is between 0 and 1 + in2 is between 0 and 10 */ + + +/* FIXME : Tests à 10^-4 +in the slogsTest with these values +in : 1.00074577 --- out : 0.00074550 --- result : 0.00074553 + */ void slogsTest(void) { float in[]=SOURCE; float res[]=RESULT; float out; + float in2[]=SOURCE2; + float res2[]=RESULT2; int i; for (i=0;i<200;i++){ out=slogs(in[i]); assert(( (fabs(out-res[i]))/(fabs(out)) )<1e-5); } + + for (i=0;i<200;i++){ + out=slogs(in2[i]); + assert(( (fabs(out-res2[i]))/(fabs(out)) )<1e-4); + } } void clogsTest(void) { @@ -440,7 +871,11 @@ void clogsTest(void) { float inI[]=CSOURCEI; float resR[]=CRESULTR; float resI[]=CRESULTI; - floatComplex in,out; + float in2R[]=CSOURCE2R; + float in2I[]=CSOURCE2I; + float res2R[]=CRESULT2R; + float res2I[]=CRESULT2I; + floatComplex in,in2,out; int i; for (i=0;i<200;i++){ @@ -449,18 +884,32 @@ void clogsTest(void) { assert(( (fabs(creals(out)-resR[i]))/(fabs(creals(out))) )<1e-5); assert(( (fabs(cimags(out)-resI[i]))/(fabs(cimags(out))) )<1e-6); } + + for (i=0;i<200;i++){ + in2=FloatComplex(in2R[i],in2I[i]); + out=clogs(in2); + assert(( (fabs(creals(out)-res2R[i]))/(fabs(creals(out))) )<1e-6); + assert(( (fabs(cimags(out)-res2I[i]))/(fabs(cimags(out))) )<1e-6); + } } void slogaTest(void) { float in[]=SOURCE; float res[]=RESULT; float out[200]; - int i,j; - j=1; + float in2[]=SOURCE2; + float res2[]=RESULT2; + int i; + sloga(in,200,out); for (i=0;i<200;i++){ assert(( (fabs(out[i]-res[i]))/(fabs(out[i])) )<1e-5); } + + sloga(in2,200,out); + for (i=0;i<200;i++){ + assert(( (fabs(out[i]-res2[i]))/(fabs(out[i])) )<1e-4); + } } void clogaTest(void) { @@ -468,7 +917,11 @@ void clogaTest(void) { float inI[]=CSOURCEI; float resR[]=CRESULTR; float resI[]=CRESULTI; - floatComplex *in,out[200]; + float in2R[]=CSOURCE2R; + float in2I[]=CSOURCE2I; + float res2R[]=CRESULT2R; + float res2I[]=CRESULT2I; + floatComplex *in,*in2,out[200]; int i; in=FloatComplexMatrix(inR,inI,200); @@ -478,6 +931,15 @@ void clogaTest(void) { assert(( (fabs(creals(out[i])-resR[i]))/(fabs(creals(out[i]))) )<1e-5); assert(( (fabs(cimags(out[i])-resI[i]))/(fabs(cimags(out[i]))) )<1e-6); } + + + in2=FloatComplexMatrix(in2R,in2I,200); + cloga(in2,200,out); + + for (i=0;i<200;i++){ + assert(( (fabs(creals(out[i])-res2R[i]))/(fabs(creals(out[i]))) )<1e-6); + assert(( (fabs(cimags(out[i])-res2I[i]))/(fabs(cimags(out[i]))) )<1e-6); + } } |