_tbl_atan.c

操作系统SunOS 4.1.3版本的源码

#ifdef sccsid
static	char sccsid[] = "@(#)_tbl_atan.c 1.1 92/07/30 SMI"; 
#endif

/*
 * Copyright (c) 1989 by Sun Microsystems, Inc.
 */

/* 
 * Table of constants for atan.
 * By K.C. Ng, March 9, 1989
 */

double _tbl_atan_hi[] = {
 1.243549945467614382e-01, 1.320397616146387620e-01, 1.397088742891636204e-01,
 1.473614810886516302e-01, 1.549967419239409727e-01, 1.626138285979485676e-01,
 1.702119252854744080e-01, 1.777902289926760471e-01, 1.853479499956947607e-01,
 1.928843122579746439e-01, 2.003985538258785115e-01, 2.078899272022629863e-01,
 2.153576996977380476e-01, 2.228011537593945213e-01, 2.302195872768437179e-01,
 2.376123138654712419e-01, 2.449786631268641435e-01, 2.596296294082575118e-01,
 2.741674511196587893e-01, 2.885873618940774099e-01, 3.028848683749714166e-01,
 3.170557532091470287e-01, 3.310960767041321029e-01, 3.450021772071051318e-01,
 3.587706702705721895e-01, 3.723984466767542023e-01, 3.858826693980737521e-01,
 3.992207695752525431e-01, 4.124104415973872673e-01, 4.254496373700422662e-01,
 4.383365598579578304e-01, 4.510696559885234436e-01, 4.636476090008060935e-01,
 4.883339510564055352e-01, 5.123894603107377321e-01, 5.358112379604637043e-01,
 5.585993153435624414e-01, 5.807563535676704136e-01, 6.022873461349641522e-01,
 6.231993299340659043e-01, 6.435011087932843710e-01, 6.632029927060932861e-01,
 6.823165548747480713e-01, 7.008544078844501923e-01, 7.188299996216245269e-01,
 7.362574289814280970e-01, 7.531512809621944138e-01, 7.695264804056582975e-01,
 7.853981633974482790e-01, 8.156919233162234217e-01, 8.441539861131710509e-01,
 8.709034570756529758e-01, 8.960553845713439269e-01, 9.197196053504168578e-01,
 9.420000403794636101e-01, 9.629943306809362058e-01, 9.827937232473290541e-01,
 1.001483135694234639e+00, 1.019141344266349725e+00, 1.035841253008800145e+00,
 1.051650212548373764e+00, 1.066630365315743623e+00, 1.080839000541168327e+00,
 1.094328907321189925e+00, 1.107148717794090409e+00, 1.130953743979160375e+00,
 1.152571997215667610e+00, 1.172273881128476303e+00, 1.190289949682531656e+00,
 1.206817370285252489e+00, 1.222025323210989667e+00, 1.236059489478081863e+00,
 1.249045772398254428e+00, 1.261093382252440387e+00, 1.272297395208717319e+00,
 1.282740879744270757e+00, 1.292496667789785336e+00, 1.301628834009196156e+00,
 1.310193935047555547e+00, 1.318242051016837113e+00, 1.325817663668032553e+00,
 1.339705659598999565e+00, 1.352127380920954636e+00, 1.363300100359693845e+00,
 1.373400766945015894e+00, 1.382574821490125894e+00, 1.390942827002418447e+00,
 1.398605512271957618e+00, 1.405647649380269870e+00, 1.412141064608495311e+00,
 1.418146998399631542e+00, 1.423717971406494032e+00, 1.428899272190732761e+00,
 1.433730152484709031e+00, 1.438244794498222623e+00, 1.442473099109101931e+00,
 1.446441332248135092e+00, 
};

double _tbl_atan_lo[] = {
-3.125324142453938311e-18,-1.276925400709959526e-17, 2.479758919089733066e-17,
 5.409599147666297957e-18, 9.585415594114323829e-18, 7.784470643106252464e-18,
-3.541164079802125137e-18, 2.372599351477449041e-17, 4.180692268843078977e-18,
 2.034098543938166622e-17, 3.139954287184449286e-18, 7.333160666520898500e-18,
 4.738160130078732886e-19,-5.498822172446843173e-18, 1.231340452914270316e-17,
 1.058231431371112987e-17, 1.069875561873445139e-17, 1.923875492461530410e-17,
 8.261353575163771936e-18,-1.428369957377257085e-17,-1.101082790300136900e-17,
-1.893928924292642146e-17,-7.952610375793798701e-18,-2.293880475557830393e-17,
 3.088733564861919217e-17, 1.961231150484565340e-17, 2.378822732491940868e-17,
 2.246598105617042065e-17, 3.963462895355093301e-17, 2.331553074189288466e-17,
-2.494277030626540909e-17, 3.280735600183735558e-17, 2.269877745296168709e-17,
-1.137323618932958456e-17,-2.546278147285580353e-17,-4.063795683482557497e-18,
-5.455630548591626394e-18,-1.441464378193066908e-17, 2.950430737228402307e-17,
 2.672403885140095079e-17, 1.583478505144428617e-17,-3.076054864429649001e-17,
 6.943223671560007740e-18,-1.987626234335816123e-17,-2.147838844445698302e-17,
 3.473937648299456719e-17,-2.425693465918206812e-17,-3.704991905602721293e-17,
 3.061616997868383018e-17,-1.071456562778743077e-17,-4.841337011934916763e-17,
-2.269823590747287052e-17, 2.923876285774304890e-17,-4.057439412852767923e-17,
 5.460837485846687627e-17,-3.986660595210752445e-18, 1.390331103123099845e-17,
 9.438308023545392000e-17, 1.000401886936679889e-17, 3.194313981784503706e-17,
-9.650564731467513515e-17,-5.956589637160374564e-17,-1.567632251135907253e-17,
-5.490676155022364226e-18, 9.404471373566379412e-17, 7.123833804538446299e-17,
-9.159738508900378819e-17, 8.385188614028674371e-17, 7.683333629842068806e-17,
 4.172467638861439118e-17,-2.979162864892849274e-17, 7.879752739459421280e-17,
-2.196203799612310905e-18, 3.242139621534960503e-17, 2.245875015034507026e-17,
-9.283188754266129476e-18,-6.830804768926660334e-17,-1.236918499824626670e-17,
 8.745413734780278834e-17,-6.319394031144676258e-17,-8.824429373951136321e-17,
-2.599011860304134377e-17, 2.147674250751150961e-17, 1.093246171526936217e-16,
-3.307710355769516504e-17,-3.561490438648230100e-17,-9.843712133488842595e-17,
-2.324061182591627982e-17,-8.922630138234492386e-17,-9.573807110557223276e-17,
-8.263883782511013632e-17, 8.721870922223967507e-17,-6.457134743238754385e-17,
-4.396204466767636187e-17,-2.493019910264565554e-17,-1.105119435430315713e-16,
 9.211323971545051565e-17,
};