Home
last modified time | relevance | path

Searched refs:ZMUMPS_LBUF_8 (Results 1 – 1 of 1) sorted by relevance

/dports/math/mumps/mumps-5.1.2/src/
H A Dzsol_driver.F80 INTEGER(8) :: ZMUMPS_LBUF_8 local
1663 ZMUMPS_LBUF_8 =
1667 ZMUMPS_LBUF_8 = min(ZMUMPS_LBUF_8, 100000000_8)
1670 ZMUMPS_LBUF_8 = max(ZMUMPS_LBUF_8,
1673 ZMUMPS_LBUF_8 = ZMUMPS_LBUF_8 + 2_8*int(KEEP(34),8)
1677 ZMUMPS_LBUF_8 = min(ZMUMPS_LBUF_8,
1681 ZMUMPS_LBUF = int(ZMUMPS_LBUF_8, kind(ZMUMPS_LBUF))