Code/Resource
Windows Develop
Linux-Unix program
Internet-Socket-Network
Web Server
Browser Client
Ftp Server
Ftp Client
Browser Plugins
Proxy Server
Email Server
Email Client
WEB Mail
Firewall-Security
Telnet Server
Telnet Client
ICQ-IM-Chat
Search Engine
Sniffer Package capture
Remote Control
xml-soap-webservice
P2P
WEB(ASP,PHP,...)
TCP/IP Stack
SNMP
Grid Computing
SilverLight
DNS
Cluster Service
Network Security
Communication-Mobile
Game Program
Editor
Multimedia program
Graph program
Compiler program
Compress-Decompress algrithms
Crypt_Decrypt algrithms
Mathimatics-Numerical algorithms
MultiLanguage
Disk/Storage
Java Develop
assembly language
Applications
Other systems
Database system
Embeded-SCM Develop
FlashMX/Flex
source in ebook
Delphi VCL
OS Develop
MiddleWare
MPI
MacOS develop
LabView
ELanguage
Software/Tools
E-Books
Artical/Document
bwexp.c
Package: celp32c.rar [view]
Upload User: tsjrly
Upload Date: 2021-02-19
Package Size: 107k
Code Size: 2k
Category:
Voice Compress
Development Platform:
C/C++
- /**************************************************************************
- *
- * ROUTINE
- * bwexp
- *
- * FUNCTION
- * Bandwidth expansion of LPC predictor coefficients
- *
- * SYNOPSIS
- * subroutine bwexp(alpha, pc, pcexp, n)
- *
- * formal
- * data I/O
- * name type type function
- * -------------------------------------------------------------------
- * alpha float i Bandwidth expansion factor
- * pc float i predictor coefficients
- * pcexp float o expanded predictor coefficients
- * n int i predictor order
- ***************************************************************************
- *
- * DESCRIPTION
- *
- * Subroutine to perform bandwidth modification by moving the poles
- * (or zeros) radially in the z plane. If the bandwidth expansion
- * factor (alpha) is less than unity, the bandwidths are expanded by
- * shifting the poles (or zeros) toward the origin of the z plane.
- * The predictor coefficients are scaled directly according to:
- *
- * i-1
- * a' = a alpha where i = 1, . . . , order+1
- * i i
- *
- * Resulting in a bandwidth expansion of:
- *
- * -(fs/pi)ln(alpha) Hz
- *
- * (e.g., fs = 8 kHz, alpha = 0.994127 -> 15 Hz bandwidth expansion)
- *
- * CELP's LPC predictor coefficient convention is:
- * p+1 -(i-1)
- * A(z) = SUM a z where a = +1.0
- * i=1 i 1
- *
- ***************************************************************************
- *
- * CALLED BY
- *
- * autohf confg impls postfilter
- *
- * CALLS
- *
- *
- *
- **************************************************************************/
- #include <math.h>
- bwexp(alpha, pc, pcexp, n)
- int n;
- float alpha, pc[], pcexp[];
- {
- int i;
- for (i = 0; i <= n; i++)
- pcexp[i] = pc[i]*pow(alpha,(double)(i));
- }