␣␣␣␣␣N = 14
  1. Definition
    00016 0 50000 0 00040 25 N CLAFIXONE EXP10018
  2. References (2)
    00013 0 10000 0 00016 22TZEN EXP10015
    00014 0 16200 0 00016 23TQPN EXP10016
␣␣␣ENZ = 9
  1. Definition
    00011 0 50000 0 00040 20 ENZ CLAFIXONE EXP10013
  2. Reference
    00006−0 10000 0 00011 17TNZENZ EXP10010
␣␣␣EXP = 33
  1. Definition
    00041 0 00000 0 00000 45 EXP EXP1003B
  2. References (6)
    00000 0 00000 0 00042 3PZEEXP+1 XP1/C03
    00004 0 62100 0 00041 15STAEXP EXP10008
    00005 0 50000 0 00041 16CLAEXP EXP10009
    00020 0 50000 0 00041 27 CLA1 CLAEXP IS POWER EXP10020
    00026 0 50000 0 00041 33 CLA2 CLAEXP EXP10026
    00030 0 60100 0 00041 35STOEXP EXP10028
␣␣CLA1 = 16
  1. Definition
    00020 0 50000 0 00041 27 CLA1 CLAEXP IS POWER EXP10020
  2. Reference
    00035 0 02000 0 00020 40TRACLA1 EXP10033
␣␣CLA2 = 22
  1. Definition
    00026 0 50000 0 00041 33 CLA2 CLAEXP EXP10026
  2. Reference
    00022 0 02000 0 00026 29TRACLA2 NO EXP10022
␣␣EXIT = 30
  1. Definition
    00036 0 76300 0 00065 41 EXIT LLS53 EXP10034
  2. References (3)
    00010 0 02000 0 00036 19TRAEXIT EXP10012
    00015 0 02000 0 00036 24TRAEXIT EXP10017
    00031 0 10000 0 00036 36TZEEXIT EXP10029
␣EXP(1 = 0
  1. Definition
    9EXPONENTIATION SUBROUTINE EXP10002
    10FIXED POINT BASE, FIXED POINT EXPONENT EXP10003
    00000 0 10000 4 00001 11 EXP(1 TZE1,4 EXIT FOR ZERO BASE EXP10004
␣POWER = 32767
  1. Definition
    77777 46 POWER SYN−1 EXP10039
  2. References (6)
    00002 0 60100 0 77777 13STOPOWER SAVE BASE EXP10006
    00012−0 40000 0 77777 21SBMPOWER EXP10014
    00023 0 56000 0 77777 30LDQPOWER YEB EXP10023
    00032 0 56000 0 77777 37LDQPOWER COMPUTE EXP10030
    00033 0 20000 0 77777 38MPYPOWER NEXT EXP10031
    00034−0 60000 0 77777 39STQPOWER POWER EXP10032
FACTOR = 32766
  1. Definition
    77776 47FACTOR SYN−2 EXP10040
  2. References (4)
    00001 0 00000 0 77776 4PZEFACTOR XP1/C04
    00017 0 60100 0 77776 26STOFACTOR X EXP10019
    00024 0 20000 0 77776 31MPYFACTOR EXP10024
    00025−0 60000 0 77776 32STQFACTOR EXP10025
FIXONE = 32
  1. Definition
    43WORKING STORAGE EXP10036
    00040+000000000001 44FIXONE DEC1 EXP10037
  2. References (3)
    00007 0 56000 0 00040 18LDQFIXONE EXP10011
    00011 0 50000 0 00040 20 ENZ CLAFIXONE EXP10013
    00016 0 50000 0 00040 25 N CLAFIXONE EXP10018