ASMB,L
      NAM RPTBL 91711-16007  REV 1926  790605 
* 
      ENT EBASE 
      EXT .FAD,.FSB,.FMP,.FDV,IFIX,FLOAT
      EXT .DLD,.DST,.MPY,.DIV 
      EXT .MVW,.CMW,.LBT,.SBT 
* 
      ENT FBAS1 
      ENT FBAS2 
      EXT .XADD,.XSUB,.XMPY,.XDIV,.TADD,.TSUB,.TMPY,.TDIV 
      EXT .FIXD,.FLTD,.XFXS,.DINT,.FIXD,.XFXD,.XFTS,.IDBL 
      EXT .FLTD,.XFTD,.TFXS,.TINT,.TFXD,.TFTS,.ITBL,.TFTD 
* 
      ENT SIS1
      EXT TAN,SQRT,ALOG,ATAN,COS,SIN,EXP,ALOGT,TANH 
* 
      ENT SIS2
      EXT DPOLY,/CMRT,/ATLG,.FPWR,.TPWR 
* 
      ENT FFP 
      EXT DBLE,SNGL,.DFER,.XFER,.XPAK,.XCOM,..DCM,DDINT 
      EXT .GOTO,..MAP,.ENTR,.ENTP,.PWR2,.FLUN,.PACK,$SETP 
* 
      ENT FFPF1 
      EXT .CFER 
* 
      ENT FFPF2 
      EXT .BLE,.NGL,..FCM,..TCM 
* 
      ENT FFPE1 
      ENT FFPE2 
      EXT XADD,XSUB,XMPY,XDIV 
* 
      ENT DBI 
      EXT .DAD,.DSB,.DMP,.DDI,.DSBR,.DDIR,.DNG,.DIN 
      EXT .DDE,.DIS,.DDS,.DCO 
* 
      ENT VIS 
      EXT .VECT,VPIV,VABS,VSUM,VNRM,VDOT,VMAX,VMAB
      EXT VMIN,VMIB,VMOV,VSWP,.ERES,.ESEG,.VSET 
      EXT .DVCT,DVPIV,DVABS,DVSUM,DVNRM,DVDOT 
      EXT DVMAX,DVMAB,DVMIN,DVMIB,DVMOV,DVSWP 
* 
      ENT EMA 
      EXT .EMAP,MMAP,.EMIO
* 
      SKP 
**********************************************************************
* 
*     HP1000 E-SERIES BASE SET
* 
EBASE ASC 3,.FAD
      JSB .FAD
      OCT 105000
* 
      ASC 3,.FSB
      JSB .FSB
      OCT 105020
* 
      ASC 3,.FMP
      JSB .FMP
      OCT 105040
* 
      ASC 3,.FDV
      JSB .FDV
      OCT 105060
* 
      ASC 3,IFIX
      JSB IFIX
      OCT 105100
* 
      ASC 3,FLOAT 
      JSB FLOAT 
      OCT 105120
* 
      ASC 3,.DLD
      JSB .DLD
      OCT 104200
* 
      ASC 3,.DST
      JSB .DST
      OCT 104400
      SKP 
      ASC 3,.MPY
      JSB .MPY
      OCT 100200
* 
      ASC 3,.DIV
      JSB .DIV
      OCT 100400
* 
      ASC 3,.MVW
      JSB .MVW
      OCT 105777
* 
      ASC 3,.CMW
      JSB .CMW
      OCT 105776
* 
      ASC 3,.LBT
      JSB .LBT
      OCT 105763
* 
      ASC 3,.SBT
      JSB .SBT
      OCT 105764
* 
      OCT 0         END OF TABLE
* 
**********************************************************************
      SKP 
**********************************************************************
* 
*     HP1000 F-SERIES BASE SET
* 
FBAS1 ASC 3,.XADD 
      JSB .XADD 
      OCT 105001
* 
      ASC 3,.XSUB 
      JSB .XSUB 
      OCT 105021
* 
      ASC 3,.XMPY 
      JSB .XMPY 
      OCT 105041
* 
      ASC 3,.XDIV 
      JSB .XDIV 
      OCT 105061
* 
FBAS2 ASC 3,.FIXD 
      JSB .FIXD 
      OCT 105104
* 
      ASC 3,.FLTD 
      JSB .FLTD 
      OCT 105124
* 
      ASC 3,.XFXS 
      JSB .XFXS 
      OCT 105101
* 
      ASC 3,.DINT 
      JSB .DINT 
      OCT 105101
      SKP 
* 
      ASC 3,.XFXD 
      JSB .XFXD 
      OCT 105105
* 
      ASC 3,.XFTS 
      JSB .XFTS 
      OCT 105121
* 
      ASC 3,.IDBL 
      JSB .IDBL 
      OCT 105121
* 
      ASC 3,.XFTD 
      JSB .XFTD 
      OCT 105125
* 
      ASC 3,.TADD 
      JSB .TADD 
      OCT 105002
* 
      ASC 3,.TSUB 
      JSB .TSUB 
      OCT 105022
* 
      ASC 3,.TMPY 
      JSB .TMPY 
      OCT 105042
* 
      ASC 3,.TDIV 
      JSB .TDIV 
      OCT 105062
* 
      ASC 3,.TFXS 
      JSB .TFXS 
      OCT 105102
      SKP 
      ASC 3,.TINT 
      JSB .TINT 
      OCT 105102
* 
      ASC 3,.TFXD 
      JSB .TFXD 
      OCT 105106
* 
      ASC 3,.TFTS 
      JSB .TFTS 
      OCT 105122
* 
      ASC 3,.ITBL 
      JSB .ITBL 
      OCT 105122
* 
      ASC 3,.TFTD 
      JSB .TFTD 
      OCT 105126
* 
      OCT 0         END OF TABLE
* 
**********************************************************************
      SKP 
**********************************************************************
* 
*     SCIENTIFIC INSTRUCTION SET. 
* 
SIS1  ASC 3,TAN 
      JSB TAN 
      OCT 105320
* 
      ASC 3,SQRT
      JSB SQRT
      OCT 105321
* 
      ASC 3,ALOG
      JSB ALOG
      OCT 105322
* 
      ASC 3,ATAN
      JSB ATAN
      OCT 105323
* 
      ASC 3,COS 
      JSB COS 
      OCT 105324
* 
      ASC 3,SIN 
      JSB SIN 
      OCT 105325
* 
      ASC 3,EXP 
      JSB EXP 
      OCT 105326
      SKP 
      ASC 3,ALOGT 
      JSB ALOGT 
      OCT 105327
* 
      ASC 3,TANH
      JSB TANH
      OCT 105330
* 
      OCT 0         END OF TABLE
* 
**********************************************************************
* 
SIS2  ASC 3,DPOLY 
      JSB DPOLY 
      OCT 105331
* 
      ASC 3,/CMRT 
      JSB /CMRT 
      OCT 105332
* 
      ASC 3,/ATLG 
      JSB /ATLG 
      OCT 105333
* 
      ASC 3,.FPWR 
      JSB .FPWR 
      OCT 105334
* 
      ASC 3,.TPWR 
      JSB .TPWR 
      OCT 105335
* 
      OCT 0         END OF TABLE
* 
**********************************************************************
      SKP 
**********************************************************************
* 
* EXTENDED MEMORY AREA
* 
EMA   ASC 3,.EMAP 
      JSB .EMAP 
      OCT 105257
* 
      ASC 3,.EMIO 
      JSB .EMIO 
      OCT 105240
* 
      ASC 3,MMAP
      JSB MMAP
      OCT 105241
* 
      OCT 0         END OF TABLE
* 
**********************************************************************
      SKP 
**********************************************************************
* 
*     COMMON FAST FORTRAN PROCESSOR 
* 
FFP   ASC 3,DBLE
      JSB DBLE
      OCT 105201
* 
      ASC 3,SNGL
      JSB SNGL
      OCT 105202
* 
      ASC 3,.DFER 
      JSB .DFER 
      OCT 105205
* 
      ASC 3,.XFER 
      JSB .XFER 
      OCT 105220
* 
      ASC 3,.XPAK 
      JSB .XPAK 
      OCT 105206
* 
      ASC 3,.XCOM 
      JSB .XCOM 
      OCT 105215
* 
      ASC 3,..DCM 
      JSB ..DCM 
      OCT 105216
* 
      ASC 3,DDINT 
      JSB DDINT 
      OCT 105217
      SKP 
      ASC 3,.GOTO 
      JSB .GOTO 
      OCT 105221
* 
      ASC 3,..MAP 
      JSB ..MAP 
      OCT 105222
* 
      ASC 3,.ENTR 
      JSB .ENTR 
      OCT 105223
* 
      ASC 3,.ENTP 
      JSB .ENTP 
      OCT 105224
* 
      ASC 3,.PWR2 
      JSB .PWR2 
      OCT 105225
* 
      ASC 3,.FLUN 
      JSB .FLUN 
      OCT 105226
* 
      ASC 3,.PACK 
      JSB .PACK 
      OCT 105230
* 
      ASC 3,$SETP 
      JSB $SETP 
      OCT 105227
* 
      OCT 0         END OF TABLE
* 
**********************************************************************
      SKP 
**********************************************************************
* 
*     E-SERIES FFP ADDITIONS
* 
FFPE1 ASC 3,.XADD 
      JSB .XADD 
      OCT 105213
* 
      ASC 3,.XSUB 
      JSB .XSUB 
      OCT 105214
* 
      ASC 3,.XMPY 
      JSB .XMPY 
      OCT 105203
* 
      ASC 3,.XDIV 
      JSB .XDIV 
      OCT 105204
* 
      OCT 0         END OF TABLE
* 
**********************************************************************
      SKP 
**********************************************************************
* 
*     E-SERIES FFP ADDITIONS
* 
FFPE2 ASC 3,XADD
      JSB XADD
      OCT 105207
* 
      ASC 3,XSUB
      JSB XSUB
      OCT 105210
* 
      ASC 3,XMPY
      JSB XMPY
      OCT 105211
* 
      ASC 3,XDIV
      JSB XDIV
      OCT 105212
* 
      OCT 0         END OF TABLE
* 
**********************************************************************
      SKP 
**********************************************************************
* 
*     F-SERIES FFP ADDITIONS
* 
FFPF1 ASC 3,.CFER 
      JSB .CFER 
      OCT 105231
* 
      OCT 0         END OF TABLE
* 
**********************************************************************
* 
*     F-SERIES FFP ENHANCEMENTS 
* 
FFPF2 ASC 3,.BLE
      JSB .BLE
      OCT 105207
* 
      ASC 3,.NGL
      JSB .NGL
      OCT 105214
* 
      ASC 3,..FCM 
      JSB ..FCM 
      OCT 105232
* 
      ASC 3,..TCM 
      JSB ..TCM 
      OCT 105233
* 
      OCT 0         END OF TABLE
* 
**********************************************************************
      SKP 
**********************************************************************
* 
*     DOUBLE INTEGER INSTRUCTIONS 
* 
DBI   ASC 3,.DAD
      JSB .DAD
      OCT 105014
* 
      ASC 3,.DSB
      JSB .DSB
      OCT 105034
* 
      ASC 3,.DMP
      JSB .DMP
      OCT 105054
* 
      ASC 3,.DDI
      JSB .DDI
      OCT 105074
* 
      ASC 3,.DSBR 
      JSB .DSBR 
      OCT 105114
* 
      ASC 3,.DDIR 
      JSB .DDIR 
      OCT 105134
* 
      ASC 3,.DNG
      JSB .DNG
      OCT 105203
* 
      ASC 3,.DIN
      JSB .DIN
      OCT 105210
      SKP 
      ASC 3,.DDE
      JSB .DDE
      OCT 105211
* 
      ASC 3,.DIS
      JSB .DIS
      OCT 105212
* 
      ASC 3,.DDS
      JSB .DDS
      OCT 105213
* 
      ASC 3,.DCO
      JSB .DCO
      OCT 105204
* 
      OCT 0         END OF TABLE
* 
**********************************************************************
      SKP 
**********************************************************************
* 
*     VECTOR INSTRUCTION SET
* 
VIS   ASC 3,.VECT 
      JSB .VECT 
      OCT 101460
* 
      ASC 3,VPIV
      JSB VPIV
      OCT 101461
* 
      ASC 3,VABS
      JSB VABS
      OCT 101462
* 
      ASC 3,VSUM
      JSB VSUM
      OCT 101463
* 
      ASC 3,VNRM
      JSB VNRM
      OCT 101464
* 
      ASC 3,VDOT
      JSB VDOT
      OCT 101465
* 
      ASC 3,VMAX
      JSB VMAX
      OCT 101466
* 
      ASC 3,VMAB
      JSB VMAB
      OCT 101467
      SKP 
      ASC 3,VMIN
      JSB VMIN
      OCT 101470
* 
      ASC 3,VMIB
      JSB VMIB
      OCT 101471
* 
      ASC 3,VMOV
      JSB VMOV
      OCT 101472
* 
      ASC 3,VSWP
      JSB VSWP
      OCT 101473
* 
      ASC 3,.ERES 
      JSB .ERES 
      OCT 101474
* 
      ASC 3,.ESEG 
      JSB .ESEG 
      OCT 101475
* 
      ASC 3,.VSET 
      JSB .VSET 
      OCT 101476
* 
      ASC 3,.DVCT 
      JSB .DVCT 
      OCT 105460
* 
      ASC 3,DVPIV 
      JSB DVPIV 
      OCT 105461
      SKP 
      ASC 3,DVABS 
      JSB DVABS 
      OCT 105462
* 
      ASC 3,DVSUM 
      JSB DVSUM 
      OCT 105463
* 
      ASC 3,DVNRM 
      JSB DVNRM 
      OCT 105464
* 
      ASC 3,DVDOT 
      JSB DVDOT 
      OCT 105465
* 
      ASC 3,DVMAX 
      JSB DVMAX 
      OCT 105466
* 
      ASC 3,DVMAB 
      JSB DVMAB 
      OCT 105467
* 
      ASC 3,DVMIN 
      JSB DVMIN 
      OCT 105470
* 
      ASC 3,DVMIB 
      JSB DVMIB 
      OCT 105471
      SKP 
      ASC 3,DVMOV 
      JSB DVMOV 
      OCT 105472
* 
      ASC 3,DVSWP 
      JSB DVSWP 
      OCT 105473
* 
      OCT 0         END OF TABLE
* 
**********************************************************************
      END 
                                      