tab_ld8a.c
上传用户:zhouyunkk
上传日期:2013-01-10
资源大小:59k
文件大小:34k
源码类别:

语音压缩

开发平台:

C/C++

  1. /*
  2.    ITU-T G.729 Annex C - Reference C code for floating point
  3.                          implementation of G.729 Annex A
  4.                          Version 1.01 of 15.September.98
  5. */
  6. /*
  7. ----------------------------------------------------------------------
  8.                     COPYRIGHT NOTICE
  9. ----------------------------------------------------------------------
  10.    ITU-T G.729 Annex C ANSI C source code
  11.    Copyright (C) 1998, AT&T, France Telecom, NTT, University of
  12.    Sherbrooke.  All rights reserved.
  13. ----------------------------------------------------------------------
  14. */
  15. /*
  16.  File : TAB_LD8A.C
  17.  Used for the floating point version of G.729A only
  18.  (not for G.729 main body)
  19. */
  20. #include "typedef.h"
  21. #include "ld8a.h"
  22.  /*----------------------------------------------------------------------------
  23.   * tab_ld8a - defines ROM tables (constants  declared as externals in functions
  24.   *----------------------------------------------------------------------------
  25.   */
  26. /* Hamming_cos window for LPC analysis.           */
  27. /*   Create with function ham_cos(window,200,40)  */
  28. FLOAT hamwindow[L_WINDOW] = {        /* hamming-cosine window */
  29. (F)0.08000000,
  30. (F)0.08005703,
  31. (F)0.08022812,
  32. (F)0.08051321,
  33. (F)0.08091225,
  34. (F)0.08142514,
  35. (F)0.08205172,
  36. (F)0.08279188,
  37. (F)0.08364540,
  38. (F)0.08461212,
  39. (F)0.08569173,
  40. (F)0.08688401,
  41. (F)0.08818865,
  42. (F)0.08960532,
  43. (F)0.09113365,
  44. (F)0.09277334,
  45. (F)0.09452391,
  46. (F)0.09638494,
  47. (F)0.09835598,
  48. (F)0.10043652,
  49. (F)0.10262608,
  50. (F)0.10492408,
  51. (F)0.10732999,
  52. (F)0.10984316,
  53. (F)0.11246302,
  54. (F)0.11518890,
  55. (F)0.11802010,
  56. (F)0.12095598,
  57. (F)0.12399574,
  58. (F)0.12713866,
  59. (F)0.13038395,
  60. (F)0.13373083,
  61. (F)0.13717847,
  62. (F)0.14072597,
  63. (F)0.14437246,
  64. (F)0.14811710,
  65. (F)0.15195890,
  66. (F)0.15589692,
  67. (F)0.15993017,
  68. (F)0.16405767,
  69. (F)0.16827843,
  70. (F)0.17259133,
  71. (F)0.17699537,
  72. (F)0.18148938,
  73. (F)0.18607232,
  74. (F)0.19074300,
  75. (F)0.19550033,
  76. (F)0.20034306,
  77. (F)0.20527001,
  78. (F)0.21027996,
  79. (F)0.21537170,
  80. (F)0.22054392,
  81. (F)0.22579536,
  82. (F)0.23112471,
  83. (F)0.23653066,
  84. (F)0.24201185,
  85. (F)0.24756692,
  86. (F)0.25319457,
  87. (F)0.25889328,
  88. (F)0.26466170,
  89. (F)0.27049842,
  90. (F)0.27640197,
  91. (F)0.28237087,
  92. (F)0.28840363,
  93. (F)0.29449883,
  94. (F)0.30065489,
  95. (F)0.30687031,
  96. (F)0.31314352,
  97. (F)0.31947297,
  98. (F)0.32585713,
  99. (F)0.33229437,
  100. (F)0.33878314,
  101. (F)0.34532180,
  102. (F)0.35190874,
  103. (F)0.35854232,
  104. (F)0.36522087,
  105. (F)0.37194279,
  106. (F)0.37870640,
  107. (F)0.38550997,
  108. (F)0.39235184,
  109. (F)0.39923036,
  110. (F)0.40614375,
  111. (F)0.41309035,
  112. (F)0.42006844,
  113. (F)0.42707625,
  114. (F)0.43411207,
  115. (F)0.44117412,
  116. (F)0.44826069,
  117. (F)0.45537004,
  118. (F)0.46250033,
  119. (F)0.46964988,
  120. (F)0.47681686,
  121. (F)0.48399949,
  122. (F)0.49119604,
  123. (F)0.49840465,
  124. (F)0.50562358,
  125. (F)0.51285106,
  126. (F)0.52008528,
  127. (F)0.52732444,
  128. (F)0.53456670,
  129. (F)0.54181033,
  130. (F)0.54905349,
  131. (F)0.55629444,
  132. (F)0.56353134,
  133. (F)0.57076240,
  134. (F)0.57798582,
  135. (F)0.58519983,
  136. (F)0.59240264,
  137. (F)0.59959245,
  138. (F)0.60676748,
  139. (F)0.61392599,
  140. (F)0.62106609,
  141. (F)0.62818617,
  142. (F)0.63528436,
  143. (F)0.64235890,
  144. (F)0.64940804,
  145. (F)0.65643007,
  146. (F)0.66342324,
  147. (F)0.67038584,
  148. (F)0.67731601,
  149. (F)0.68421221,
  150. (F)0.69107264,
  151. (F)0.69789559,
  152. (F)0.70467937,
  153. (F)0.71142232,
  154. (F)0.71812278,
  155. (F)0.72477907,
  156. (F)0.73138952,
  157. (F)0.73795253,
  158. (F)0.74446648,
  159. (F)0.75092971,
  160. (F)0.75734061,
  161. (F)0.76369762,
  162. (F)0.76999915,
  163. (F)0.77624369,
  164. (F)0.78242958,
  165. (F)0.78855544,
  166. (F)0.79461962,
  167. (F)0.80062068,
  168. (F)0.80655706,
  169. (F)0.81242740,
  170. (F)0.81823015,
  171. (F)0.82396388,
  172. (F)0.82962728,
  173. (F)0.83521879,
  174. (F)0.84073710,
  175. (F)0.84618086,
  176. (F)0.85154873,
  177. (F)0.85683930,
  178. (F)0.86205131,
  179. (F)0.86718345,
  180. (F)0.87223446,
  181. (F)0.87720311,
  182. (F)0.88208807,
  183. (F)0.88688827,
  184. (F)0.89160240,
  185. (F)0.89622939,
  186. (F)0.90076804,
  187. (F)0.90521723,
  188. (F)0.90957582,
  189. (F)0.91384280,
  190. (F)0.91801709,
  191. (F)0.92209762,
  192. (F)0.92608339,
  193. (F)0.92997342,
  194. (F)0.93376678,
  195. (F)0.93746245,
  196. (F)0.94105959,
  197. (F)0.94455731,
  198. (F)0.94795465,
  199. (F)0.95125085,
  200. (F)0.95444512,
  201. (F)0.95753652,
  202. (F)0.96052444,
  203. (F)0.96340811,
  204. (F)0.96618676,
  205. (F)0.96885973,
  206. (F)0.97142631,
  207. (F)0.97388595,
  208. (F)0.97623801,
  209. (F)0.97848189,
  210. (F)0.98061699,
  211. (F)0.98264289,
  212. (F)0.98455900,
  213. (F)0.98636484,
  214. (F)0.98806006,
  215. (F)0.98964417,
  216. (F)0.99111670,
  217. (F)0.99247742,
  218. (F)0.99372596,
  219. (F)0.99486196,
  220. (F)0.99588519,
  221. (F)0.99679530,
  222. (F)0.99759221,
  223. (F)0.99827564,
  224. (F)0.99884540,
  225. (F)0.99930143,
  226. (F)0.99964350,
  227. (F)0.99987161,
  228. (F)0.99998569,
  229. (F)1.00000000,
  230. (F)0.99921930,
  231. (F)0.99687845,
  232. (F)0.99298108,
  233. (F)0.98753333,
  234. (F)0.98054361,
  235. (F)0.97202289,
  236. (F)0.96198452,
  237. (F)0.95044410,
  238. (F)0.93741965,
  239. (F)0.92293155,
  240. (F)0.90700239,
  241. (F)0.88965708,
  242. (F)0.87092263,
  243. (F)0.85082841,
  244. (F)0.82940567,
  245. (F)0.80668795,
  246. (F)0.78271067,
  247. (F)0.75751126,
  248. (F)0.73112911,
  249. (F)0.70360541,
  250. (F)0.67498308,
  251. (F)0.64530689,
  252. (F)0.61462307,
  253. (F)0.58297962,
  254. (F)0.55042595,
  255. (F)0.51701277,
  256. (F)0.48279238,
  257. (F)0.44781810,
  258. (F)0.41214463,
  259. (F)0.37582767,
  260. (F)0.33892387,
  261. (F)0.30149087,
  262. (F)0.26358715,
  263. (F)0.22527184,
  264. (F)0.18660481,
  265. (F)0.14764643,
  266. (F)0.10845750,
  267. (F)0.06909923,
  268. (F)0.02963307
  269. };
  270. /*-----------------------------------------------------*
  271.  | Table of lag_window for autocorrelation.            |
  272.  | Bandwidth expansion = 60 Hz                         |
  273.  -----------------------------------------------------*/
  274. FLOAT lwindow[MP1] = {          /* lag window for correlations */
  275. WNC,
  276. (F)0.99889028,
  277. (F)0.99556851,
  278. (F)0.99005681,
  279. (F)0.98239160,
  280. (F)0.97262347,
  281. (F)0.96081644,
  282. (F)0.94704735,
  283. (F)0.93140495,
  284. (F)0.91398895,
  285. (F)0.89490914
  286. };
  287. FLOAT lspcb1[NC0][M] = {
  288. {(F)0.1814,
  289. (F)0.2647,
  290. (F)0.4580,
  291. (F)1.1077,
  292. (F)1.4813,
  293. (F)1.7022,
  294. (F)2.1953,
  295. (F)2.3405,
  296. (F)2.5867,
  297. (F)2.6636},
  298. {(F)0.2113,
  299. (F)0.3223,
  300. (F)0.4212,
  301. (F)0.5946,
  302. (F)0.7479,
  303. (F)0.9615,
  304. (F)1.9097,
  305. (F)2.1750,
  306. (F)2.4773,
  307. (F)2.6737},
  308. {(F)0.1915,
  309. (F)0.2755,
  310. (F)0.3770,
  311. (F)0.5950,
  312. (F)1.3505,
  313. (F)1.6349,
  314. (F)2.2348,
  315. (F)2.3552,
  316. (F)2.5768,
  317. (F)2.6540},
  318. {(F)0.2116,
  319. (F)0.3067,
  320. (F)0.4099,
  321. (F)0.5748,
  322. (F)0.8518,
  323. (F)1.2569,
  324. (F)2.0782,
  325. (F)2.1920,
  326. (F)2.3371,
  327. (F)2.4842},
  328. {(F)0.2129,
  329. (F)0.2974,
  330. (F)0.4039,
  331. (F)1.0659,
  332. (F)1.2735,
  333. (F)1.4658,
  334. (F)1.9061,
  335. (F)2.0312,
  336. (F)2.6074,
  337. (F)2.6750},
  338. {(F)0.2181,
  339. (F)0.2893,
  340. (F)0.4117,
  341. (F)0.5519,
  342. (F)0.8295,
  343. (F)1.5825,
  344. (F)2.1575,
  345. (F)2.3179,
  346. (F)2.5458,
  347. (F)2.6417},
  348. {(F)0.1991,
  349. (F)0.2971,
  350. (F)0.4104,
  351. (F)0.7725,
  352. (F)1.3073,
  353. (F)1.4665,
  354. (F)1.6208,
  355. (F)1.6973,
  356. (F)2.3732,
  357. (F)2.5743},
  358. {(F)0.1818,
  359. (F)0.2886,
  360. (F)0.4018,
  361. (F)0.7630,
  362. (F)1.1264,
  363. (F)1.2699,
  364. (F)1.6899,
  365. (F)1.8650,
  366. (F)2.1633,
  367. (F)2.6186},
  368. {(F)0.2282,
  369. (F)0.3093,
  370. (F)0.4243,
  371. (F)0.5329,
  372. (F)1.1173,
  373. (F)1.7717,
  374. (F)1.9420,
  375. (F)2.0780,
  376. (F)2.5160,
  377. (F)2.6137},
  378. {(F)0.2528,
  379. (F)0.3693,
  380. (F)0.5290,
  381. (F)0.7146,
  382. (F)0.9528,
  383. (F)1.1269,
  384. (F)1.2936,
  385. (F)1.9589,
  386. (F)2.4548,
  387. (F)2.6653},
  388. {(F)0.2332,
  389. (F)0.3263,
  390. (F)0.4174,
  391. (F)0.5202,
  392. (F)1.3633,
  393. (F)1.8447,
  394. (F)2.0236,
  395. (F)2.1474,
  396. (F)2.3572,
  397. (F)2.4738},
  398. {(F)0.1393,
  399. (F)0.2216,
  400. (F)0.3204,
  401. (F)0.5644,
  402. (F)0.7929,
  403. (F)1.1705,
  404. (F)1.7051,
  405. (F)2.0054,
  406. (F)2.3623,
  407. (F)2.5985},
  408. {(F)0.2677,
  409. (F)0.3871,
  410. (F)0.5746,
  411. (F)0.7091,
  412. (F)1.3311,
  413. (F)1.5260,
  414. (F)1.7288,
  415. (F)1.9122,
  416. (F)2.5787,
  417. (F)2.6598},
  418. {(F)0.1570,
  419. (F)0.2328,
  420. (F)0.3111,
  421. (F)0.4216,
  422. (F)1.1688,
  423. (F)1.4605,
  424. (F)1.9505,
  425. (F)2.1173,
  426. (F)2.4038,
  427. (F)2.7460},
  428. {(F)0.2346,
  429. (F)0.3321,
  430. (F)0.5621,
  431. (F)0.8160,
  432. (F)1.4042,
  433. (F)1.5860,
  434. (F)1.7518,
  435. (F)1.8631,
  436. (F)2.0749,
  437. (F)2.5380},
  438. {(F)0.2505,
  439. (F)0.3368,
  440. (F)0.4758,
  441. (F)0.6405,
  442. (F)0.8104,
  443. (F)1.2533,
  444. (F)1.9329,
  445. (F)2.0526,
  446. (F)2.2155,
  447. (F)2.6459},
  448. {(F)0.2196,
  449. (F)0.3049,
  450. (F)0.6857,
  451. (F)1.3976,
  452. (F)1.6100,
  453. (F)1.7958,
  454. (F)2.0813,
  455. (F)2.2211,
  456. (F)2.4789,
  457. (F)2.5857},
  458. {(F)0.1232,
  459. (F)0.2011,
  460. (F)0.3527,
  461. (F)0.6969,
  462. (F)1.1647,
  463. (F)1.5081,
  464. (F)1.8593,
  465. (F)2.2576,
  466. (F)2.5594,
  467. (F)2.6896},
  468. {(F)0.3682,
  469. (F)0.4632,
  470. (F)0.6600,
  471. (F)0.9118,
  472. (F)1.5245,
  473. (F)1.7071,
  474. (F)1.8712,
  475. (F)1.9939,
  476. (F)2.4356,
  477. (F)2.5380},
  478. {(F)0.2690,
  479. (F)0.3711,
  480. (F)0.4635,
  481. (F)0.6644,
  482. (F)1.4633,
  483. (F)1.6495,
  484. (F)1.8227,
  485. (F)1.9983,
  486. (F)2.1797,
  487. (F)2.2954},
  488. {(F)0.3555,
  489. (F)0.5240,
  490. (F)0.9751,
  491. (F)1.1685,
  492. (F)1.4114,
  493. (F)1.6168,
  494. (F)1.7769,
  495. (F)2.0178,
  496. (F)2.4420,
  497. (F)2.5724},
  498. {(F)0.3493,
  499. (F)0.4404,
  500. (F)0.7231,
  501. (F)0.8587,
  502. (F)1.1272,
  503. (F)1.4715,
  504. (F)1.6760,
  505. (F)2.2042,
  506. (F)2.4735,
  507. (F)2.5604},
  508. {(F)0.3747,
  509. (F)0.5263,
  510. (F)0.7284,
  511. (F)0.8994,
  512. (F)1.4017,
  513. (F)1.5502,
  514. (F)1.7468,
  515. (F)1.9816,
  516. (F)2.2380,
  517. (F)2.3404},
  518. {(F)0.2972,
  519. (F)0.4470,
  520. (F)0.5941,
  521. (F)0.7078,
  522. (F)1.2675,
  523. (F)1.4310,
  524. (F)1.5930,
  525. (F)1.9126,
  526. (F)2.3026,
  527. (F)2.4208},
  528. {(F)0.2467,
  529. (F)0.3180,
  530. (F)0.4712,
  531. (F)1.1281,
  532. (F)1.6206,
  533. (F)1.7876,
  534. (F)1.9544,
  535. (F)2.0873,
  536. (F)2.3521,
  537. (F)2.4721},
  538. {(F)0.2292,
  539. (F)0.3430,
  540. (F)0.4383,
  541. (F)0.5747,
  542. (F)1.3497,
  543. (F)1.5187,
  544. (F)1.9070,
  545. (F)2.0958,
  546. (F)2.2902,
  547. (F)2.4301},
  548. {(F)0.2573,
  549. (F)0.3508,
  550. (F)0.4484,
  551. (F)0.7079,
  552. (F)1.6577,
  553. (F)1.7929,
  554. (F)1.9456,
  555. (F)2.0847,
  556. (F)2.3060,
  557. (F)2.4208},
  558. {(F)0.1968,
  559. (F)0.2789,
  560. (F)0.3594,
  561. (F)0.4361,
  562. (F)1.0034,
  563. (F)1.7040,
  564. (F)1.9439,
  565. (F)2.1044,
  566. (F)2.2696,
  567. (F)2.4558},
  568. {(F)0.2955,
  569. (F)0.3853,
  570. (F)0.7986,
  571. (F)1.2470,
  572. (F)1.4723,
  573. (F)1.6522,
  574. (F)1.8684,
  575. (F)2.0084,
  576. (F)2.2849,
  577. (F)2.4268},
  578. {(F)0.2036,
  579. (F)0.3189,
  580. (F)0.4314,
  581. (F)0.6393,
  582. (F)1.2834,
  583. (F)1.4278,
  584. (F)1.5796,
  585. (F)2.0506,
  586. (F)2.2044,
  587. (F)2.3656},
  588. {(F)0.2916,
  589. (F)0.3684,
  590. (F)0.5907,
  591. (F)1.1394,
  592. (F)1.3933,
  593. (F)1.5540,
  594. (F)1.8341,
  595. (F)1.9835,
  596. (F)2.1301,
  597. (F)2.2800},
  598. {(F)0.2289,
  599. (F)0.3402,
  600. (F)0.5166,
  601. (F)0.7716,
  602. (F)1.0614,
  603. (F)1.2389,
  604. (F)1.4386,
  605. (F)2.0769,
  606. (F)2.2715,
  607. (F)2.4366},
  608. {(F)0.0829,
  609. (F)0.1723,
  610. (F)0.5682,
  611. (F)0.9773,
  612. (F)1.3973,
  613. (F)1.6174,
  614. (F)1.9242,
  615. (F)2.2128,
  616. (F)2.4855,
  617. (F)2.6327},
  618. {(F)0.2244,
  619. (F)0.3169,
  620. (F)0.4368,
  621. (F)0.5625,
  622. (F)0.6897,
  623. (F)1.3763,
  624. (F)1.7524,
  625. (F)1.9393,
  626. (F)2.5121,
  627. (F)2.6556},
  628. {(F)0.1591,
  629. (F)0.2387,
  630. (F)0.2924,
  631. (F)0.4056,
  632. (F)1.4677,
  633. (F)1.6802,
  634. (F)1.9389,
  635. (F)2.2067,
  636. (F)2.4635,
  637. (F)2.5919},
  638. {(F)0.1756,
  639. (F)0.2566,
  640. (F)0.3251,
  641. (F)0.4227,
  642. (F)1.0167,
  643. (F)1.2649,
  644. (F)1.6801,
  645. (F)2.1055,
  646. (F)2.4088,
  647. (F)2.7276},
  648. {(F)0.1050,
  649. (F)0.2325,
  650. (F)0.7445,
  651. (F)0.9491,
  652. (F)1.1982,
  653. (F)1.4658,
  654. (F)1.8093,
  655. (F)2.0397,
  656. (F)2.4155,
  657. (F)2.5797},
  658. {(F)0.2043,
  659. (F)0.3324,
  660. (F)0.4522,
  661. (F)0.7477,
  662. (F)0.9361,
  663. (F)1.1533,
  664. (F)1.6703,
  665. (F)1.7631,
  666. (F)2.5071,
  667. (F)2.6528},
  668. {(F)0.1522,
  669. (F)0.2258,
  670. (F)0.3543,
  671. (F)0.5504,
  672. (F)0.8815,
  673. (F)1.5516,
  674. (F)1.8110,
  675. (F)1.9915,
  676. (F)2.3603,
  677. (F)2.7735},
  678. {(F)0.1862,
  679. (F)0.2759,
  680. (F)0.4715,
  681. (F)0.6908,
  682. (F)0.8963,
  683. (F)1.4341,
  684. (F)1.6322,
  685. (F)1.7630,
  686. (F)2.2027,
  687. (F)2.6043},
  688. {(F)0.1460,
  689. (F)0.2254,
  690. (F)0.3790,
  691. (F)0.8622,
  692. (F)1.3394,
  693. (F)1.5754,
  694. (F)1.8084,
  695. (F)2.0798,
  696. (F)2.4319,
  697. (F)2.7632},
  698. {(F)0.2621,
  699. (F)0.3792,
  700. (F)0.5463,
  701. (F)0.7948,
  702. (F)1.0043,
  703. (F)1.1921,
  704. (F)1.3409,
  705. (F)1.4845,
  706. (F)2.3159,
  707. (F)2.6002},
  708. {(F)0.1935,
  709. (F)0.2937,
  710. (F)0.3656,
  711. (F)0.4927,
  712. (F)1.4015,
  713. (F)1.6086,
  714. (F)1.7724,
  715. (F)1.8837,
  716. (F)2.4374,
  717. (F)2.5971},
  718. {(F)0.2171,
  719. (F)0.3282,
  720. (F)0.4412,
  721. (F)0.5713,
  722. (F)1.1554,
  723. (F)1.3506,
  724. (F)1.5227,
  725. (F)1.9923,
  726. (F)2.4100,
  727. (F)2.5391},
  728. {(F)0.2274,
  729. (F)0.3157,
  730. (F)0.4263,
  731. (F)0.8202,
  732. (F)1.4293,
  733. (F)1.5884,
  734. (F)1.7535,
  735. (F)1.9688,
  736. (F)2.3939,
  737. (F)2.4934},
  738. {(F)0.1704,
  739. (F)0.2633,
  740. (F)0.3259,
  741. (F)0.4134,
  742. (F)1.2948,
  743. (F)1.4802,
  744. (F)1.6619,
  745. (F)2.0393,
  746. (F)2.3165,
  747. (F)2.6083},
  748. {(F)0.1763,
  749. (F)0.2585,
  750. (F)0.4012,
  751. (F)0.7609,
  752. (F)1.1503,
  753. (F)1.5847,
  754. (F)1.8309,
  755. (F)1.9352,
  756. (F)2.0982,
  757. (F)2.6681},
  758. {(F)0.2447,
  759. (F)0.3535,
  760. (F)0.4618,
  761. (F)0.5979,
  762. (F)0.7530,
  763. (F)0.8908,
  764. (F)1.5393,
  765. (F)2.0075,
  766. (F)2.3557,
  767. (F)2.6203},
  768. {(F)0.1826,
  769. (F)0.3496,
  770. (F)0.7764,
  771. (F)0.9888,
  772. (F)1.3915,
  773. (F)1.7421,
  774. (F)1.9412,
  775. (F)2.1620,
  776. (F)2.4999,
  777. (F)2.6931},
  778. {(F)0.3033,
  779. (F)0.3802,
  780. (F)0.6981,
  781. (F)0.8664,
  782. (F)1.0254,
  783. (F)1.5401,
  784. (F)1.7180,
  785. (F)1.8124,
  786. (F)2.5068,
  787. (F)2.6119},
  788. {(F)0.2960,
  789. (F)0.4001,
  790. (F)0.6465,
  791. (F)0.7672,
  792. (F)1.3782,
  793. (F)1.5751,
  794. (F)1.9559,
  795. (F)2.1373,
  796. (F)2.3601,
  797. (F)2.4760},
  798. {(F)0.3132,
  799. (F)0.4613,
  800. (F)0.6544,
  801. (F)0.8532,
  802. (F)1.0721,
  803. (F)1.2730,
  804. (F)1.7566,
  805. (F)1.9217,
  806. (F)2.1693,
  807. (F)2.6531},
  808. {(F)0.3329,
  809. (F)0.4131,
  810. (F)0.8073,
  811. (F)1.1297,
  812. (F)1.2869,
  813. (F)1.4937,
  814. (F)1.7885,
  815. (F)1.9150,
  816. (F)2.4505,
  817. (F)2.5760},
  818. {(F)0.2340,
  819. (F)0.3605,
  820. (F)0.7659,
  821. (F)0.9874,
  822. (F)1.1854,
  823. (F)1.3337,
  824. (F)1.5128,
  825. (F)2.0062,
  826. (F)2.4427,
  827. (F)2.5859},
  828. {(F)0.4131,
  829. (F)0.5330,
  830. (F)0.6530,
  831. (F)0.9360,
  832. (F)1.3648,
  833. (F)1.5388,
  834. (F)1.6994,
  835. (F)1.8707,
  836. (F)2.4294,
  837. (F)2.5335},
  838. {(F)0.3754,
  839. (F)0.5229,
  840. (F)0.7265,
  841. (F)0.9301,
  842. (F)1.1724,
  843. (F)1.3440,
  844. (F)1.5118,
  845. (F)1.7098,
  846. (F)2.5218,
  847. (F)2.6242},
  848. {(F)0.2138,
  849. (F)0.2998,
  850. (F)0.6283,
  851. (F)1.2166,
  852. (F)1.4187,
  853. (F)1.6084,
  854. (F)1.7992,
  855. (F)2.0106,
  856. (F)2.5377,
  857. (F)2.6558},
  858. {(F)0.1761,
  859. (F)0.2672,
  860. (F)0.4065,
  861. (F)0.8317,
  862. (F)1.0900,
  863. (F)1.4814,
  864. (F)1.7672,
  865. (F)1.8685,
  866. (F)2.3969,
  867. (F)2.5079},
  868. {(F)0.2801,
  869. (F)0.3535,
  870. (F)0.4969,
  871. (F)0.9809,
  872. (F)1.4934,
  873. (F)1.6378,
  874. (F)1.8021,
  875. (F)2.1200,
  876. (F)2.3135,
  877. (F)2.4034},
  878. {(F)0.2365,
  879. (F)0.3246,
  880. (F)0.5618,
  881. (F)0.8176,
  882. (F)1.1073,
  883. (F)1.5702,
  884. (F)1.7331,
  885. (F)1.8592,
  886. (F)1.9589,
  887. (F)2.3044},
  888. {(F)0.2529,
  889. (F)0.3251,
  890. (F)0.5147,
  891. (F)1.1530,
  892. (F)1.3291,
  893. (F)1.5005,
  894. (F)1.7028,
  895. (F)1.8200,
  896. (F)2.3482,
  897. (F)2.4831},
  898. {(F)0.2125,
  899. (F)0.3041,
  900. (F)0.4259,
  901. (F)0.9935,
  902. (F)1.1788,
  903. (F)1.3615,
  904. (F)1.6121,
  905. (F)1.7930,
  906. (F)2.5509,
  907. (F)2.6742},
  908. {(F)0.2685,
  909. (F)0.3518,
  910. (F)0.5707,
  911. (F)1.0410,
  912. (F)1.2270,
  913. (F)1.3927,
  914. (F)1.7622,
  915. (F)1.8876,
  916. (F)2.0985,
  917. (F)2.5144},
  918. {(F)0.2373,
  919. (F)0.3648,
  920. (F)0.5099,
  921. (F)0.7373,
  922. (F)0.9129,
  923. (F)1.0421,
  924. (F)1.7312,
  925. (F)1.8984,
  926. (F)2.1512,
  927. (F)2.6342},
  928. {(F)0.2229,
  929. (F)0.3876,
  930. (F)0.8621,
  931. (F)1.1986,
  932. (F)1.5655,
  933. (F)1.8861,
  934. (F)2.2376,
  935. (F)2.4239,
  936. (F)2.6648,
  937. (F)2.7359},
  938. {(F)0.3009,
  939. (F)0.3719,
  940. (F)0.5887,
  941. (F)0.7297,
  942. (F)0.9395,
  943. (F)1.8797,
  944. (F)2.0423,
  945. (F)2.1541,
  946. (F)2.5132,
  947. (F)2.6026},
  948. {(F)0.3114,
  949. (F)0.4142,
  950. (F)0.6476,
  951. (F)0.8448,
  952. (F)1.2495,
  953. (F)1.7192,
  954. (F)2.2148,
  955. (F)2.3432,
  956. (F)2.5246,
  957. (F)2.6046},
  958. {(F)0.3666,
  959. (F)0.4638,
  960. (F)0.6496,
  961. (F)0.7858,
  962. (F)0.9667,
  963. (F)1.4213,
  964. (F)1.9300,
  965. (F)2.0564,
  966. (F)2.2119,
  967. (F)2.3170},
  968. {(F)0.4218,
  969. (F)0.5075,
  970. (F)0.8348,
  971. (F)1.0009,
  972. (F)1.2057,
  973. (F)1.5032,
  974. (F)1.9416,
  975. (F)2.0540,
  976. (F)2.4352,
  977. (F)2.5504},
  978. {(F)0.3726,
  979. (F)0.4602,
  980. (F)0.5971,
  981. (F)0.7093,
  982. (F)0.8517,
  983. (F)1.2361,
  984. (F)1.8052,
  985. (F)1.9520,
  986. (F)2.4137,
  987. (F)2.5518},
  988. {(F)0.4482,
  989. (F)0.5318,
  990. (F)0.7114,
  991. (F)0.8542,
  992. (F)1.0328,
  993. (F)1.4751,
  994. (F)1.7278,
  995. (F)1.8237,
  996. (F)2.3496,
  997. (F)2.4931},
  998. {(F)0.3316,
  999. (F)0.4498,
  1000. (F)0.6404,
  1001. (F)0.8162,
  1002. (F)1.0332,
  1003. (F)1.2209,
  1004. (F)1.5130,
  1005. (F)1.7250,
  1006. (F)1.9715,
  1007. (F)2.4141},
  1008. {(F)0.2375,
  1009. (F)0.3221,
  1010. (F)0.5042,
  1011. (F)0.9760,
  1012. (F)1.7503,
  1013. (F)1.9014,
  1014. (F)2.0822,
  1015. (F)2.2225,
  1016. (F)2.4689,
  1017. (F)2.5632},
  1018. {(F)0.2813,
  1019. (F)0.3575,
  1020. (F)0.5032,
  1021. (F)0.5889,
  1022. (F)0.6885,
  1023. (F)1.6040,
  1024. (F)1.9318,
  1025. (F)2.0677,
  1026. (F)2.4546,
  1027. (F)2.5701},
  1028. {(F)0.2198,
  1029. (F)0.3072,
  1030. (F)0.4090,
  1031. (F)0.6371,
  1032. (F)1.6365,
  1033. (F)1.9468,
  1034. (F)2.1507,
  1035. (F)2.2633,
  1036. (F)2.5063,
  1037. (F)2.5943},
  1038. {(F)0.1754,
  1039. (F)0.2716,
  1040. (F)0.3361,
  1041. (F)0.5550,
  1042. (F)1.1789,
  1043. (F)1.3728,
  1044. (F)1.8527,
  1045. (F)1.9919,
  1046. (F)2.1349,
  1047. (F)2.3359},
  1048. {(F)0.2832,
  1049. (F)0.3540,
  1050. (F)0.6080,
  1051. (F)0.8467,
  1052. (F)1.0259,
  1053. (F)1.6467,
  1054. (F)1.8987,
  1055. (F)1.9875,
  1056. (F)2.4744,
  1057. (F)2.5527},
  1058. {(F)0.2670,
  1059. (F)0.3564,
  1060. (F)0.5628,
  1061. (F)0.7172,
  1062. (F)0.9021,
  1063. (F)1.5328,
  1064. (F)1.7131,
  1065. (F)2.0501,
  1066. (F)2.5633,
  1067. (F)2.6574},
  1068. {(F)0.2729,
  1069. (F)0.3569,
  1070. (F)0.6252,
  1071. (F)0.7641,
  1072. (F)0.9887,
  1073. (F)1.6589,
  1074. (F)1.8726,
  1075. (F)1.9947,
  1076. (F)2.1884,
  1077. (F)2.4609},
  1078. {(F)0.2155,
  1079. (F)0.3221,
  1080. (F)0.4580,
  1081. (F)0.6995,
  1082. (F)0.9623,
  1083. (F)1.2339,
  1084. (F)1.6642,
  1085. (F)1.8823,
  1086. (F)2.0518,
  1087. (F)2.2674},
  1088. {(F)0.4224,
  1089. (F)0.7009,
  1090. (F)1.1714,
  1091. (F)1.4334,
  1092. (F)1.7595,
  1093. (F)1.9629,
  1094. (F)2.2185,
  1095. (F)2.3304,
  1096. (F)2.5446,
  1097. (F)2.6369},
  1098. {(F)0.4560,
  1099. (F)0.5403,
  1100. (F)0.7568,
  1101. (F)0.8989,
  1102. (F)1.1292,
  1103. (F)1.7687,
  1104. (F)1.9575,
  1105. (F)2.0784,
  1106. (F)2.4260,
  1107. (F)2.5484},
  1108. {(F)0.4299,
  1109. (F)0.5833,
  1110. (F)0.8408,
  1111. (F)1.0596,
  1112. (F)1.5524,
  1113. (F)1.7484,
  1114. (F)1.9471,
  1115. (F)2.2034,
  1116. (F)2.4617,
  1117. (F)2.5812},
  1118. {(F)0.2614,
  1119. (F)0.3624,
  1120. (F)0.8381,
  1121. (F)0.9829,
  1122. (F)1.2220,
  1123. (F)1.6064,
  1124. (F)1.8083,
  1125. (F)1.9362,
  1126. (F)2.1397,
  1127. (F)2.2773},
  1128. {(F)0.5064,
  1129. (F)0.7481,
  1130. (F)1.1021,
  1131. (F)1.3271,
  1132. (F)1.5486,
  1133. (F)1.7096,
  1134. (F)1.9503,
  1135. (F)2.1006,
  1136. (F)2.3911,
  1137. (F)2.5141},
  1138. {(F)0.5375,
  1139. (F)0.6552,
  1140. (F)0.8099,
  1141. (F)1.0219,
  1142. (F)1.2407,
  1143. (F)1.4160,
  1144. (F)1.8266,
  1145. (F)1.9936,
  1146. (F)2.1951,
  1147. (F)2.2911},
  1148. {(F)0.4994,
  1149. (F)0.6575,
  1150. (F)0.8365,
  1151. (F)1.0706,
  1152. (F)1.4116,
  1153. (F)1.6224,
  1154. (F)1.9200,
  1155. (F)2.0667,
  1156. (F)2.3262,
  1157. (F)2.4539},
  1158. {(F)0.3353,
  1159. (F)0.4426,
  1160. (F)0.6469,
  1161. (F)0.9161,
  1162. (F)1.2528,
  1163. (F)1.3956,
  1164. (F)1.6080,
  1165. (F)1.8909,
  1166. (F)2.0600,
  1167. (F)2.1380},
  1168. {(F)0.2745,
  1169. (F)0.4341,
  1170. (F)1.0424,
  1171. (F)1.2928,
  1172. (F)1.5461,
  1173. (F)1.7940,
  1174. (F)2.0161,
  1175. (F)2.1758,
  1176. (F)2.4742,
  1177. (F)2.5937},
  1178. {(F)0.1562,
  1179. (F)0.2393,
  1180. (F)0.4786,
  1181. (F)0.9513,
  1182. (F)1.2395,
  1183. (F)1.8010,
  1184. (F)2.0320,
  1185. (F)2.2143,
  1186. (F)2.5243,
  1187. (F)2.6204},
  1188. {(F)0.2979,
  1189. (F)0.4242,
  1190. (F)0.8224,
  1191. (F)1.0564,
  1192. (F)1.4881,
  1193. (F)1.7808,
  1194. (F)2.0898,
  1195. (F)2.1882,
  1196. (F)2.3328,
  1197. (F)2.4389},
  1198. {(F)0.2294,
  1199. (F)0.3070,
  1200. (F)0.5490,
  1201. (F)0.9244,
  1202. (F)1.2229,
  1203. (F)1.8248,
  1204. (F)1.9704,
  1205. (F)2.0627,
  1206. (F)2.2458,
  1207. (F)2.3653},
  1208. {(F)0.3423,
  1209. (F)0.4502,
  1210. (F)0.9144,
  1211. (F)1.2313,
  1212. (F)1.3694,
  1213. (F)1.5517,
  1214. (F)1.9907,
  1215. (F)2.1326,
  1216. (F)2.4509,
  1217. (F)2.5789},
  1218. {(F)0.2470,
  1219. (F)0.3275,
  1220. (F)0.4729,
  1221. (F)1.0093,
  1222. (F)1.2519,
  1223. (F)1.4216,
  1224. (F)1.8540,
  1225. (F)2.0877,
  1226. (F)2.3151,
  1227. (F)2.4156},
  1228. {(F)0.3447,
  1229. (F)0.4401,
  1230. (F)0.7099,
  1231. (F)1.0493,
  1232. (F)1.2312,
  1233. (F)1.4001,
  1234. (F)2.0225,
  1235. (F)2.1317,
  1236. (F)2.2894,
  1237. (F)2.4263},
  1238. {(F)0.3481,
  1239. (F)0.4494,
  1240. (F)0.6446,
  1241. (F)0.9336,
  1242. (F)1.1198,
  1243. (F)1.2620,
  1244. (F)1.8264,
  1245. (F)1.9712,
  1246. (F)2.1435,
  1247. (F)2.2552},
  1248. {(F)0.1646,
  1249. (F)0.3229,
  1250. (F)0.7112,
  1251. (F)1.0725,
  1252. (F)1.2964,
  1253. (F)1.5663,
  1254. (F)1.9843,
  1255. (F)2.2363,
  1256. (F)2.5798,
  1257. (F)2.7572},
  1258. {(F)0.2614,
  1259. (F)0.3707,
  1260. (F)0.5241,
  1261. (F)0.7425,
  1262. (F)0.9269,
  1263. (F)1.2976,
  1264. (F)2.0945,
  1265. (F)2.2014,
  1266. (F)2.6204,
  1267. (F)2.6959},
  1268. {(F)0.1963,
  1269. (F)0.2900,
  1270. (F)0.4131,
  1271. (F)0.8397,
  1272. (F)1.2171,
  1273. (F)1.3705,
  1274. (F)2.0665,
  1275. (F)2.1546,
  1276. (F)2.4640,
  1277. (F)2.5782},
  1278. {(F)0.3387,
  1279. (F)0.4415,
  1280. (F)0.6121,
  1281. (F)0.8005,
  1282. (F)0.9507,
  1283. (F)1.0937,
  1284. (F)2.0836,
  1285. (F)2.2342,
  1286. (F)2.3849,
  1287. (F)2.5076},
  1288. {(F)0.2362,
  1289. (F)0.5876,
  1290. (F)0.7574,
  1291. (F)0.8804,
  1292. (F)1.0961,
  1293. (F)1.4240,
  1294. (F)1.9519,
  1295. (F)2.1742,
  1296. (F)2.4935,
  1297. (F)2.6493},
  1298. {(F)0.2793,
  1299. (F)0.4282,
  1300. (F)0.6149,
  1301. (F)0.8352,
  1302. (F)1.0106,
  1303. (F)1.1766,
  1304. (F)1.8392,
  1305. (F)2.0119,
  1306. (F)2.6433,
  1307. (F)2.7117},
  1308. {(F)0.3603,
  1309. (F)0.4604,
  1310. (F)0.5955,
  1311. (F)0.9251,
  1312. (F)1.1006,
  1313. (F)1.2572,
  1314. (F)1.7688,
  1315. (F)1.8607,
  1316. (F)2.4687,
  1317. (F)2.5623},
  1318. {(F)0.3975,
  1319. (F)0.5849,
  1320. (F)0.8059,
  1321. (F)0.9182,
  1322. (F)1.0552,
  1323. (F)1.1850,
  1324. (F)1.6356,
  1325. (F)1.9627,
  1326. (F)2.3318,
  1327. (F)2.4719},
  1328. {(F)0.2231,
  1329. (F)0.3192,
  1330. (F)0.4256,
  1331. (F)0.7373,
  1332. (F)1.4831,
  1333. (F)1.6874,
  1334. (F)1.9765,
  1335. (F)2.1097,
  1336. (F)2.6152,
  1337. (F)2.6906},
  1338. {(F)0.1221,
  1339. (F)0.2081,
  1340. (F)0.3665,
  1341. (F)0.7734,
  1342. (F)1.0341,
  1343. (F)1.2818,
  1344. (F)1.8162,
  1345. (F)2.0727,
  1346. (F)2.4446,
  1347. (F)2.7377},
  1348. {(F)0.2010,
  1349. (F)0.2791,
  1350. (F)0.3796,
  1351. (F)0.8845,
  1352. (F)1.4030,
  1353. (F)1.5615,
  1354. (F)2.0538,
  1355. (F)2.1567,
  1356. (F)2.3171,
  1357. (F)2.4686},
  1358. {(F)0.2086,
  1359. (F)0.3053,
  1360. (F)0.4047,
  1361. (F)0.8224,
  1362. (F)1.0656,
  1363. (F)1.2115,
  1364. (F)1.9641,
  1365. (F)2.0871,
  1366. (F)2.2430,
  1367. (F)2.4313},
  1368. {(F)0.3203,
  1369. (F)0.4285,
  1370. (F)0.5467,
  1371. (F)0.6891,
  1372. (F)1.2039,
  1373. (F)1.3569,
  1374. (F)1.8578,
  1375. (F)2.2055,
  1376. (F)2.3906,
  1377. (F)2.4881},
  1378. {(F)0.3074,
  1379. (F)0.4192,
  1380. (F)0.5772,
  1381. (F)0.7799,
  1382. (F)0.9866,
  1383. (F)1.1335,
  1384. (F)1.6068,
  1385. (F)2.2441,
  1386. (F)2.4194,
  1387. (F)2.5089},
  1388. {(F)0.2108,
  1389. (F)0.2910,
  1390. (F)0.4993,
  1391. (F)0.7695,
  1392. (F)0.9528,
  1393. (F)1.5681,
  1394. (F)1.7838,
  1395. (F)2.1495,
  1396. (F)2.3522,
  1397. (F)2.4636},
  1398. {(F)0.3492,
  1399. (F)0.4560,
  1400. (F)0.5906,
  1401. (F)0.7379,
  1402. (F)0.8855,
  1403. (F)1.0257,
  1404. (F)1.7128,
  1405. (F)1.9997,
  1406. (F)2.2019,
  1407. (F)2.3694},
  1408. {(F)0.5185,
  1409. (F)0.7316,
  1410. (F)0.9708,
  1411. (F)1.1954,
  1412. (F)1.5066,
  1413. (F)1.7887,
  1414. (F)2.1396,
  1415. (F)2.2918,
  1416. (F)2.5429,
  1417. (F)2.6489},
  1418. {(F)0.4276,
  1419. (F)0.4946,
  1420. (F)0.6934,
  1421. (F)0.8308,
  1422. (F)0.9944,
  1423. (F)1.4582,
  1424. (F)2.0324,
  1425. (F)2.1294,
  1426. (F)2.4891,
  1427. (F)2.6324},
  1428. {(F)0.3847,
  1429. (F)0.5973,
  1430. (F)0.7202,
  1431. (F)0.8787,
  1432. (F)1.3938,
  1433. (F)1.5959,
  1434. (F)1.8463,
  1435. (F)2.1574,
  1436. (F)2.5050,
  1437. (F)2.6687},
  1438. {(F)0.4835,
  1439. (F)0.5919,
  1440. (F)0.7235,
  1441. (F)0.8862,
  1442. (F)1.0756,
  1443. (F)1.2853,
  1444. (F)1.9118,
  1445. (F)2.0215,
  1446. (F)2.2213,
  1447. (F)2.4638},
  1448. {(F)0.5492,
  1449. (F)0.8062,
  1450. (F)0.9810,
  1451. (F)1.1293,
  1452. (F)1.3189,
  1453. (F)1.5415,
  1454. (F)1.9385,
  1455. (F)2.1378,
  1456. (F)2.4439,
  1457. (F)2.5691},
  1458. {(F)0.5190,
  1459. (F)0.6764,
  1460. (F)0.8123,
  1461. (F)1.0154,
  1462. (F)1.2085,
  1463. (F)1.4266,
  1464. (F)1.8433,
  1465. (F)2.0866,
  1466. (F)2.5113,
  1467. (F)2.6474},
  1468. {(F)0.4602,
  1469. (F)0.6503,
  1470. (F)0.9602,
  1471. (F)1.1427,
  1472. (F)1.3043,
  1473. (F)1.4427,
  1474. (F)1.6676,
  1475. (F)1.8758,
  1476. (F)2.2868,
  1477. (F)2.4271},
  1478. {(F)0.3764,
  1479. (F)0.4845,
  1480. (F)0.7627,
  1481. (F)0.9914,
  1482. (F)1.1961,
  1483. (F)1.3421,
  1484. (F)1.5129,
  1485. (F)1.6707,
  1486. (F)2.1836,
  1487. (F)2.3322},
  1488. {(F)0.3334,
  1489. (F)0.5701,
  1490. (F)0.8622,
  1491. (F)1.1232,
  1492. (F)1.3851,
  1493. (F)1.6767,
  1494. (F)2.0600,
  1495. (F)2.2946,
  1496. (F)2.5375,
  1497. (F)2.7295},
  1498. {(F)0.1449,
  1499. (F)0.2719,
  1500. (F)0.5783,
  1501. (F)0.8807,
  1502. (F)1.1746,
  1503. (F)1.5422,
  1504. (F)1.8804,
  1505. (F)2.1934,
  1506. (F)2.4734,
  1507. (F)2.8728},
  1508. {(F)0.2333,
  1509. (F)0.3024,
  1510. (F)0.4780,
  1511. (F)1.2327,
  1512. (F)1.4180,
  1513. (F)1.5815,
  1514. (F)1.9804,
  1515. (F)2.0921,
  1516. (F)2.3524,
  1517. (F)2.5304},
  1518. {(F)0.2154,
  1519. (F)0.3075,
  1520. (F)0.4746,
  1521. (F)0.8477,
  1522. (F)1.1170,
  1523. (F)1.5369,
  1524. (F)1.9847,
  1525. (F)2.0733,
  1526. (F)2.1880,
  1527. (F)2.2504},
  1528. {(F)0.1709,
  1529. (F)0.4486,
  1530. (F)0.8705,
  1531. (F)1.0643,
  1532. (F)1.3047,
  1533. (F)1.5269,
  1534. (F)1.9175,
  1535. (F)2.1621,
  1536. (F)2.4073,
  1537. (F)2.5718},
  1538. {(F)0.2835,
  1539. (F)0.3752,
  1540. (F)0.5234,
  1541. (F)0.9898,
  1542. (F)1.1484,
  1543. (F)1.2974,
  1544. (F)1.9363,
  1545. (F)2.0378,
  1546. (F)2.4065,
  1547. (F)2.6214},
  1548. {(F)0.3211,
  1549. (F)0.4077,
  1550. (F)0.5809,
  1551. (F)1.0206,
  1552. (F)1.2542,
  1553. (F)1.3835,
  1554. (F)1.5723,
  1555. (F)2.1209,
  1556. (F)2.3464,
  1557. (F)2.4336},
  1558. {(F)0.2101,
  1559. (F)0.3146,
  1560. (F)0.6779,
  1561. (F)0.8783,
  1562. (F)1.0561,
  1563. (F)1.3045,
  1564. (F)1.8395,
  1565. (F)2.0695,
  1566. (F)2.2831,
  1567. (F)2.4328}
  1568. };
  1569. FLOAT lspcb2[NC1][M] = {
  1570. {(F)-0.0532,
  1571. (F)-0.0995,
  1572. (F)-0.0906,
  1573. (F)0.1261,
  1574. (F)-0.0633,
  1575. (F)0.0711,
  1576. (F)-0.1467,
  1577. (F)0.1012,
  1578. (F)0.0106,
  1579. (F)0.0470},
  1580. {(F)-0.1017,
  1581. (F)-0.1088,
  1582. (F)0.0566,
  1583. (F)-0.0010,
  1584. (F)-0.1528,
  1585. (F)0.1771,
  1586. (F)0.0089,
  1587. (F)-0.0282,
  1588. (F)0.1055,
  1589. (F)0.0808},
  1590. {(F)-0.1247,
  1591. (F)0.0283,
  1592. (F)-0.0374,
  1593. (F)0.0393,
  1594. (F)-0.0269,
  1595. (F)-0.0200,
  1596. (F)-0.0643,
  1597. (F)-0.0921,
  1598. (F)-0.1994,
  1599. (F)0.0327},
  1600. {(F)0.0070,
  1601. (F)-0.0242,
  1602. (F)-0.0415,
  1603. (F)-0.0041,
  1604. (F)-0.1793,
  1605. (F)0.0700,
  1606. (F)0.0972,
  1607. (F)-0.0207,
  1608. (F)-0.0771,
  1609. (F)0.0997},
  1610. {(F)0.0209,
  1611. (F)-0.0428,
  1612. (F)0.0359,
  1613. (F)0.2027,
  1614. (F)0.0554,
  1615. (F)0.0634,
  1616. (F)0.0356,
  1617. (F)0.0195,
  1618. (F)-0.0782,
  1619. (F)-0.1583},
  1620. {(F)-0.0856,
  1621. (F)-0.1028,
  1622. (F)-0.0071,
  1623. (F)0.1160,
  1624. (F)0.1089,
  1625. (F)0.1892,
  1626. (F)0.0874,
  1627. (F)0.0644,
  1628. (F)-0.0872,
  1629. (F)-0.0236},
  1630. {(F)0.0713,
  1631. (F)0.0039,
  1632. (F)-0.0353,
  1633. (F)0.0435,
  1634. (F)-0.0407,
  1635. (F)-0.0558,
  1636. (F)0.0748,
  1637. (F)-0.0346,
  1638. (F)-0.1686,
  1639. (F)-0.0905},
  1640. {(F)-0.0134,
  1641. (F)-0.0987,
  1642. (F)0.0283,
  1643. (F)0.0095,
  1644. (F)-0.0107,
  1645. (F)-0.0420,
  1646. (F)0.1638,
  1647. (F)0.1328,
  1648. (F)-0.0799,
  1649. (F)-0.0695},
  1650. {(F)-0.1049,
  1651. (F)0.1510,
  1652. (F)0.0672,
  1653. (F)0.1043,
  1654. (F)0.0872,
  1655. (F)-0.0663,
  1656. (F)-0.2139,
  1657. (F)-0.0239,
  1658. (F)-0.0120,
  1659. (F)-0.0338},
  1660. {(F)-0.1071,
  1661. (F)-0.1165,
  1662. (F)-0.1524,
  1663. (F)-0.0365,
  1664. (F)0.0260,
  1665. (F)-0.0288,
  1666. (F)-0.0889,
  1667. (F)0.1159,
  1668. (F)0.1852,
  1669. (F)0.1093},
  1670. {(F)-0.0094,
  1671. (F)0.0420,
  1672. (F)-0.0758,
  1673. (F)0.0932,
  1674. (F)0.0505,
  1675. (F)0.0614,
  1676. (F)-0.0443,
  1677. (F)-0.1172,
  1678. (F)-0.0590,
  1679. (F)0.1693},
  1680. {(F)-0.0384,
  1681. (F)-0.0375,
  1682. (F)-0.0313,
  1683. (F)-0.1539,
  1684. (F)-0.0524,
  1685. (F)0.0550,
  1686. (F)-0.0569,
  1687. (F)-0.0133,
  1688. (F)0.1233,
  1689. (F)0.2714},
  1690. {(F)0.0869,
  1691. (F)0.0847,
  1692. (F)0.0637,
  1693. (F)0.0794,
  1694. (F)0.1594,
  1695. (F)-0.0035,
  1696. (F)-0.0462,
  1697. (F)0.0909,
  1698. (F)-0.1227,
  1699. (F)0.0294},
  1700. {(F)-0.0137,
  1701. (F)-0.0332,
  1702. (F)-0.0611,
  1703. (F)0.1156,
  1704. (F)0.2116,
  1705. (F)0.0332,
  1706. (F)-0.0019,
  1707. (F)0.1110,
  1708. (F)-0.0317,
  1709. (F)0.2061},
  1710. {(F)0.0703,
  1711. (F)-0.0013,
  1712. (F)-0.0572,
  1713. (F)-0.0243,
  1714. (F)0.1345,
  1715. (F)-0.1235,
  1716. (F)0.0710,
  1717. (F)-0.0065,
  1718. (F)-0.0912,
  1719. (F)0.1072},
  1720. {(F)0.0178,
  1721. (F)-0.0349,
  1722. (F)-0.1563,
  1723. (F)-0.0487,
  1724. (F)0.0044,
  1725. (F)-0.0609,
  1726. (F)-0.1682,
  1727. (F)0.0023,
  1728. (F)-0.0542,
  1729. (F)0.1811},
  1730. {(F)-0.1384,
  1731. (F)-0.1020,
  1732. (F)0.1649,
  1733. (F)0.1568,
  1734. (F)-0.0116,
  1735. (F)0.1240,
  1736. (F)-0.0271,
  1737. (F)0.0541,
  1738. (F)0.0455,
  1739. (F)-0.0433},
  1740. {(F)-0.1782,
  1741. (F)-0.1511,
  1742. (F)0.0509,
  1743. (F)-0.0261,
  1744. (F)0.0570,
  1745. (F)0.0817,
  1746. (F)0.0805,
  1747. (F)0.2003,
  1748. (F)0.1138,
  1749. (F)0.0653},
  1750. {(F)-0.0019,
  1751. (F)0.0081,
  1752. (F)0.0572,
  1753. (F)0.1245,
  1754. (F)-0.0914,
  1755. (F)0.1691,
  1756. (F)-0.0223,
  1757. (F)-0.1108,
  1758. (F)-0.0881,
  1759. (F)-0.0320},
  1760. {(F)-0.0413,
  1761. (F)0.0181,
  1762. (F)0.1764,
  1763. (F)0.0092,
  1764. (F)-0.0928,
  1765. (F)0.0695,
  1766. (F)0.1523,
  1767. (F)0.0412,
  1768. (F)0.0508,
  1769. (F)-0.0148},
  1770. {(F)0.0476,
  1771. (F)0.0292,
  1772. (F)0.1915,
  1773. (F)0.1198,
  1774. (F)0.0139,
  1775. (F)0.0451,
  1776. (F)-0.1225,
  1777. (F)-0.0619,
  1778. (F)-0.0717,
  1779. (F)-0.1104},
  1780. {(F)-0.0382,
  1781. (F)-0.0120,
  1782. (F)0.1159,
  1783. (F)0.0039,
  1784. (F)0.1348,
  1785. (F)0.0088,
  1786. (F)-0.0173,
  1787. (F)0.1789,
  1788. (F)0.0078,
  1789. (F)-0.0959},
  1790. {(F)0.1376,
  1791. (F)0.0713,
  1792. (F)0.1020,
  1793. (F)0.0339,
  1794. (F)-0.1415,
  1795. (F)0.0254,
  1796. (F)0.0368,
  1797. (F)-0.1077,
  1798. (F)0.0143,
  1799. (F)-0.0494},
  1800. {(F)0.0658,
  1801. (F)-0.0140,
  1802. (F)0.1046,
  1803. (F)-0.0603,
  1804. (F)0.0273,
  1805. (F)-0.1114,
  1806. (F)0.0761,
  1807. (F)-0.0093,
  1808. (F)0.0338,
  1809. (F)-0.0538},
  1810. {(F)0.2683,
  1811. (F)0.2853,
  1812. (F)0.1549,
  1813. (F)0.0819,
  1814. (F)0.0372,
  1815. (F)-0.0327,
  1816. (F)-0.0642,
  1817. (F)0.0172,
  1818. (F)0.1077,
  1819. (F)-0.0170},
  1820. {(F)-0.1949,
  1821. (F)0.0672,
  1822. (F)0.0978,
  1823. (F)-0.0557,
  1824. (F)-0.0069,
  1825. (F)-0.0851,
  1826. (F)0.1057,
  1827. (F)0.1294,
  1828. (F)0.0505,
  1829. (F)0.0545},
  1830. {(F)0.1409,
  1831. (F)0.0724,
  1832. (F)-0.0094,
  1833. (F)0.1511,
  1834. (F)-0.0039,
  1835. (F)0.0710,
  1836. (F)-0.1266,
  1837. (F)-0.1093,
  1838. (F)0.0817,
  1839. (F)0.0363},
  1840. {(F)0.0485,
  1841. (F)0.0682,
  1842. (F)0.0248,
  1843. (F)-0.0974,
  1844. (F)-0.1122,
  1845. (F)0.0004,
  1846. (F)0.0845,
  1847. (F)-0.0357,
  1848. (F)0.1282,
  1849. (F)0.0955},
  1850. {(F)0.0408,
  1851. (F)0.1801,
  1852. (F)0.0772,
  1853. (F)-0.0098,
  1854. (F)0.0059,
  1855. (F)-0.1296,
  1856. (F)-0.0591,
  1857. (F)0.0443,
  1858. (F)-0.0729,
  1859. (F)-0.1041},
  1860. {(F)-0.0666,
  1861. (F)-0.0403,
  1862. (F)-0.0524,
  1863. (F)-0.0831,
  1864. (F)0.1384,
  1865. (F)-0.1443,
  1866. (F)-0.0909,
  1867. (F)0.1636,
  1868. (F)0.0320,
  1869. (F)0.0077},
  1870. {(F)0.1612,
  1871. (F)0.1010,
  1872. (F)-0.0486,
  1873. (F)-0.0704,
  1874. (F)0.0417,
  1875. (F)-0.0945,
  1876. (F)-0.0590,
  1877. (F)-0.1523,
  1878. (F)-0.0086,
  1879. (F)0.0120},
  1880. {(F)-0.0199,
  1881. (F)0.0823,
  1882. (F)-0.0014,
  1883. (F)-0.1082,
  1884. (F)0.0649,
  1885. (F)-0.1374,
  1886. (F)-0.0324,
  1887. (F)-0.0296,
  1888. (F)0.0885,
  1889. (F)0.1141}
  1890. };
  1891. FLOAT fg[2][MA_NP][M] = {
  1892. {{(F)0.2570,
  1893. (F)0.2780,
  1894. (F)0.2800,
  1895. (F)0.2736,
  1896. (F)0.2757,
  1897. (F)0.2764,
  1898. (F)0.2675,
  1899. (F)0.2678,
  1900. (F)0.2779,
  1901. (F)0.2647},
  1902. {(F)0.2142,
  1903. (F)0.2194,
  1904. (F)0.2331,
  1905. (F)0.2230,
  1906. (F)0.2272,
  1907. (F)0.2252,
  1908. (F)0.2148,
  1909. (F)0.2123,
  1910. (F)0.2115,
  1911. (F)0.2096},
  1912. {(F)0.1670,
  1913. (F)0.1523,
  1914. (F)0.1567,
  1915. (F)0.1580,
  1916. (F)0.1601,
  1917. (F)0.1569,
  1918. (F)0.1589,
  1919. (F)0.1555,
  1920. (F)0.1474,
  1921. (F)0.1571},
  1922. {(F)0.1238,
  1923. (F)0.0925,
  1924. (F)0.0798,
  1925. (F)0.0923,
  1926. (F)0.0890,
  1927. (F)0.0828,
  1928. (F)0.1010,
  1929. (F)0.0988,
  1930. (F)0.0872,
  1931. (F)0.1060},
  1932. },
  1933. {{(F)0.2360,
  1934. (F)0.2405,
  1935. (F)0.2499,
  1936. (F)0.2495,
  1937. (F)0.2517,
  1938. (F)0.2591,
  1939. (F)0.2636,
  1940. (F)0.2625,
  1941. (F)0.2551,
  1942. (F)0.2310},
  1943. {(F)0.1285,
  1944. (F)0.0925,
  1945. (F)0.0779,
  1946. (F)0.1060,
  1947. (F)0.1183,
  1948. (F)0.1176,
  1949. (F)0.1277,
  1950. (F)0.1268,
  1951. (F)0.1193,
  1952. (F)0.1211},
  1953. {(F)0.0981,
  1954. (F)0.0589,
  1955. (F)0.0401,
  1956. (F)0.0654,
  1957. (F)0.0761,
  1958. (F)0.0728,
  1959. (F)0.0841,
  1960. (F)0.0826,
  1961. (F)0.0776,
  1962. (F)0.0891},
  1963. {(F)0.0923,
  1964. (F)0.0486,
  1965. (F)0.0287,
  1966. (F)0.0498,
  1967. (F)0.0526,
  1968. (F)0.0482,
  1969. (F)0.0621,
  1970. (F)0.0636,
  1971. (F)0.0584,
  1972. (F)0.0794}
  1973. }
  1974. };
  1975. FLOAT fg_sum[2][M] = {
  1976. {(F)0.2380000054836,
  1977. (F)0.2578000128269,
  1978. (F)0.2504000067711,
  1979. (F)0.2531000375748,
  1980. (F)0.2480000108480,
  1981. (F)0.2587000429630,
  1982. (F)0.2577999532223,
  1983. (F)0.2656000256538,
  1984. (F)0.2760000228882,
  1985. (F)0.2625999450684},
  1986. {(F)0.4451000094414,
  1987. (F)0.5595000386238,
  1988. (F)0.6034000515938,
  1989. (F)0.5292999744415,
  1990. (F)0.5012999176979,
  1991. (F)0.5023000240326,
  1992. (F)0.4625000357628,
  1993. (F)0.4645000100136,
  1994. (F)0.4895999729633,
  1995. (F)0.4793999791145}
  1996. };
  1997. FLOAT fg_sum_inv[2][M] = {
  1998. {(F)4.2016806602478,
  1999. (F)3.8789758682251,
  2000. (F)3.9936101436615,
  2001. (F)3.9510068893433,
  2002. (F)4.0322580337524,
  2003. (F)3.8654806613922,
  2004. (F)3.8789765834808,
  2005. (F)3.7650599479675,
  2006. (F)3.6231880187988,
  2007. (F)3.8080739974976},
  2008. {(F)2.2466859817505,
  2009. (F)1.7873100042343,
  2010. (F)1.6572753190994,
  2011. (F)1.8892878293991,
  2012. (F)1.9948137998581,
  2013. (F)1.9908419847488,
  2014. (F)2.1621620655060,
  2015. (F)2.1528525352478,
  2016. (F)2.0424838066101,
  2017. (F)2.0859408378601}
  2018. };
  2019. /*-------------------------------------------------------------*
  2020.  *  Table for az_lsf()                                         *
  2021.  *                                                             *
  2022.  * Vector grid[] is in Q15                                     *
  2023.  *                                                             *
  2024.  * grid[0] = 1.0;                                              *
  2025.  * grid[grid_points+1] = -1.0;                                 *
  2026.  * for (i = 1; i < grid_points; i++)                           *
  2027.  *   grid[i] = cos((6.283185307*i)/(2.0*grid_points));         *
  2028.  *                                                             *
  2029.  *-------------------------------------------------------------*/
  2030. /* Version 51 points */
  2031. FLOAT grid[GRID_POINTS+1] = { /* grid for evaluating  Chebychev polynomials */
  2032. (F)0.9997559,
  2033. (F)0.9980267,
  2034. (F)0.9921147,
  2035. (F)0.9822872,
  2036. (F)0.9685832,
  2037. (F)0.9510565,
  2038. (F)0.9297765,
  2039. (F)0.9048271,
  2040. (F)0.8763067,
  2041. (F)0.8443279,
  2042. (F)0.8090170,
  2043. (F)0.7705132,
  2044. (F)0.7289686,
  2045. (F)0.6845471,
  2046. (F)0.6374240,
  2047. (F)0.5877852,
  2048. (F)0.5358268,
  2049. (F)0.4817537,
  2050. (F)0.4257793,
  2051. (F)0.3681245,
  2052. (F)0.3090170,
  2053. (F)0.2486899,
  2054. (F)0.1873813,
  2055. (F)0.1253332,
  2056. (F)0.0627905,
  2057. (F)0.0000000,
  2058. (F)-0.0627905,
  2059. (F)-0.1253332,
  2060. (F)-0.1873813,
  2061. (F)-0.2486899,
  2062. (F)-0.3090170,
  2063. (F)-0.3681245,
  2064. (F)-0.4257793,
  2065. (F)-0.4817537,
  2066. (F)-0.5358268,
  2067. (F)-0.5877852,
  2068. (F)-0.6374240,
  2069. (F)-0.6845471,
  2070. (F)-0.7289686,
  2071. (F)-0.7705132,
  2072. (F)-0.8090170,
  2073. (F)-0.8443279,
  2074. (F)-0.8763067,
  2075. (F)-0.9048271,
  2076. (F)-0.9297765,
  2077. (F)-0.9510565,
  2078. (F)-0.9685832,
  2079. (F)-0.9822872,
  2080. (F)-0.9921147,
  2081. (F)-0.9980267,
  2082. (F)-0.9997559
  2083. };
  2084. /*-----------------------------------------------------*
  2085.  | Tables for pitch related routines .                 |
  2086.  -----------------------------------------------------*/
  2087. /*** LTP interpolation filter ****/
  2088. /* 1/3 resolution interpolation filter  (-3 dB at 3600 Hz) */
  2089. FLOAT inter_3l[FIR_SIZE_SYN] = {
  2090. (F)0.898517,
  2091. (F)0.769271,
  2092. (F)0.448635,
  2093. (F)0.095915,
  2094. (F)-0.134333,
  2095. (F)-0.178528,
  2096. (F)-0.084919,
  2097. (F)0.036952,
  2098. (F)0.095533,
  2099. (F)0.068936,
  2100. (F)-0.000000,
  2101. (F)-0.050404,
  2102. (F)-0.050835,
  2103. (F)-0.014169,
  2104. (F)0.023083,
  2105. (F)0.033543,
  2106. (F)0.016774,
  2107. (F)-0.007466,
  2108. (F)-0.019340,
  2109. (F)-0.013755,
  2110. (F)0.000000,
  2111. (F)0.009400,
  2112. (F)0.009029,
  2113. (F)0.002381,
  2114. (F)-0.003658,
  2115. (F)-0.005027,
  2116. (F)-0.002405,
  2117. (F)0.001050,
  2118. (F)0.002780,
  2119. (F)0.002145,
  2120. (F)0.000000
  2121. };
  2122. /*-----------------------------------------------------*
  2123.  | Tables for gain related routines .                  |
  2124.  -----------------------------------------------------*/
  2125. /**********************************************************************
  2126.   gain quantizer
  2127.  **********************************************************************/
  2128. FLOAT pred[4] = {               /* MA prediction coeff */
  2129. (F)0.68,
  2130. (F)0.58,
  2131. (F)0.34,
  2132. (F)0.19
  2133. };
  2134. FLOAT gbk1[NCODE1][2] = {
  2135. {(F)0.000010,
  2136. (F)0.185084},
  2137. {(F)0.094719,
  2138. (F)0.296035},
  2139. {(F)0.111779,
  2140. (F)0.613122},
  2141. {(F)0.003516,
  2142. (F)0.659780},
  2143. {(F)0.117258,
  2144. (F)1.134277},
  2145. {(F)0.197901,
  2146. (F)1.214512},
  2147. {(F)0.021772,
  2148. (F)1.801288},
  2149. {(F)0.163457,
  2150. (F)3.315700}
  2151. };
  2152. FLOAT gbk2[NCODE2][2] = {
  2153. {(F)0.050466,
  2154. (F)0.244769},
  2155. {(F)0.121711,
  2156. (F)0.000010},
  2157. {(F)0.313871,
  2158. (F)0.072357},
  2159. {(F)0.375977,
  2160. (F)0.292399},
  2161. {(F)0.493870,
  2162. (F)0.593410},
  2163. {(F)0.556641,
  2164. (F)0.064087},
  2165. {(F)0.645363,
  2166. (F)0.362118},
  2167. {(F)0.706138,
  2168. (F)0.146110},
  2169. {(F)0.809357,
  2170. (F)0.397579},
  2171. {(F)0.866379,
  2172. (F)0.199087},
  2173. {(F)0.923602,
  2174. (F)0.599938},
  2175. {(F)0.925376,
  2176. (F)1.742757},
  2177. {(F)0.942028,
  2178. (F)0.029027},
  2179. {(F)0.983459,
  2180. (F)0.414166},
  2181. {(F)1.055892,
  2182. (F)0.227186},
  2183. {(F)1.158039,
  2184. (F)0.724592}
  2185. };
  2186. int  map1[NCODE1] = {
  2187.  5, 1, 4, 7, 3, 0, 6, 2};
  2188. int  map2[NCODE2] = {
  2189.  4, 6, 0, 2,12,14, 8,10,15,11, 9,13, 7, 3, 1, 5};
  2190. FLOAT coef[2][2] = {
  2191. {(F)31.134575,
  2192. (F)1.612322},
  2193. {(F)0.481389,
  2194. (F)0.053056}
  2195. };
  2196. FLOAT thr1[NCODE1-NCAN1] = {
  2197. (F)0.659681,
  2198. (F)0.755274,
  2199. (F)1.207205,
  2200. (F)1.987740
  2201. };
  2202. FLOAT thr2[NCODE2-NCAN2] = {
  2203. (F)0.429912,
  2204. (F)0.494045,
  2205. (F)0.618737,
  2206. (F)0.650676,
  2207. (F)0.717949,
  2208. (F)0.770050,
  2209. (F)0.850628,
  2210. (F)0.932089
  2211. };
  2212. int  imap1[NCODE1] = {
  2213.  5, 1, 7, 4, 2, 0, 6, 3};
  2214. int  imap2[NCODE2] = {
  2215.  2,14, 3,13, 0,15, 1,12, 6,10, 7, 9, 4,11, 5, 8};
  2216. /*-----------------------------------------------------*
  2217.  | Tables for routines post_pro() & pre_proc().        |
  2218.  -----------------------------------------------------*/
  2219. /* filter coefficients (fc = 100 Hz ) */
  2220. FLOAT b100[3] = {(F)0.93980581E+00, (F)-0.18795834E+01,  (F)0.93980581E+00};
  2221. FLOAT a100[3] = {(F)1.00000000E+00,  (F)0.19330735E+01, (F)-0.93589199E+00};
  2222. /* filter coefficients (fc = 140 Hz)  */
  2223. FLOAT b140[3] = {(F)0.92727435E+00, (F)-0.18544941E+01, (F)0.92727435E+00};
  2224. FLOAT a140[3] = {(F)1.00000000E+00, (F)0.19059465E+01, (F)-0.91140240E+00};
  2225. /*-----------------------------------------------------*
  2226.  | Tables for routine bits().                          |
  2227.  -----------------------------------------------------*/
  2228. int  bitsno[PRM_SIZE] = {8,              /* MA + 1st stage */
  2229.                                10,             /* 2nd stage */
  2230.                                8,1,  13,4, 7,  /* first subframe  */
  2231.                                5,    13,4, 7}; /* second subframe */