dsp_minerror_d.c

dm642函数库

/* ======================================================================== */
/*  TEXAS INSTRUMENTS, INC.                                                 */
/*                                                                          */
/*  NAME                                                                    */
/*      DSP_minerror_d.c -- Example file for DSP_minerror                   */
/*                                                                          */
/*  USAGE                                                                   */
/*      This file contains code for demonstrating the C64x DSPLIB           */
/*      DSP_minerror function. All inputs to the function contain random    */
/*      data. The assembly version of DSP_minerror is called and the        */
/*      output is compared with the reference C code using mem_compare()    */
/*      in support.c.                                                       */
/* ------------------------------------------------------------------------ */
/*          Copyright (C) 2003 Texas Instruments, Incorporated.             */
/*                          All Rights Reserved.                            */
/* ======================================================================== */
    
#include <stdio.h> 
#include <stdlib.h>

/* Header file for the memory compare function */
int mem_compare(const void *ptr1, const char *name1, 
                const void *ptr2, const char *name2, int len);

/* Header file for the DSPLIB function */
#include "DSP_minerror.h"    

/* Header file for the C function */
int DSP_minerror_c(const short * gsp0_tbl, const short * errCoefs, int * max_index);

/* ======================================================================== */
/*  DSPLIB function-specific alignments. Refer to the                       */
/*  TMS320C64x DSP Library Programmer's Reference for details.              */
/* ======================================================================== */
#pragma DATA_ALIGN(gsp0_tbl, 8);

/* ======================================================================== */
/*  Constant dataset.                                                       */
/* ======================================================================== */
#define NTABLE       (2304)
#define NerrCoefs    (9)


/* ======================================================================== */
/*  Initialize arrays with random test data.                                */
/* ======================================================================== */
int     test = 0;
const short  gsp0_tbl[NTABLE] = 
{
     0x13E6, -0x6F27,  0x4CB0, -0x38E7, -0x1F34, -0x16E3,  0x21E1,  0x3457,
    -0x0DEA,  0x5D64, -0x7C62, -0x37EC,  0x0B2A, -0x04CD,  0x5D08, -0x3879,
     0x637C, -0x512B,  0x2B44, -0x6280, -0x7C2C,  0x2A42, -0x1A9E,  0x14A3,
    -0x1439,  0x216E, -0x637B, -0x401C,  0x3848, -0x0F97,  0x323D, -0x383B,
     0x6D72,  0x1F90,  0x61CF,  0x4210, -0x3D04, -0x17C7,  0x5258, -0x6E27,
     0x5CDC, -0x38A8,  0x659A,  0x79E5,  0x6BCB, -0x3CD6, -0x0ECB, -0x4A42,
     0x5CB8,  0x627C,  0x7763,  0x1795,  0x5E4C,  0x77B3,  0x4442,  0x059D,
     0x2653,  0x4C43, -0x2D63, -0x3D85,  0x3FBC, -0x5F76,  0x7CA2,  0x15DF,
    -0x59C8, -0x52F0, -0x2098, -0x2E07,  0x07E4,  0x164C,  0x6C34,  0x6B9F,
    -0x3090,  0x4807, -0x03DD, -0x621A,  0x6B19,  0x2BB1, -0x53D0,  0x4EA6,
     0x119A, -0x3180,  0x0991, -0x4594, -0x26FE, -0x1D21,  0x0FB0,  0x118F,
    -0x497A,  0x0FA3, -0x3739,  0x7F5D,  0x6E6D, -0x4B2E, -0x7F55, -0x3E21,
     0x0EC4,  0x333F, -0x52C8, -0x798A,  0x24B1,  0x23CE,  0x6019, -0x0A6B,
    -0x4E17, -0x14E0,  0x5EDB,  0x233E,  0x01AE,  0x76D9,  0x517E, -0x6E1A,
    -0x2E1D,  0x2F76,  0x76E5,  0x629B, -0x4292,  0x6B9D,  0x10B3, -0x7E5A,
     0x0AC4, -0x4B54,  0x5591, -0x2D5F,  0x2CC9, -0x6B1D,  0x2877,  0x100F,
    -0x3121, -0x4C38,  0x7129,  0x2F79,  0x5747,  0x6E9A, -0x38B1, -0x5D6E,
     0x34FA,  0x0EF6, -0x5E1E,  0x1ACD,  0x0D86, -0x2F2C, -0x67C6, -0x2477,
    -0x7883,  0x060C,  0x0129,  0x108C, -0x6FC5, -0x587E, -0x74E9, -0x7D59,
    -0x3E9D,  0x0CF9, -0x775E,  0x5368, -0x4F5E,  0x2F98, -0x3B2C,  0x0B57,
    -0x2C6A,  0x3CD3,  0x4876, -0x3DFC, -0x3E24,  0x1557,  0x542D,  0x5833,
     0x52F4,  0x04CF,  0x408F,  0x7154, -0x6CB5, -0x071F,  0x645A,  0x1239,
     0x0827,  0x7FEE,  0x2507,  0x6248, -0x5889, -0x4F34,  0x53FC,  0x0D5A,
    -0x5D57, -0x32CC, -0x06B6, -0x0865, -0x54A5, -0x2F88, -0x067F,  0x2B9A,
    -0x51DD,  0x5A3D,  0x5584, -0x73DD, -0x77AE,  0x6207, -0x5D88, -0x460D,
    -0x21AD, -0x382E,  0x6E7A,  0x18E3,  0x0600, -0x2597, -0x7B6A,  0x6FDE,
    -0x5DBA, -0x6584,  0x4429,  0x11B1,  0x6DB4, -0x625D,  0x75AA,  0x2C70,
    -0x1E79,  0x4686,  0x47A2,  0x5132,  0x5DAF,  0x1CA1,  0x6F56, -0x0C4F,
    -0x20B3, -0x7620, -0x5B11, -0x667A,  0x72CA, -0x14E3, -0x15BA,  0x0301,
     0x1C57,  0x5322, -0x1DAF,  0x041B,  0x3988, -0x6D2D,  0x7672, -0x77E7,
     0x4564, -0x7F49, -0x2032, -0x0F58,  0x72A8, -0x04D3,  0x1A26,  0x0F6B,
     0x2CA5, -0x168A,  0x50BF, -0x0C78,  0x7C94, -0x4B5B, -0x362F, -0x037A,
     0x109F,  0x1C53, -0x1EC4, -0x18AE,  0x75EB,  0x0FAB,  0x1CE7, -0x06A9,
     0x6C1C,  0x0595, -0x64FA, -0x7246,  0x687E,  0x538E, -0x511D, -0x03E9,
    -0x1731, -0x6603, -0x13BB, -0x1360, -0x563E, -0x2306, -0x05F8,  0x70FE,
     0x0D35,  0x38A1, -0x618A,  0x7441,  0x7FAF,  0x09DD,  0x5E7B, -0x113A,
    -0x4AEC,  0x1AB9,  0x61CC, -0x286A, -0x2D99,  0x2E2B, -0x1CBA,  0x5C85,
     0x7AC6, -0x5A69,  0x10C9, -0x490D, -0x2413, -0x4431, -0x1BE2,  0x6047,
    -0x6C14, -0x23F8, -0x4815, -0x76E2,  0x713E, -0x1ABD,  0x0910, -0x3A96,
     0x120E,  0x7FE1, -0x7FD5, -0x6DCA, -0x3C16, -0x324B,  0x39B5, -0x0D4A,
    -0x5C52, -0x61F1,  0x0873,  0x58F6,  0x2138,  0x2D59,  0x0853,  0x7FC5,
    -0x7DD1, -0x7F52,  0x6053, -0x2FED, -0x4DA1,  0x1185, -0x1AFE, -0x3194,
    -0x6B54, -0x3053, -0x18FB,  0x65A8, -0x2FDA, -0x1682, -0x4902, -0x36A2,
     0x4792, -0x11AF,  0x6838, -0x070D,  0x0E9D, -0x669B, -0x219D,  0x0E9D,
     0x0E6A,  0x2582,  0x7C45,  0x5BFE, -0x1DED, -0x3463, -0x4413,  0x62BF,
     0x1FA2,  0x1C26, -0x12FB, -0x0009,  0x3FC0, -0x1702,  0x6DA4, -0x4F7A,
     0x6CA8, -0x321A,  0x041C,  0x389C,  0x6FDB, -0x733A,  0x5C2D, -0x2D33,
     0x7BDB, -0x7442, -0x109A,  0x2443, -0x112D,  0x35A9,  0x54FC, -0x0BAA,
     0x7228,  0x594B,  0x3316,  0x09A0,  0x0897,  0x3493,  0x44C5, -0x1F6C,
     0x271D,  0x095E, -0x0AAC,  0x22C8, -0x7559, -0x5038, -0x7F86,  0x3921,
    -0x2591, -0x0362,  0x2541, -0x2484, -0x2773,  0x719C,  0x5169,  0x7945,
    -0x2E4D,  0x7EF8,  0x15EE, -0x10BE,  0x7527,  0x08E1, -0x0B8F, -0x3B89,
    -0x0E0A, -0x2375, -0x2ED8,  0x3267, -0x0249,  0x6323, -0x6A31,  0x76A1,
     0x1099,  0x4441, -0x67F6, -0x6274,  0x6565, -0x5BC2, -0x3253,  0x087C,
    -0x5F8B,  0x7BC4,  0x28C6, -0x35E3,  0x672C,  0x6B77,  0x208C,  0x1642,
     0x1FD2,  0x3087,  0x3794,  0x3482, -0x2A4A,  0x3735,  0x7B84,  0x3D96,
    -0x68B6,  0x7DB1,  0x5E8D, -0x7D36, -0x542A, -0x3252,  0x44A8,  0x0E82,
     0x69E6, -0x47A6, -0x2729,  0x7CFE, -0x547E, -0x45A9, -0x6BF9, -0x78F5,
     0x702D,  0x5020,  0x00E4, -0x59B4, -0x7CA5,  0x43B2,  0x5F57, -0x7B05,
    -0x6418, -0x33B9,  0x3850,  0x1CBE,  0x56B7, -0x14DC, -0x1C11, -0x21D4,
     0x0D9D,  0x77E2, -0x2D4F, -0x05C4, -0x02DE, -0x2D2F,  0x6883,  0x63CE,
    -0x2480,  0x5B17,  0x0BAE, -0x7CCB,  0x13FF, -0x22E8, -0x6FFF,  0x77DC,
    -0x7E33, -0x7692, -0x612B,  0x405B, -0x7831,  0x7741, -0x49EE, -0x3ACB,
     0x53EE, -0x6C94,  0x5C07, -0x7B6B,  0x2719,  0x3709, -0x7B01,  0x7B99,
     0x3AF3,  0x1BEA,  0x70A6,  0x215B,  0x5BA7,  0x7B3E, -0x22E6,  0x7A15,
     0x39FB,  0x59A8,  0x477C, -0x6B69,  0x2002,  0x284E,  0x6A78,  0x2753,
     0x593C,  0x1C43, -0x1A20, -0x61E4, -0x084E, -0x7036,  0x7E68, -0x1B79,
    -0x0BBC, -0x779B,  0x5ED2,  0x0ED3, -0x6F35,  0x3818, -0x0D05, -0x3F45,
     0x51D0,  0x7B2D, -0x7E72, -0x7D2B, -0x5468, -0x04D9,  0x6D15, -0x616A,
     0x1B6E, -0x18F5,  0x3EA8, -0x0162, -0x4CB3,  0x7DEF,  0x2A7D, -0x1B38,
     0x44A6, -0x08D2,  0x40D5, -0x7E37,  0x657B,  0x778B, -0x6EFD, -0x455C,
     0x5C10, -0x02D7,  0x3861,  0x47CE,  0x0211, -0x31B3,  0x2601,  0x29AC,
    -0x37F1, -0x74E4, -0x293C, -0x1F8C,  0x4559, -0x7B40,  0x597F,  0x7F36,
    -0x738F,  0x20B9,  0x0EE9,  0x28E0, -0x4CE5,  0x0AB6,  0x36CA,  0x177B,
    -0x12C4, -0x2E5C,  0x4076, -0x0EA5, -0x6345,  0x5E95, -0x4C91, -0x05E4,
     0x7B6D,  0x6D65,  0x1EE2,  0x7846, -0x7F84, -0x772B,  0x6FAF, -0x1AE5,
    -0x3DDA,  0x3EBB, -0x53D0, -0x4E22,  0x6CB2, -0x2AA6, -0x2F4C, -0x2FD0,
     0x3B18, -0x7B89, -0x7316,  0x1FF0,  0x5CCB,  0x3975,  0x4D51, -0x6E8F,
    -0x4D66,  0x3130, -0x28AA,  0x47CA, -0x7D96, -0x5A24,  0x30BA,  0x0E21,
    -0x011C,  0x3912,  0x3300, -0x6AAB, -0x1B0F,  0x3266, -0x62BC,  0x2FBC,
     0x6552,  0x169B,  0x5D4B,  0x5679, -0x402F,  0x2286, -0x3EAE,  0x040A,
    -0x3F7F, -0x6D32,  0x7E3F, -0x7A7E, -0x5E17, -0x7E68,  0x0C7B, -0x6F61,
     0x1C59,  0x2E6B, -0x5957,  0x36BE,  0x3928,  0x50A2,  0x0A54,  0x4BC3,
     0x4DA5, -0x4213,  0x6C72, -0x350B, -0x77AD, -0x6AF3, -0x0376, -0x66A8,
    -0x68D5, -0x4B1D,  0x6759, -0x62FF,  0x2C6F, -0x4A1F, -0x6357, -0x6AC7,
     0x6F6A, -0x0F57,  0x5031,  0x6361,  0x3110, -0x57A1,  0x7C75, -0x13FF,
     0x0946,  0x6A2D, -0x207F,  0x572A,  0x00FC, -0x7B53,  0x61B2, -0x13D6,
     0x4D12,  0x365C,  0x309C,  0x2C83, -0x3BC6, -0x2808, -0x70CB, -0x3FFD,
    -0x51DC, -0x2521,  0x4C4D, -0x09AF, -0x2940, -0x1721,  0x6E33,  0x6014,
     0x3545, -0x466E, -0x482F,  0x56B2, -0x6BD9, -0x13B2,  0x182B, -0x0500,
    -0x0236, -0x3F69,  0x3F01, -0x47A9,  0x4D02, -0x6D25,  0x7134,  0x6D4C,
     0x7712,  0x092A,  0x28BC,  0x0ADC, -0x2DAC,  0x07A9,  0x1018, -0x0421,
    -0x728E,  0x6F90, -0x3B19, -0x0934, -0x7672, -0x26C3, -0x157D, -0x7490,
    -0x019B,  0x5B20, -0x311E, -0x5DFE, -0x1291, -0x6CAF, -0x179D, -0x5F41,
     0x29F0,  0x334D, -0x6903, -0x1529, -0x5A5F, -0x0179, -0x423B, -0x5957,
    -0x445A, -0x1E4B, -0x3BCF,  0x6181, -0x7F36,  0x5429,  0x36BD,  0x7406,
    -0x5526, -0x0D41, -0x3E87, -0x6C05,  0x1719,  0x7180, -0x2BC2, -0x7B74,
     0x32AC, -0x6C06,  0x2715, -0x595D, -0x2E0C,  0x6315,  0x1370,  0x14C2,
    -0x6C65, -0x6D7D,  0x6F8A,  0x0DEC, -0x4F56,  0x2040, -0x243B,  0x4476,
    -0x58B0,  0x25FB, -0x08B8, -0x12B3,  0x5450,  0x6CAB, -0x4020,  0x3514,
    -0x7B13, -0x12E3, -0x301C, -0x5B27,  0x4224,  0x3306,  0x508C, -0x7251,
    -0x47C4, -0x03F2,  0x4F16,  0x2FD3, -0x422E, -0x75EB, -0x7FED, -0x2591,
    -0x0699,  0x524D,  0x4306,  0x65D6,  0x10FF, -0x40A3,  0x68AB,  0x0CCC,
     0x6BBC,  0x490A, -0x58DD,  0x602F,  0x7948, -0x7BDE, -0x3DB8, -0x583D,
     0x0427, -0x211E,  0x4645,  0x204A, -0x6438,  0x4C33, -0x6A6A,  0x5A00,
     0x05BD, -0x409F,  0x4BE1,  0x2D34, -0x512E,  0x64E0, -0x0710,  0x61F2,
    -0x2A54,  0x29AC, -0x3BF7, -0x186F,  0x6C25,  0x3DDE, -0x630D,  0x715A,
     0x1A37,  0x725E,  0x502F,  0x347A,  0x1775, -0x79AD, -0x3E79, -0x02D4,
     0x517C,  0x1A6D, -0x3530, -0x5CC6, -0x1E8B,  0x7631, -0x7488,  0x3E2A,
    -0x4159, -0x28F0, -0x780A,  0x490F,  0x50E1, -0x49F2,  0x4B30, -0x2107,
     0x132C, -0x2616, -0x3D32,  0x4A80,  0x3C5A, -0x32DA,  0x0BBF, -0x01F8,
    -0x3D95, -0x0267,  0x62A5, -0x5DC3,  0x7DD9, -0x122E,  0x0311,  0x1725,
    -0x7933,  0x2A78, -0x50A1, -0x500B,  0x59AF,  0x22BE, -0x36C4,  0x6E2C,
     0x6110,  0x6DE9, -0x482A, -0x241E,  0x4AE3, -0x3793, -0x0145, -0x2933,
    -0x080E, -0x454B,  0x1C85,  0x1F81, -0x2860,  0x2D0B,  0x04C5,  0x0A1E,
    -0x3118,  0x5425, -0x325C,  0x3E2C, -0x4AE6, -0x3881, -0x4AC2,  0x5038,
    -0x213E,  0x1C3D, -0x5CCF,  0x2E1D, -0x57F7,  0x619D,  0x7555, -0x3012,
     0x7F88, -0x2CCD,  0x3550, -0x3D41,  0x2E59, -0x111A, -0x0469, -0x2EB3,
    -0x5733,  0x7C82,  0x4F1C,  0x63F5,  0x373C,  0x6AB8,  0x17FB,  0x466A,
     0x33F1, -0x57C3,  0x4758, -0x5870, -0x17F4,  0x5FEF,  0x4BA7, -0x3E45,
    -0x346C,  0x5531,  0x3658, -0x4824, -0x552D,  0x270D, -0x6DE5, -0x29E9,
     0x0084, -0x70E9,  0x4F20, -0x620A,  0x7C68, -0x076F, -0x351A, -0x35C1,
    -0x0E00, -0x5E4E,  0x11F8,  0x1032, -0x07C7,  0x32E3,  0x437D, -0x6F24,
    -0x0FE8, -0x0726, -0x3C4C, -0x1737,  0x26D0,  0x164E, -0x5498,  0x7182,
     0x7A39,  0x56BA, -0x4DA2,  0x17B6, -0x41FB,  0x47DE,  0x2BC2, -0x0069,
    -0x073F,  0x082E,  0x0865, -0x1976,  0x4BAF,  0x0983, -0x37F7, -0x3979,
    -0x556F,  0x2DFE, -0x72DF,  0x39DB,  0x2059,  0x28DF,  0x423F, -0x57DD,
     0x531E, -0x07FF, -0x5EC8, -0x1222,  0x0A0A, -0x25C6, -0x6643, -0x0252,
     0x407D, -0x0590, -0x316D, -0x6C6E,  0x1CDD, -0x3C64, -0x17A2,  0x4F73,
    -0x7BBD,  0x46B4, -0x2D9F,  0x6AF7,  0x0982,  0x5ED0, -0x16A0,  0x20AE,
     0x4CC8,  0x17A9, -0x5BAA,  0x1EB3,  0x1807, -0x3904, -0x7B08,  0x23CC,
    -0x6F64,  0x50F8,  0x0F51, -0x5C6C, -0x434E, -0x2CFB, -0x1679,  0x251B,
     0x7A83, -0x4EA4, -0x4F70,  0x7068, -0x653F, -0x20B9, -0x7CA6,  0x664F,
     0x364F,  0x4CE1, -0x41F6, -0x583D, -0x240F,  0x723C, -0x7FD6,  0x0A54,
     0x3755, -0x120B, -0x2B60, -0x3AB1,  0x66BA,  0x48BD,  0x43D0,  0x3C52,
     0x27FD, -0x4C19,  0x25BE,  0x2F95, -0x34FF, -0x5100, -0x04D3, -0x2413,
     0x5531,  0x33C5, -0x3891,  0x4024,  0x7BCD,  0x7D26, -0x5803, -0x55CC,
    -0x6C09, -0x6E19, -0x6610, -0x77A6,  0x1A33,  0x1A2C, -0x7BF2, -0x490A,
     0x229C,  0x2D5D,  0x26C6, -0x6EC1, -0x58A3,  0x1A66,  0x4B51, -0x0A49,
    -0x70CC,  0x5251,  0x2D94, -0x31D7,  0x6CF3,  0x1C2B, -0x0EA0,  0x30B2,
     0x0900,  0x26F9, -0x09D5,  0x662D, -0x4F5E,  0x4A30, -0x4D99, -0x08F2,
     0x15A8,  0x0514, -0x760E,  0x04BC,  0x69E2, -0x04BD, -0x1C47, -0x496B,
     0x3AB1, -0x19EA, -0x45BE,  0x5F20,  0x4023,  0x575E, -0x2BE8,  0x0113,
    -0x483B,  0x20FE, -0x58BC, -0x290D, -0x7123, -0x1821,  0x3843, -0x3C55,
    -0x0747,  0x46A1, -0x6048,  0x6421,  0x1DEF,  0x2787, -0x236E,  0x6E70,
     0x3F47,  0x3F99, -0x69BA,  0x1B73, -0x1069, -0x0BC8,  0x5527,  0x10B7,
     0x6D75, -0x00AF,  0x641C, -0x61E6,  0x5459, -0x341E,  0x14C2,  0x06A0,
    -0x326C,  0x79C1, -0x7BBF,  0x5043,  0x51AD,  0x4BF0, -0x3795,  0x14A9,
     0x459D,  0x7F19, -0x0DB5,  0x663B,  0x5C2D,  0x6587,  0x42D5, -0x39F1,
     0x3F53,  0x3676, -0x50B5, -0x49A9,  0x275A, -0x119F,  0x3607,  0x7846,