|
|
|
@ -1,6 +1,9 @@
|
|
|
|
|
/*
|
|
|
|
|
|
|
|
|
|
$Log$
|
|
|
|
|
Revision 1.15 2004/06/26 03:50:14 markster
|
|
|
|
|
Merge source cleanups (bug #1911)
|
|
|
|
|
|
|
|
|
|
Revision 1.14 2003/02/12 13:59:15 matteo
|
|
|
|
|
mer feb 12 14:56:57 CET 2003
|
|
|
|
|
|
|
|
|
@ -212,17 +215,17 @@ typedef shortlogical (*K_fp)(...);
|
|
|
|
|
typedef /* Character */ VOID (*H_fp)(...);
|
|
|
|
|
typedef /* Subroutine */ int (*S_fp)(...);
|
|
|
|
|
#else
|
|
|
|
|
typedef int /* Unknown procedure type */ (*U_fp)();
|
|
|
|
|
typedef shortint (*J_fp)();
|
|
|
|
|
typedef integer (*I_fp)();
|
|
|
|
|
typedef real (*R_fp)();
|
|
|
|
|
typedef doublereal (*D_fp)(), (*E_fp)();
|
|
|
|
|
typedef /* Complex */ VOID (*C_fp)();
|
|
|
|
|
typedef /* Double Complex */ VOID (*Z_fp)();
|
|
|
|
|
typedef logical (*L_fp)();
|
|
|
|
|
typedef shortlogical (*K_fp)();
|
|
|
|
|
typedef /* Character */ VOID (*H_fp)();
|
|
|
|
|
typedef /* Subroutine */ int (*S_fp)();
|
|
|
|
|
typedef int /* Unknown procedure type */ (*U_fp)(VOID);
|
|
|
|
|
typedef shortint (*J_fp)(VOID);
|
|
|
|
|
typedef integer (*I_fp)(VOID);
|
|
|
|
|
typedef real (*R_fp)(VOID);
|
|
|
|
|
typedef doublereal (*D_fp)(VOID), (*E_fp)(VOID);
|
|
|
|
|
typedef /* Complex */ VOID (*C_fp)(VOID);
|
|
|
|
|
typedef /* Double Complex */ VOID (*Z_fp)(VOID);
|
|
|
|
|
typedef logical (*L_fp)(VOID);
|
|
|
|
|
typedef shortlogical (*K_fp)(VOID);
|
|
|
|
|
typedef /* Character */ VOID (*H_fp)(VOID);
|
|
|
|
|
typedef /* Subroutine */ int (*S_fp)(VOID);
|
|
|
|
|
#endif
|
|
|
|
|
/* E_fp is for real functions when -R is not specified */
|
|
|
|
|
typedef VOID C_f; /* complex function */
|
|
|
|
@ -252,4 +255,71 @@ typedef doublereal E_f; /* real function with -R not specified */
|
|
|
|
|
#undef unix
|
|
|
|
|
#undef vax
|
|
|
|
|
#endif
|
|
|
|
|
|
|
|
|
|
#ifdef KR_headers
|
|
|
|
|
extern integer pow_ii(ap, bp);
|
|
|
|
|
extern double r_sign(a,b);
|
|
|
|
|
extern integer i_nint(x);
|
|
|
|
|
#else
|
|
|
|
|
extern integer pow_ii(integer *ap, integer *bp);
|
|
|
|
|
extern double r_sign(real *a, real *b);
|
|
|
|
|
extern integer i_nint(real *x);
|
|
|
|
|
|
|
|
|
|
#endif
|
|
|
|
|
#ifdef P_R_O_T_O_T_Y_P_E_S
|
|
|
|
|
extern int bsynz_(real *coef, integer *ip, integer *iv,
|
|
|
|
|
real *sout, real *rms, real *ratio, real *g2pass,
|
|
|
|
|
struct lpc10_decoder_state *st);
|
|
|
|
|
extern int chanwr_(integer *order, integer *ipitv, integer *irms,
|
|
|
|
|
integer *irc, integer *ibits, struct lpc10_encoder_state *st);
|
|
|
|
|
extern int chanrd_(integer *order, integer *ipitv, integer *irms,
|
|
|
|
|
integer *irc, integer *ibits);
|
|
|
|
|
extern int chanwr_0_(int n__, integer *order, integer *ipitv,
|
|
|
|
|
integer *irms, integer *irc, integer *ibits,
|
|
|
|
|
struct lpc10_encoder_state *st);
|
|
|
|
|
extern int dcbias_(integer *len, real *speech, real *sigout);
|
|
|
|
|
extern int decode_(integer *ipitv, integer *irms, integer *irc,
|
|
|
|
|
integer *voice, integer *pitch, real *rms,
|
|
|
|
|
real *rc, struct lpc10_decoder_state *st);
|
|
|
|
|
extern int deemp_(real *x, integer *n, struct lpc10_decoder_state *st);
|
|
|
|
|
extern int difmag_(real *speech, integer *lpita, integer *tau, integer *ltau,
|
|
|
|
|
integer *maxlag, real *amdf, integer *minptr, integer *maxptr);
|
|
|
|
|
extern int dyptrk_(real *amdf, integer *ltau, integer *
|
|
|
|
|
minptr, integer *voice, integer *pitch, integer *midx,
|
|
|
|
|
struct lpc10_encoder_state *st);
|
|
|
|
|
extern int encode_(integer *voice, integer *pitch, real *rms, real *rc,
|
|
|
|
|
integer *ipitch, integer *irms, integer *irc);
|
|
|
|
|
extern int energy_(integer *len, real *speech, real *rms);
|
|
|
|
|
extern int ham84_(integer *input, integer *output, integer *errcnt);
|
|
|
|
|
extern int hp100_(real *speech, integer *start, integer *end,
|
|
|
|
|
struct lpc10_encoder_state *st);
|
|
|
|
|
extern int inithp100_(void);
|
|
|
|
|
extern int invert_(integer *order, real *phi, real *psi, real *rc);
|
|
|
|
|
extern int irc2pc_(real *rc, real *pc, integer *order, real *gprime, real *g2pass);
|
|
|
|
|
extern int ivfilt_(real *lpbuf, real *ivbuf, integer *len, integer *nsamp, real *ivrc);
|
|
|
|
|
extern int lpcdec_(integer *bits, real *speech);
|
|
|
|
|
extern int initlpcdec_(void);
|
|
|
|
|
extern int lpcenc_(real *speech, integer *bits);
|
|
|
|
|
extern int initlpcenc_(void);
|
|
|
|
|
extern int lpfilt_(real *inbuf, real *lpbuf, integer *len, integer *nsamp);
|
|
|
|
|
extern integer median_(integer *d1, integer *d2, integer *d3);
|
|
|
|
|
extern int mload_(integer *order, integer *awins, integer *awinf, real *speech, real *phi, real *psi);
|
|
|
|
|
extern int onset_(real *pebuf, integer *osbuf, integer *osptr, integer *oslen, integer *sbufl, integer *sbufh, integer *lframe, struct lpc10_encoder_state *st);
|
|
|
|
|
extern int pitsyn_(integer *order, integer *voice, integer *pitch, real *rms, real *rc, integer *lframe, integer *ivuv, integer *ipiti, real *rmsi, real *rci, integer *nout, real *ratio, struct lpc10_decoder_state *st);
|
|
|
|
|
extern int placea_(integer *ipitch, integer *voibuf, integer *obound, integer *af, integer *vwin, integer *awin, integer *ewin, integer *lframe, integer *maxwin);
|
|
|
|
|
extern int placev_(integer *osbuf, integer *osptr, integer *oslen, integer *obound, integer *vwin, integer *af, integer *lframe, integer *minwin, integer *maxwin, integer *dvwinl, integer *dvwinh);
|
|
|
|
|
extern int preemp_(real *inbuf, real *pebuf, integer *nsamp, real *coef, real *z__);
|
|
|
|
|
extern int prepro_(real *speech, integer *length,
|
|
|
|
|
struct lpc10_encoder_state *st);
|
|
|
|
|
extern int decode_(integer *ipitv, integer *irms, integer *irc, integer *voice, integer *pitch, real *rms, real *rc, struct lpc10_decoder_state *st);
|
|
|
|
|
extern integer random_(struct lpc10_decoder_state *st);
|
|
|
|
|
extern int rcchk_(integer *order, real *rc1f, real *rc2f);
|
|
|
|
|
extern int synths_(integer *voice, integer *pitch, real *rms, real *rc, real *speech, integer *k, struct lpc10_decoder_state *st);
|
|
|
|
|
extern int tbdm_(real *speech, integer *lpita, integer *tau, integer *ltau, real *amdf, integer *minptr, integer *maxptr, integer *mintau);
|
|
|
|
|
extern int voicin_(integer *vwin, real *inbuf, real *lpbuf, integer *buflim, integer *half, real *minamd, real *maxamd, integer *mintau, real *ivrc, integer *obound, integer *voibuf, integer *af, struct lpc10_encoder_state *st);
|
|
|
|
|
extern int vparms_(integer *vwin, real *inbuf, real *lpbuf, integer *buflim, integer *half, real *dither, integer *mintau, integer *zc, integer *lbe, integer *fbe, real *qs, real *rc1, real *ar_b__, real *ar_f__);
|
|
|
|
|
|
|
|
|
|
#endif
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
#endif /* ! defined F2C_INCLUDE */
|
|
|
|
|