Home
last modified time | relevance | path

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

/dports/math/mumps/mumps-5.1.2/src/
H A Ddtools.F445 INTEGER(8) :: DMUMPS_LBUFR_BYTES8, DMUMPS_LBUF8 local
572 DMUMPS_LBUFR_BYTES8 = int(KEEP(44),8) * int(KEEP(35),8)
573 DMUMPS_LBUFR_BYTES8 = max( DMUMPS_LBUFR_BYTES8,
580 DMUMPS_LBUFR_BYTES8 = DMUMPS_LBUFR_BYTES8
582 & dble(DMUMPS_LBUFR_BYTES8)/100D0,8)
583 DMUMPS_LBUFR_BYTES8 = min(DMUMPS_LBUFR_BYTES8,
585 NB_BYTES = NB_BYTES + DMUMPS_LBUFR_BYTES8
593 DMUMPS_LBUF8 = max(DMUMPS_LBUF8, DMUMPS_LBUFR_BYTES8+
H A Ddfac_driver.F82 INTEGER(8) DMUMPS_LBUFR_BYTES8, DMUMPS_LBUF8 local
1917 DMUMPS_LBUFR_BYTES8 = int(KEEP( 44 ),8) * int(KEEP( 35 ), 8)
1922 DMUMPS_LBUFR_BYTES8 = max( DMUMPS_LBUFR_BYTES8,
1949 DMUMPS_LBUFR_BYTES8 = DMUMPS_LBUFR_BYTES8
1951 & dble(DMUMPS_LBUFR_BYTES8)/100D0, 8)
1952 DMUMPS_LBUFR_BYTES8 = min(DMUMPS_LBUFR_BYTES8,
1954 DMUMPS_LBUFR_BYTES = int( DMUMPS_LBUFR_BYTES8 )
1984 DMUMPS_LBUF8 = max(DMUMPS_LBUF8, DMUMPS_LBUFR_BYTES8+3*KEEP(34))