PGA300PinToDUTConfigPinImpl.mesa
Copyright (C) 1986 by Xerox Corporation. All rights reserved.
Last Edited by: Gasbarro October 22, 1987 3:19:09 pm PDT
DIRECTORY
ICTest, PGA300PinToDUTConfigPin;
PGA300PinToDUTConfigPinImpl: CEDAR PROGRAM
EXPORTS PGA300PinToDUTConfigPin
~ BEGIN
a: ARRAY ICTest.ProbeCardPin OF ICTest.DUTHeader;
Map:
PUBLIC PROC [p: ICTest.ProbeCardPin]
RETURNS [ICTest.DUTHeader] ~ {
RETURN[a[p]];
};
ReverseMap:
PUBLIC PROC [d: ICTest.DUTHeader]
RETURNS [ICTest.ProbeCardPin] ~ {
FOR i: NAT
IN ICTest.ProbeCardPin
DO
IF a[i]=d THEN RETURN[i];
ENDLOOP;
RETURN[240];
};
a ← [207, 206, 205, 204, 0, 203, 0, 202, 201,
200, 199, 198, 213, 197, 196, 180, 195, 179, 194,
178, 193, 177, 224, 223, 222, 221, 220, 219, 218,
217, 216, 215, 214, 228, 227, 212, 122, 211, 226,
210, 225, 209, 28, 23, 29, 32, 31, 30, 24,
89, 88, 87, 86, 107, 106, 109, 108, 105, 104,
0, 102, 0, 18, 45, 19, 22, 21, 20, 0,
103, 101, 0, 46, 0, 0, 100, 98, 0, 0,
0, 97, 136, 0, 0, 135, 0, 0, 134, 0,
133, 0, 0, 132, 131, 0, 0, 0, 130, 120,
40, 35, 119, 128, 41, 44, 43, 42, 36, 85,
84, 83, 82, 81, 90, 95, 94, 93, 92, 91,
111, 110, 62, 57, 63, 34, 33, 64, 58, 121,
160, 159, 158, 157, 156, 155, 154, 153, 148, 147,
146, 145, 144, 143, 142, 141, 140, 139, 138, 137,
113, 176, 175, 174, 173, 172, 171, 170, 169, 168,
167, 166, 161, 162, 163, 164, 26, 25, 27, 60,
61, 74, 75, 76, 77, 78, 123, 124, 125, 126,
127, 165, 47, 48, 17, 37, 38, 39, 59, 49,
50, 51, 112, 96, 0, 65, 0, 66, 67, 68,
115, 116, 117, 0, 118, 150, 0, 151, 0, 0,
152, 69, 0, 0, 0, 70, 71, 0, 0, 72,
0, 0, 129, 0, 73, 0, 0, 99, 241, 0,
0, 0, 243, 245, 0, 0, 246, 244, 0, 0,
0, 247, 229, 0, 0, 230, 231, 0, 0, 0,
232, 0, 0, 233, 234, 0, 0, 0, 235, 236,
0, 0, 237, 0, 238, 208, 0, 239, 240, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0
];
END.