/dports/devel/plan9port/plan9port-1f098efb7370a0b28306d10681e21883fb1c1507/src/cmd/tapefs/ |
H A D | v6fs.c | 24 #define BLSIZE 512 macro 78 if (i%BLSIZE==0) in popdir() 79 cp = doread(r, i, BLSIZE); in popdir() 113 bno = off/BLSIZE; in doread() 114 off -= bno*BLSIZE; in doread() 122 cnt -= BLSIZE; in doread() 151 char buf[BLSIZE]; in iget() 158 if (read(tapefile, buf, BLSIZE) != BLSIZE) in iget() 184 memset(buf, 0, BLSIZE); in getblk() 188 if (read(tapefile, buf, BLSIZE) != BLSIZE) in getblk() [all …]
|
H A D | 32vfs.c | 24 int BLSIZE; variable 26 #define LNINDIR (BLSIZE/4) 56 BLSIZE = 512; /* 32v */ in populate() 61 BLSIZE = blocksize; in populate() 86 if (i%BLSIZE==0) in popdir() 121 bno = off/BLSIZE; in doread() 122 off -= bno*BLSIZE; in doread() 130 cnt -= BLSIZE; in doread() 166 if (read(tapefile, buf, BLSIZE) != BLSIZE) in iget() 195 if (read(tapefile, buf, BLSIZE) != BLSIZE) in getblk() [all …]
|
H A D | v10fs.c | 23 #define BLSIZE 4096 macro 77 if (i%BLSIZE==0) in popdir() 78 cp = doread(r, i, BLSIZE); in popdir() 112 bno = off/BLSIZE; in doread() 113 off -= bno*BLSIZE; in doread() 121 cnt -= BLSIZE; in doread() 150 char buf[BLSIZE]; in iget() 157 if (read(tapefile, buf, BLSIZE) != BLSIZE) in iget() 182 memset(buf, 0, BLSIZE); in getblk() 186 if (read(tapefile, buf, BLSIZE) != BLSIZE) in getblk() [all …]
|
/dports/math/mumps/mumps-5.1.2/src/ |
H A D | mumps_type2_blocking.F | 260 BLSIZE = 1 268 & BLSIZE ) 270 & int(BLSIZE,8)* int(SumNi+BLSIZE,8) ) 273 & BLSIZE ) 277 MAXSURFCB = MAXSURFCB + int(BLSIZE,8)*int(SumNi+BLSIZE,8) 298 & BLSIZE ) 300 & int(BLSIZE,8)* int(SumNi+BLSIZE,8 )) 303 & BLSIZE ) 306 MAXSURFCB = MAXSURFCB + int(BLSIZE,8)*int(SumNi+BLSIZE,8) 338 & BLSIZE [all …]
|
H A D | cfac_front_aux.F | 1588 INTEGER BLSIZE, ELSIZE local 1619 BLSIZE = KEEP(8) 1621 BLSIZE = LAST_VAR - IEND_BLOCK 1625 DO IROW = IEND_BLOCK+1, LAST_VAR, BLSIZE 1626 Block = min( BLSIZE, NASS - IROW + 1 ) 1639 DO IROW = IEND_BLOCK+1, LAST_VAR, BLSIZE 1640 Block = min( BLSIZE, LAST_VAR - IROW + 1 ) 1776 BLSIZE = KEEP(58) 1778 BLSIZE = NFRONT - NASS 1789 DO IROWEND = NFRONT - NASS, 1, -BLSIZE [all …]
|
H A D | sfac_front_aux.F | 1597 INTEGER BLSIZE, ELSIZE local 1628 BLSIZE = KEEP(8) 1630 BLSIZE = LAST_VAR - IEND_BLOCK 1634 DO IROW = IEND_BLOCK+1, LAST_VAR, BLSIZE 1635 Block = min( BLSIZE, NASS - IROW + 1 ) 1648 DO IROW = IEND_BLOCK+1, LAST_VAR, BLSIZE 1649 Block = min( BLSIZE, LAST_VAR - IROW + 1 ) 1785 BLSIZE = KEEP(58) 1787 BLSIZE = NFRONT - NASS 1798 DO IROWEND = NFRONT - NASS, 1, -BLSIZE [all …]
|
H A D | dfac_front_aux.F | 1597 INTEGER BLSIZE, ELSIZE local 1628 BLSIZE = KEEP(8) 1630 BLSIZE = LAST_VAR - IEND_BLOCK 1634 DO IROW = IEND_BLOCK+1, LAST_VAR, BLSIZE 1635 Block = min( BLSIZE, NASS - IROW + 1 ) 1648 DO IROW = IEND_BLOCK+1, LAST_VAR, BLSIZE 1649 Block = min( BLSIZE, LAST_VAR - IROW + 1 ) 1785 BLSIZE = KEEP(58) 1787 BLSIZE = NFRONT - NASS 1798 DO IROWEND = NFRONT - NASS, 1, -BLSIZE [all …]
|
H A D | zfac_front_aux.F | 1588 INTEGER BLSIZE, ELSIZE local 1619 BLSIZE = KEEP(8) 1621 BLSIZE = LAST_VAR - IEND_BLOCK 1625 DO IROW = IEND_BLOCK+1, LAST_VAR, BLSIZE 1626 Block = min( BLSIZE, NASS - IROW + 1 ) 1639 DO IROW = IEND_BLOCK+1, LAST_VAR, BLSIZE 1640 Block = min( BLSIZE, LAST_VAR - IROW + 1 ) 1776 BLSIZE = KEEP(58) 1778 BLSIZE = NFRONT - NASS 1789 DO IROWEND = NFRONT - NASS, 1, -BLSIZE [all …]
|
H A D | cfac_process_blocfacto_LDLT.F | 97 INTEGER IPOSK, JPOSK, NPIVSENT, Block, IROW, BLSIZE local 693 BLSIZE = KEEP(8) 695 BLSIZE = NROW1 698 DO IROW = 1, NROW1, BLSIZE 699 Block = min( BLSIZE, NROW1 - IROW + 1 )
|
H A D | dfac_process_blocfacto_LDLT.F | 97 INTEGER IPOSK, JPOSK, NPIVSENT, Block, IROW, BLSIZE local 693 BLSIZE = KEEP(8) 695 BLSIZE = NROW1 698 DO IROW = 1, NROW1, BLSIZE 699 Block = min( BLSIZE, NROW1 - IROW + 1 )
|
H A D | sfac_process_blocfacto_LDLT.F | 97 INTEGER IPOSK, JPOSK, NPIVSENT, Block, IROW, BLSIZE local 693 BLSIZE = KEEP(8) 695 BLSIZE = NROW1 698 DO IROW = 1, NROW1, BLSIZE 699 Block = min( BLSIZE, NROW1 - IROW + 1 )
|
H A D | zfac_process_blocfacto_LDLT.F | 97 INTEGER IPOSK, JPOSK, NPIVSENT, Block, IROW, BLSIZE local 693 BLSIZE = KEEP(8) 695 BLSIZE = NROW1 698 DO IROW = 1, NROW1, BLSIZE 699 Block = min( BLSIZE, NROW1 - IROW + 1 )
|
/dports/math/ipopt/Ipopt-3.12.13/ThirdParty/Mumps/MUMPS/src/ |
H A D | mumps_part9.F | 6611 BLSIZE = 1 6619 & BLSIZE ) 6621 & int(BLSIZE,8)* int(SumNi+BLSIZE,8) ) 6624 & BLSIZE ) 6628 MAXSURFCB = MAXSURFCB + int(BLSIZE,8)*int(SumNi+BLSIZE,8) 6649 & BLSIZE ) 6651 & int(BLSIZE,8)* int(SumNi+BLSIZE,8 )) 6654 & BLSIZE ) 6657 MAXSURFCB = MAXSURFCB + int(BLSIZE,8)*int(SumNi+BLSIZE,8) 6689 & BLSIZE [all …]
|
H A D | zmumps_part6.F | 987 INTEGER BLSIZE 1020 BLSIZE = KEEP(8) 1022 BLSIZE = NASS - JROW2 1157 BLSIZE = KEEP(58) 1159 BLSIZE = NFRONT - NASS 1723 BLSIZE = KEEP(8) 1725 BLSIZE = NROW1 1728 DO IROW = 1, NROW1, BLSIZE 2712 INTEGER BLSIZE 2741 BLSIZE = KEEP(8) [all …]
|
H A D | smumps_part6.F | 997 INTEGER BLSIZE 1030 BLSIZE = KEEP(8) 1032 BLSIZE = NASS - JROW2 1167 BLSIZE = KEEP(58) 1169 BLSIZE = NFRONT - NASS 1733 BLSIZE = KEEP(8) 1735 BLSIZE = NROW1 1738 DO IROW = 1, NROW1, BLSIZE 2730 INTEGER BLSIZE 2759 BLSIZE = KEEP(8) [all …]
|
H A D | cmumps_part6.F | 987 INTEGER BLSIZE 1020 BLSIZE = KEEP(8) 1022 BLSIZE = NASS - JROW2 1157 BLSIZE = KEEP(58) 1159 BLSIZE = NFRONT - NASS 1723 BLSIZE = KEEP(8) 1725 BLSIZE = NROW1 1728 DO IROW = 1, NROW1, BLSIZE 2712 INTEGER BLSIZE 2741 BLSIZE = KEEP(8) [all …]
|
H A D | dmumps_part6.F | 997 INTEGER BLSIZE 1030 BLSIZE = KEEP(8) 1032 BLSIZE = NASS - JROW2 1167 BLSIZE = KEEP(58) 1169 BLSIZE = NFRONT - NASS 1733 BLSIZE = KEEP(8) 1735 BLSIZE = NROW1 1738 DO IROW = 1, NROW1, BLSIZE 2730 INTEGER BLSIZE 2759 BLSIZE = KEEP(8) [all …]
|
/dports/math/coinmumps/MUMPS_4.10.0/src/ |
H A D | mumps_part9.F | 6611 BLSIZE = 1 6619 & BLSIZE ) 6621 & int(BLSIZE,8)* int(SumNi+BLSIZE,8) ) 6624 & BLSIZE ) 6628 MAXSURFCB = MAXSURFCB + int(BLSIZE,8)*int(SumNi+BLSIZE,8) 6649 & BLSIZE ) 6651 & int(BLSIZE,8)* int(SumNi+BLSIZE,8 )) 6654 & BLSIZE ) 6657 MAXSURFCB = MAXSURFCB + int(BLSIZE,8)*int(SumNi+BLSIZE,8) 6689 & BLSIZE [all …]
|
H A D | dmumps_part6.F | 997 INTEGER BLSIZE 1030 BLSIZE = KEEP(8) 1032 BLSIZE = NASS - JROW2 1167 BLSIZE = KEEP(58) 1169 BLSIZE = NFRONT - NASS 1733 BLSIZE = KEEP(8) 1735 BLSIZE = NROW1 1738 DO IROW = 1, NROW1, BLSIZE 2730 INTEGER BLSIZE 2759 BLSIZE = KEEP(8) [all …]
|
H A D | zmumps_part6.F | 987 INTEGER BLSIZE 1020 BLSIZE = KEEP(8) 1022 BLSIZE = NASS - JROW2 1157 BLSIZE = KEEP(58) 1159 BLSIZE = NFRONT - NASS 1723 BLSIZE = KEEP(8) 1725 BLSIZE = NROW1 1728 DO IROW = 1, NROW1, BLSIZE 2712 INTEGER BLSIZE 2741 BLSIZE = KEEP(8) [all …]
|
H A D | cmumps_part6.F | 987 INTEGER BLSIZE 1020 BLSIZE = KEEP(8) 1022 BLSIZE = NASS - JROW2 1157 BLSIZE = KEEP(58) 1159 BLSIZE = NFRONT - NASS 1723 BLSIZE = KEEP(8) 1725 BLSIZE = NROW1 1728 DO IROW = 1, NROW1, BLSIZE 2712 INTEGER BLSIZE 2741 BLSIZE = KEEP(8) [all …]
|
H A D | smumps_part6.F | 997 INTEGER BLSIZE 1030 BLSIZE = KEEP(8) 1032 BLSIZE = NASS - JROW2 1167 BLSIZE = KEEP(58) 1169 BLSIZE = NFRONT - NASS 1733 BLSIZE = KEEP(8) 1735 BLSIZE = NROW1 1738 DO IROW = 1, NROW1, BLSIZE 2730 INTEGER BLSIZE 2759 BLSIZE = KEEP(8) [all …]
|
/dports/math/mumps4/MUMPS_4.10.0/src/ |
H A D | mumps_part9.F | 6611 BLSIZE = 1 6619 & BLSIZE ) 6621 & int(BLSIZE,8)* int(SumNi+BLSIZE,8) ) 6624 & BLSIZE ) 6628 MAXSURFCB = MAXSURFCB + int(BLSIZE,8)*int(SumNi+BLSIZE,8) 6649 & BLSIZE ) 6651 & int(BLSIZE,8)* int(SumNi+BLSIZE,8 )) 6654 & BLSIZE ) 6657 MAXSURFCB = MAXSURFCB + int(BLSIZE,8)*int(SumNi+BLSIZE,8) 6689 & BLSIZE [all …]
|
H A D | dmumps_part6.F | 997 INTEGER BLSIZE local 1030 BLSIZE = KEEP(8) 1032 BLSIZE = NASS - JROW2 1167 BLSIZE = KEEP(58) 1169 BLSIZE = NFRONT - NASS 1733 BLSIZE = KEEP(8) 1735 BLSIZE = NROW1 1738 DO IROW = 1, NROW1, BLSIZE 2730 INTEGER BLSIZE local 2759 BLSIZE = KEEP(8) [all …]
|
H A D | zmumps_part6.F | 987 INTEGER BLSIZE local 1020 BLSIZE = KEEP(8) 1022 BLSIZE = NASS - JROW2 1157 BLSIZE = KEEP(58) 1159 BLSIZE = NFRONT - NASS 1723 BLSIZE = KEEP(8) 1725 BLSIZE = NROW1 1728 DO IROW = 1, NROW1, BLSIZE 2712 INTEGER BLSIZE local 2741 BLSIZE = KEEP(8) [all …]
|