Trailing-Edge
-
PDP-10 Archives
-
decuslib20-04
-
decus/20-0110/prcmax.req
There are 2 other files named prcmax.req in the archive. Click here to see a list.
00100 COMMENT
00200
00300 File: PRCMAX.REQ
00400
00500
00600 P. LEMKIN, B. SHAPIRO, R. GORDON, L. LIPKIN
00700
00800 IMAGE PROCESSING UNIT
00900
01000 DIVISION OF CANCER BIOLOGY AND DIAGNOSIS
01100 NATIONAL CANCER INSTITUTE
01200 NATIONAL INSTITUTES OF HEALTH
01300 BETHESDA, MD 20014
01400
01500
01600 301-496-2394
01700
01800
01850 Revised April 6, 1976
01900 Introduction
02000 ----------------
02100 PRCMAX.REQ contains the sizes of the various data
02200 structure arrays for PROC10 as well as the DEBUG macro and the
02300 LEAP item and print name requires.
02400 ;
02500 Define max!number!pix = "36";
02600 Define max!number!masknames = "36";
02700 Define max!number!computing!windows = "36";
02800 Define max!number!boundaries="300";
02850 Define max!number!transforms="100";
02900
03000 Define max!number!special!commands = "44";
03100 Define max!number!pixops = "50";
03200 Define max!number!maskops = "33";
03300 Define max!number!boundaryops = "33";
03400
03500 Require 4090 NEW!ITEMS;
03600 Require 4090 PNAMES;
03700
03800
03900 Define DEBUG(sss) = "If db Then Begin
04000 Outstr(crlf&sss&crlf);
04100 if db=2 Then Return;
04200 End;";
04300