2 ***********************************************************
3 $SNARK_Header: S N A R K 1 4 - A PICTURE RECONSTRUCTION PROGRAM $
4 $HeadURL: svn://dig.cs.gc.cuny.edu/snark/trunk/src/snark/sinc.cpp $
5 $LastChangedRevision: 97 $
6 $Date: 2014-07-02 20:07:41 -0400 (Wed, 02 Jul 2014) $
8 ***********************************************************
10 SINC(X)=SIN(PI*X)/(PI*X)
23 if (fabs(x) < Consts.zero)
28 return (REAL) sin(Consts.pi * x) / (Consts.pi * x);