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/chtoin.cpp $
5 $LastChangedRevision: 85 $
6 $Date: 2014-07-02 16:07:08 -0400 (Wed, 02 Jul 2014) $
8 ***********************************************************
10 CONVERT A NUMERIC CHARACTER INTO A DIGIT
11 REVISED BY G. FRIEDER, JULY 1981
19 INTEGER chtoin(CHAR hol)
22 { '0', '1', '2', '3', '4', '5', '6', '7', '8', '9' };
25 for (i = 0; i < 10; i++)