Searched refs:DMUMPS_LBUFR_BYTES8 (Results 1 – 2 of 2) sorted by relevance
/dports/math/mumps/mumps-5.1.2/src/ |
H A D | dtools.F | 445 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 D | dfac_driver.F | 82 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))
|