*DECK TCYBDEF 
      PROC TCYBDEF; 
      BEGIN 
      CONTROL STEXT;
                                                                         CYBERDE
                                                                         CYBERDE
#     THIS COMDECK CONTAINS ALL MACHINE ORIENTED DEFS FOR THE CYBER    # CYBERDE
#                                                                      # CYBERDE
#     ALL MACHINE DEPENDENCIES SHOULD BE NOTED IN THIS DECK WHETHER    # CYBERDE
#     OR NOT THE ACTUAL DEFINITION OCCURS WITHIN THIS DECK OR NOT.     # CYBERDE
#                                                                      # CYBERDE
#     THE NAMES FOR THESE DEFS ARE CHOSEN TO BE TWO (2) CHARACTERS     # CYBERDE
#     LONG SO THEY CAN BE USED IN THE PLACE OF NUMBERS IN ITEM         # CYBERDE
#     DECLARATIONS AND STILL LEAVE ROOM FOR COMMENTS ON THE SAME       # CYBERDE
#     LINE.  ALSO THE SHORT NAMES MINIMIZEES POSSIBLE CONFLICTS        # CYBERDE
#     OF THESE NAMES WITH EXISTING ITEM NAMES.                         # CYBERDE
                                                                         CYBERDE
                                                                         CYBERDE
      DEF AL #18#;                 #ADDRESS LENGTH IN BITS             # CYBERDE
      DEF CL # 6#;                 #CHARACTER LENGTH IN BITS           # CYBERDE
      DEF CS #64#;                 #CHARACTER SET SIZE = 2**CL         # CYBERDE
      DEF CW #10#;                 #CARD LENGTH IN WORDS 80 / WC       # CYBERDE
      DEF NC # 7#;                 #FILE NAME LENGTH IN CHARACTERS     # CYBERDE
      DEF NL #42#;                 #FILE NAME LENGTH IN BIET = NC * CL # CYBERDE
      DEF WC #10#;                 #WORD LENGTH IN CHARACTERS = WL / CL# CYBERDE
      DEF WL #60#;                 #WORD LENGTH IN BITS                # CYBERDE
      DEF ZL #42#;                 #NON-ADDRESS LENGTH IN BITS = WL-AL # CYBERDE
      END 
      TERM
