| /dports/math/math77/MATH77/ |
| H A D | xerbla.f | 14 integer MEEMES, MERET, MACT(5), IDAT(1) local
15 parameter (MEEMES=52, MERET=52)
20 data MACT / MEEMES, 87, 1, 0, MERET /
|
| H A D | umess.f | 44 3 MEERRS, MECONT, MERET , MEEMES, METEXT, METABL, MERES3, MEIVCI, local
54 parameter (MECONT=50, MERET=51,MEEMES=52,METEXT=53,MEFSPV=54,
|
| H A D | optchk.f | 134 integer MENTXT, MEIDAT, MECONT, MERET, MEEMES, METEXT, MEIMAT, local
140 parameter (MEEMES =52)
170 data MACT / MEEMES,0,1,LTXTAD, MEIDAT, 2, MENTXT,LTXTAB, METEXT,
|
| H A D | dxrk8g.f | 69 integer MERET, MEEMES local
70 parameter (MERET=51, MEEMES=52)
92 data MACT / MEEMES, 36, 0, 0, MERET /
|
| H A D | sxrk8g.f | 69 integer MERET, MEEMES local
70 parameter (MERET=51, MEEMES=52)
92 data MACT / MEEMES, 36, 0, 0, MERET /
|
| H A D | dintop.f | 175 INTEGER MEMDA1, MEMDA2, MERET, MEEMES, MEIVEC local
179 PARAMETER (MEEMES =52)
194 DATA MACT / MEMDA1,0,MEMDA2, 0,MEEMES,77,4,0,MEIVEC,0,MERET /
|
| H A D | sintop.f | 175 INTEGER MEMDA1, MEMDA2, MERET, MEEMES, MEIVEC local
179 PARAMETER (MEEMES =52)
194 DATA MACT / MEMDA1,0,MEMDA2, 0,MEEMES,77,4,0,MEIVEC,0,MERET /
|
| H A D | divag.f | 93 integer MEMDA1, MERET, MEEMES local
96 parameter (MEEMES =52)
108 data MACT / MEMDA1, 0, MEEMES, 68, 24, 0, MERET /
|
| H A D | sivag.f | 93 integer MEMDA1, MERET, MEEMES local
96 parameter (MEEMES =52)
108 data MACT / MEMDA1, 0, MEEMES, 68, 24, 0, MERET /
|
| H A D | dzero.f | 226 integer MERET, MEEMES, METEXT local
232 parameter (MEEMES =52)
259 data MACT / MEEMES, 0, 0, 0, MERET /
|
| H A D | dintma.f | 328 INTEGER MERET, MEEMES local
330 PARAMETER (MEEMES =52)
348 DATA MACT / MEEMES, 88, 0, 0, MERET /
|
| H A D | sintma.f | 328 INTEGER MERET, MEEMES local
330 PARAMETER (MEEMES =52)
348 DATA MACT / MEEMES, 88, 0, 0, MERET /
|
| H A D | szero.f | 226 integer MERET, MEEMES, METEXT local
232 parameter (MEEMES =52)
259 data MACT / MEEMES, 0, 0, 0, MERET /
|
| H A D | dinto.f | 269 INTEGER MENTXT, MEFDAT, MECONT, MERET, MEEMES, METEXT, MEFVEC, local
275 PARAMETER (MEEMES =52)
425 DATA MACTER / MEEMES, 0, 0, -1, MECONT /
|
| H A D | sinto.f | 269 INTEGER MENTXT, MEFDAT, MECONT, MERET, MEEMES, METEXT, MEFVEC, local
275 PARAMETER (MEEMES =52)
425 DATA MACTER / MEEMES, 0, 0, -1, MECONT /
|
| H A D | dxrk8.f | 872 integer MENTXT, MECONT, MERET, MEEMES, METEXT, MEIVEC, MEFVEC local
873 parameter (MENTXT=23, MECONT= 50, MERET=51, MEEMES=52, METEXT=53,
917 data MACT /MEEMES, 47, 0, 0, MECONT /
1621 integer MEDDIG, MENTXT, MEFDAT, MERET, MEEMES, METEXT, MEFVEC local
1622 parameter (MEDDIG=12, MENTXT=23, MEFDAT=25, MERET=51, MEEMES=52,
1693 data MACT / MEEMES, 0, 0, 0, MERET /
1702 data MACT3 / MEEMES, 24, 0, 0, MERET /
2719 integer MENTXT, MERET, MEEMES, METEXT, MEFVEC local
2720 parameter (MENTXT=23, MERET=51, MEEMES=52, METEXT=53,
2743 data MACT / MEEMES, 24, 28, 0, MERET /
|
| H A D | dilup.f | 320 integer MECONT,MEMDA1,MERET,MEEMES,METEXT,MEIVEC local
324 parameter (MEEMES =52)
370 data MACT / MEEMES,0,0,0, MECONT /
|
| H A D | dilupm.f | 341 integer MEMDA1, MECONT, MERET, MEEMES, METEXT, MEIVEC, MEFVEC local
345 parameter (MEEMES =52)
412 data MACT / MEEMES,0,0,0, MECONT, MEMDA1,0, METEXT, MEIVEC, 0,
|
| H A D | silupm.f | 341 integer MEMDA1, MECONT, MERET, MEEMES, METEXT, MEIVEC, MEFVEC local
345 parameter (MEEMES =52)
412 data MACT / MEEMES,0,0,0, MECONT, MEMDA1,0, METEXT, MEIVEC, 0,
|
| H A D | silup.f | 320 integer MECONT,MEMDA1,MERET,MEEMES,METEXT,MEIVEC local
324 parameter (MEEMES =52)
370 data MACT / MEEMES,0,0,0, MECONT /
|
| H A D | sxrk8.f | 872 integer MENTXT, MECONT, MERET, MEEMES, METEXT, MEIVEC, MEFVEC local
873 parameter (MENTXT=23, MECONT= 50, MERET=51, MEEMES=52, METEXT=53,
917 data MACT /MEEMES, 47, 0, 0, MECONT /
1621 integer MEDDIG, MENTXT, MEFDAT, MERET, MEEMES, METEXT, MEFVEC local
1622 parameter (MEDDIG=12, MENTXT=23, MEFDAT=25, MERET=51, MEEMES=52,
1693 data MACT / MEEMES, 0, 0, 0, MERET /
1702 data MACT3 / MEEMES, 24, 0, 0, MERET /
2719 integer MENTXT, MERET, MEEMES, METEXT, MEFVEC local
2720 parameter (MENTXT=23, MERET=51, MEEMES=52, METEXT=53,
2743 data MACT / MEEMES, 24, 28, 0, MERET /
|
| H A D | diva.f | 1011 parameter (MEEMES =52)
1562 integer MACT(17), MLOC(8), MENTXT, MERET, MEEMES, METEXT local
1565 parameter (MEEMES =52)
1618 data MACT / MEEMES,0,0,0, MENTXT,0, METEXT, MENTXT,0, METEXT,
3653 integer MENTXT, MERET, MEEMES, METEXT local
3656 parameter (MEEMES =52)
3673 data MACT / MEEMES,0,0,0, MENTXT,0, METEXT, MERET /
4011 integer MECONT, MERET, MEEMES, MEIVEC local
4014 parameter (MEEMES =52)
4030 data MACT / MEEMES, 88, 24, 0, MEIVEC, 0, MERET /
[all …]
|
| H A D | siva.f | 1009 parameter (MEEMES =52)
1560 integer MACT(17), MLOC(8), MENTXT, MERET, MEEMES, METEXT local
1563 parameter (MEEMES =52)
1616 data MACT / MEEMES,0,0,0, MENTXT,0, METEXT, MENTXT,0, METEXT,
3651 integer MENTXT, MERET, MEEMES, METEXT local
3654 parameter (MEEMES =52)
3671 data MACT / MEEMES,0,0,0, MENTXT,0, METEXT, MERET /
4009 integer MECONT, MERET, MEEMES, MEIVEC local
4012 parameter (MEEMES =52)
4028 data MACT / MEEMES, 88, 24, 0, MEIVEC, 0, MERET /
[all …]
|
| /dports/math/math77/MATH77/demo/ |
| H A D | drdmess.f | 13 integer MERET, MEEMES, MESTOP, MEELIN variable
15 parameter (MEEMES =52)
39 data MACT / MEEMES,25,0,0, MERET /
|
| H A D | drsmess.f | 13 integer MERET, MEEMES, MESTOP, MEELIN variable
15 parameter (MEEMES =52)
39 data MACT / MEEMES,25,0,0, MERET /
|