#include "track.h"
play(p,n_args)
float *p;

{
	float sig[LSLICE];
	float tphi[50][5][8],tpsi[50][6][8];
	float tgamph[50][5],tgamps[50][6];
	float freq[50];
	float getpch(),getrms();
	float pchlow,pchigh,input[4];
	int i,n;
	double rmsm,freqm,rmsx,freqx;

	pchlow=200; pchigh=300;
	printf(" 1ot here\n");
/*	ptable(pchlow,pchigh,tphi,tpsi,tgamph,tgamps,freq,n); */
	printf(" 2ot here\n");
	setnot(p[0],p[1],0);
	printf(" 3ot here\n");
	for(i=0; i<500; i++){
/*	getin(input,0); */
	sig[i] = input[0]; }
	printf(" 4ot here\n");
 /*	freqm = getpch(sig,tphi,tpsi,tgamph,tgamps,freq,n);   */
	printf(" 5ot here\n");
/*	rmsm = getrms(sig);   */
	printf("amp = %f pch = %f\n ",rmsm,freqm);
}