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/getden.cpp $
5 $LastChangedRevision: 80 $
6 $Date: 2014-07-01 21:01:54 -0400 (Tue, 01 Jul 2014) $
8 ***********************************************************
12 --- Subroutine to get thresholding density values t1 (lower limit) and t2
13 (upper limit) if valid density selection is specified in input,
14 otherwise set t1 = minus infinit ; t2 = plus infinity
17 // parameter (MXNREG = 40)
29 void Eval_class::getden(BOOLEAN* flagdw, INTEGER ObjJ)
33 REAL v1 = InFile.getnum(FALSE, &eol);
34 REAL v2 = InFile.getnum(FALSE, &eol);
36 // Set density range ifspecification is valid, otherwise set default
37 // density range from minus infinity to plus infinity
42 Obj[ObjJ].t1 = -Consts.infin;
43 Obj[ObjJ].t2 = Consts.infin;
48 // ERROR - lower threshold is greater than upper threshold
50 "\n **** lower density value is greater than the higher");
51 fprintf(output, "\n **** program aborted\n");
63 void Eval_class::getdens(BOOLEAN* flagdw, eval_Object_Node *o_node)
67 // Set density range ifspecification is valid, otherwise set default
68 // density range from minus infinity to plus infinity
70 REAL v1 = InFile.getnum(FALSE, &eol);
73 o_node->data.t1 = -Consts.infin;
74 o_node->data.t2 = Consts.infin;
79 REAL v2 = InFile.getnum(FALSE, &eol);
82 o_node->data.t1 = -Consts.infin;
83 o_node->data.t2 = Consts.infin;
90 // ERROR - lower threshold is greater than upper threshold
92 "\n **** lower density value is greater than the higher");
93 fprintf(output, "\n **** program aborted\n");