8 lines
193 B
Mathematica
8 lines
193 B
Mathematica
|
GECSA ;WISC/RFJ-old version 1.5 routine ;01 Nov 93
|
||
|
|
;;2.0;GCS;;MAR 14, 1995
|
||
|
|
Q
|
||
|
|
EN1 ; create a code sheet
|
||
|
|
D ^GECSEDIT Q
|
||
|
|
KEY ; keypunch a code sheet
|
||
|
|
D KEY^GECSEDIT Q
|