mat.h
上传用户:csczyc
上传日期:2021-02-19
资源大小:1051k
文件大小:3k
源码类别:

语音压缩

开发平台:

C/C++

  1. /*
  2. 2.4 kbps MELP Proposed Federal Standard speech coder
  3. Fixed-point C code, version 1.0
  4. Copyright (c) 1998, Texas Instruments, Inc.  
  5. Texas Instruments has intellectual property rights on the MELP
  6. algorithm.  The Texas Instruments contact for licensing issues for
  7. commercial and non-government use is William Gordon, Director,
  8. Government Contracts, Texas Instruments Incorporated, Semiconductor
  9. Group (phone 972 480 7442).
  10. The fixed-point version of the voice codec Mixed Excitation Linear
  11. Prediction (MELP) is based on specifications on the C-language software
  12. simulation contained in GSM 06.06 which is protected by copyright and
  13. is the property of the European Telecommunications Standards Institute
  14. (ETSI). This standard is available from the ETSI publication office
  15. tel. +33 (0)4 92 94 42 58. ETSI has granted a license to United States
  16. Department of Defense to use the C-language software simulation contained
  17. in GSM 06.06 for the purposes of the development of a fixed-point
  18. version of the voice codec Mixed Excitation Linear Prediction (MELP).
  19. Requests for authorization to make other use of the GSM 06.06 or
  20. otherwise distribute or modify them need to be addressed to the ETSI
  21. Secretariat fax: +33 493 65 47 16.
  22. */
  23. /* 
  24.    mat.h     Matrix include file.
  25.              (Low level matrix and vector functions.)  
  26.    Copyright (c) 1995 by Texas Instruments, Inc.  All rights reserved.
  27. */
  28. #ifndef _mat_h
  29. #define _mat_h_
  30. Shortword *v_add(Shortword *vec1,Shortword *vec2,Shortword n);
  31. Longword *L_v_add(Longword *L_vec1,Longword *L_vec2,Shortword n);
  32. Shortword *v_equ(Shortword *vec1,Shortword *v2,Shortword n); 
  33. /* __inline Shortword *v_equ(Shortword *vec1,Shortword *vec2,Shortword n) */
  34. /* {                                                                      */
  35. /*     Shortword i;                                                       */
  36. /*                                                                        */
  37. /*     for(i=0; i < n; i++) {                                             */
  38. /*       vec1[i] = vec2[i];   // data_move();mark del                     */
  39. /*     }                                                                  */
  40. /*     return(vec1);                                                      */
  41. /* }                                                                      */
  42. Shortword *v_equ_shr(Shortword *vec1,Shortword *vec2,Shortword scale,
  43.      Shortword n);
  44. Longword *L_v_equ(Longword *L_vec1,Longword *L_vec2,Shortword n);
  45. Shortword v_inner(Shortword *vec1,Shortword *vec2,Shortword n,
  46.   Shortword qvec1,Shortword qvec2,Shortword qout);
  47. Longword L_v_inner(Shortword *vec1,Shortword *vec2,Shortword n,
  48.    Shortword qvec1,Shortword qvec2,Shortword qout);
  49. Shortword v_magsq(Shortword *vec1,Shortword n,Shortword qvec1,Shortword qout);
  50. Longword L_v_magsq(Shortword *vec1,Shortword n,Shortword qvec1,Shortword qout);
  51. Shortword *v_scale(Shortword *vec1,Shortword scale,Shortword n);
  52. Shortword *v_scale_shl(Shortword *vec1,Shortword scale,Shortword n,
  53.        Shortword shift);
  54. Shortword *v_sub(Shortword *vec1,Shortword *vec2,Shortword n);
  55. /* Shortword *v_zap(Shortword *vec1,Shortword n); */
  56. __inline Shortword *v_zap(Shortword *vec1,Shortword n)
  57. {
  58.     Shortword i;
  59.     for(i = 0; i < n; i++) {
  60.         vec1[i] = 0; //  data_move();mark del
  61.     }
  62.     return(vec1);
  63. }
  64. Longword *L_v_zap(Longword *L_vec1,Shortword n);
  65. #endif