0?0000800?      0001                    1
0?0000800?      0002                    1 add function title routine
0?0000800?      0003                    1 temporaly stored in ji table
0?0000800?      0004                    1
0?0000800?      0005                    1 missing from original listing
0?0000800?      0006                    1 rewritten by roberto sancho
0?0000800?      0007                    1 in may 2018
0?0000800?      0008                    1
0?0000800?      0009                           blr 0000  1999
0?0000800?      0010                    1
0?0000800?      0011                           bla 1500  1519
0?0000800?      0012                           regr1951  1960 read band
0?0000800?      0013                           equone    0066
0?0000800?      0014                           equcnakb  1140
0?0000800?      0015                           equreset  0228
0?0000800?      0016                    1
0?0000800?      0017                           equfstp6  1000
0?0000800?      0018                           equfstp7  1002
0?0000800?      0019                           equfnnum  1160
0?0000800?      0020                    1
0?0000800?      0021                           synaddfn  1500 entry pt
0?0000800?      0022                    1
6I1954195C      0023241500800?651160151E  addfnralfnnum       if no fn
6I1954195C      0024241515800?451518151I       nze      fnl1   go fnl1
6I1954195C      0025241518800?161140150A       slocnakb       hlt 6 if
6I1954195C      0026241501800?461504100?       bmi      fstp6  10 fn def
6I1954195C      0027241504800?651160151F       ralfnnum       hlt 7 if
6I1954195C      0028241516800?151502800B       alo       8002  not in
6I1954195C      0029241502800?601149150C       rau 1149        alphabtic
6I1954195C      0030241503800?111952150G       supr0002        order
6I1954195C      0031241507800?461519100B       bmifnl1  fstp7
6I1954195C      0032241519800?651160151G  fnl1 ralfnnum
6I1954195C      0033241517800?101952150H       aupr0002       store
6I1954195C      0034241508800?151511800B       alo       8002  fort fn
6I1954195C      0035241511800?211150150E       stu 1150        name
6I1954195C      0036241505800?651160150F       ralfnnum       incr num
6I1954195C      0037241506800?150066150I       aloone          of defnd
6I1954195C      0038241509800?201160151C       stlfnnum        functs
6I1954195C      0039241513800?101953151?       aupr0003       store
6I1954195C      0040241510800?151514800B       alo       8002  it fn
6I1954195C      0041241514800?211160151B       stu 1160 fnl2   name
6I1954195C      0042241512800?701951022H  fnl2 rd1 1951 reset continue
0?0000800?      0043                    1
6I1954195C      0044241000800?010006999I  fstp6hlt 0006  fnl2
6I1954195C      0045241002800?010007999I  fstp7hlt 0007  fnl2
6I1954195C      0046241160800?000000000?  fnnum 00 0000  0000
0?0000800?      0047                    1
0?0000800?      0048                    1 load fortran functions in tabl
0?0000800?      0049                    1
6I1954195C      0050241150800?000073756F   1150alf  lnf soap2 fortran
6I1954195C      0051241151800?006162826F   1151alf absf soap2 func names
6I1954195C      0052241152800?006376826F   1152alf cosf soap2 in ascendi
6I1954195C      0053241153800?006587776F   1153alf expf soap2 order
6I1954195C      0054241154800?006975836F   1154alf intf soap2
6I1954195C      0055241155800?007376676F   1155alf logf soap2 right just
6I1954195C      0056241156800?007461876F   1156alf maxf soap2
6I1954195C      0057241157800?008269756F   1157alf sinf soap2
6I1954195C      0058241158800?658777756F   1158alfexpnf soap2
6I1954195C      0059241159800?827879836F   1159alfsqrtf soap2
0?0000800?      0060                    1
6I1954195C      0061241161800?939090657B   1161alf300ek soap2 correspond
6I1954195C      0062241162800?929465720?   1162alf24ek  soap2 func names
6I1954195C      0063241163800?929165720?   1163alf21ek  soap2 left justi
6I1954195C      0064241164800?926572000?   1164alf2ek   soap2
6I1954195C      0065241165800?929565720?   1165alf25ek  soap2
6I1954195C      0066241166800?916572000?   1166alf1ek   soap2
6I1954195C      0067241167800?929665720?   1167alf26ek  soap2
6I1954195C      0068241168800?929265720?   1168alf22ek  soap2
6I1954195C      0069241169800?939091657B   1169alf301ek soap2
6I1954195C      0070241170800?929365720?   1170alf23ek  soap2
0?0000800?      0071                    1