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/pseudo.cpp $
5 $LastChangedRevision: 80 $
6 $Date: 2014-07-01 21:01:54 -0400 (Tue, 01 Jul 2014) $
8 ***********************************************************
11 // COMPUTE THE PSEUDO PROJECTION OF RAY NR IN PROJECTION NP OF
23 REAL pseudo(REAL* pict, INTEGER np, INTEGER nr, INTEGER* list, REAL* weight,
24 INTEGER* numb, REAL* snorm, BOOLEAN line, BOOLEAN constr)
33 ray(np, nr, list, weight, numb, snorm);
37 wray(np, nr, list, weight, numb, snorm);
42 for (nb = 0; nb < *numb; nb++)
49 pictk = MAX0(pictk, Modefl.lower);
51 pictk = MIN0(pictk, Modefl.upper);
53 sum += pictk * weight[nb];
59 "\n pseudo np = %5i nr = %5i pseudo = %9.4f\n", np,