svn path=/trunk/vorbis/; revision=4019
********************************************************************
function: channel mapping 0 implementation
********************************************************************
function: channel mapping 0 implementation
- last mod: $Id: mapping0.c,v 1.54 2002/10/11 11:14:41 xiphmont Exp $
+ last mod: $Id: mapping0.c,v 1.55 2002/10/17 04:56:23 xiphmont Exp $
********************************************************************/
********************************************************************/
#include "psy.h"
#include "scales.h"
#include "psy.h"
#include "scales.h"
static long seq=0;
static ogg_int64_t total=0;
static float FLOOR1_fromdB_LOOKUP[256]={
static long seq=0;
static ogg_int64_t total=0;
static float FLOOR1_fromdB_LOOKUP[256]={
0.82788260F, 0.88168307F, 0.9389798F, 1.F,
};
0.82788260F, 0.88168307F, 0.9389798F, 1.F,
};
extern int *floor1_fit(vorbis_block *vb,vorbis_look_floor *look,
const float *logmdct, /* in */
extern int *floor1_fit(vorbis_block *vb,vorbis_look_floor *look,
const float *logmdct, /* in */
for(j=0;j<n/2;j++)
logmdct[j]=todB(mdct+j);
for(j=0;j<n/2;j++)
logmdct[j]=todB(mdct+j);
if(vi->channels==2){
if(i==0)
_analysis_output("mdctL",seq,logmdct,n/2,1,0,0);
if(vi->channels==2){
if(i==0)
_analysis_output("mdctL",seq,logmdct,n/2,1,0,0);
}else{
_analysis_output("mdct",seq,logmdct,n/2,1,0,0);
}
}else{
_analysis_output("mdct",seq,logmdct,n/2,1,0,0);
}
/* first step; noise masking. Not only does 'noise masking'
give us curves from which we can decide how much resolution
/* first step; noise masking. Not only does 'noise masking'
give us curves from which we can decide how much resolution
seq++;
total+=ci->blocksizes[vb->W]/4+ci->blocksizes[vb->nW]/4;
seq++;
total+=ci->blocksizes[vb->W]/4+ci->blocksizes[vb->nW]/4;
********************************************************************
function: psychoacoustics not including preecho
********************************************************************
function: psychoacoustics not including preecho
- last mod: $Id: psy.c,v 1.78 2002/10/17 04:41:39 xiphmont Exp $
+ last mod: $Id: psy.c,v 1.79 2002/10/17 04:56:23 xiphmont Exp $
********************************************************************/
********************************************************************/
lo = hi - fixed;
tN = N[hi] + N[-lo];
lo = hi - fixed;
tN = N[hi] + N[-lo];
tXX = XX[hi] + XX[-lo];
tY = Y[hi] + Y[-lo];
tXX = XX[hi] + XX[-lo];
tY = Y[hi] + Y[-lo];
- tXY = XY[hi] + XY[-lo];
+ tXY = XY[hi] - XY[-lo];
- _analysis_output("median2R",seq/2,work,n,1,0,0);
+ _analysis_output("medianR",seq/2,work,n,1,0,0);
- _analysis_output("median2L",seq/2,work,n,1,0,0);
+ _analysis_output("medianL",seq/2,work,n,1,0,0);
- _analysis_output("envelope2R",seq/2,work2,n,1,0,0);
+ _analysis_output("envelopeR",seq/2,work2,n,1,0,0);
- _analysis_output("envelope2L",seq/2,work2,n,1,0,0);
+ _analysis_output("enveloperL",seq/2,work2,n,1,0,0);