#include <stdio.h> 
#include <math.h> 
int first=1; 
int r1,c1,r,c,i1,i2,i3,i4,i5; 
float ipix,opix; 
double d1,d2,d3,d4,d5; 
fcalcpixsr(f,nf,nr,nc,picin,picout) 
float **picin,**picout; 
{ 
float *ipixpt,*opixpt; 
ipixpt= *picin; opixpt= *picout; 
for(r1=r=0;r1<nr;r1++,r=r1) 
for(c1=c=0;c1<nc;c1++,c=c1) 
{r=r1;c=c1; 
opix = ipix = *ipixpt++; 
opix = exp10(ipix);
*opixpt++ = opix; 
} 
return(0); 
}