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/foru.h $
5 $LastChangedRevision: 85 $
6 $Date: 2014-07-02 16:07:08 -0400 (Wed, 02 Jul 2014) $
8 ***********************************************************
16 class foru_class: public alg_class
21 void bckwrd(REAL* recon);
22 void prjtrn(INTEGER np, REAL* vector, REAL* phi, REAL* dphi);
23 void intrpl(REAL ang1, REAL ang2, REAL dang1, REAL dang2, REAL* nold,
25 void frfilt(REAL* vector, INTEGER size1, INTEGER nfiltr, REAL cutoff,
27 void error(INTEGER ktype);
28 void ftmap(REAL* vfrom, REAL* vto, BOOLEAN revers);
29 void fft(REAL* x, INTEGER* n, INTEGER invdir, REAL fact);
30 void ftfill(REAL* recon, REAL* g, INTEGER maxg1);
31 void unif(INTEGER icase, REAL ang1, REAL ang2, REAL* nold, REAL* new1);
32 void uint1(INTEGER icase, INTEGER ix, INTEGER iy, REAL ang1, REAL ang2,
33 REAL* pj1, REAL* pj2);
35 void vcase1(REAL ang1, REAL ang2, REAL* pj1, REAL* pj2);
36 void vcase2(REAL ang1, REAL ang2, REAL* pj1, REAL* pj2);
37 void vcase3(REAL ang1, REAL ang2, REAL* pj1, REAL* pj2);
38 void vcase4(REAL ang1, REAL ang2, REAL* pj1, REAL* pj2);
39 void vc56(INTEGER icase, REAL ang1, REAL ang2, REAL* pj1, REAL* pj2);
50 REAL* gr, // changed to pass address. Lajos, Feb 10, 2005
51 REAL* gi // changed to pass address. Lajos, Feb 10, 2005
54 void store(INTEGER ix, INTEGER iy, REAL gr, REAL gi);
57 BOOLEAN Run(REAL* recon, INTEGER* list, REAL* weight, INTEGER iter);