Lines Matching refs:iBC
1 subroutine bc3BDg (y, iBC, BC, BDiag, iper, ilwork) argument
26 dimension y(nshg,ndof), iBC(nshg),
39 where (btest(iBC,0))
64 where (btest(iBC,2)) ! pressure
82 where (ibits(iBC,3,3) .eq. 1)
120 where (ibits(iBC,3,3) .eq. 2)
158 where (ibits(iBC,3,3) .eq. 3)
192 where (ibits(iBC,3,3) .eq. 4)
230 where (ibits(iBC,3,3) .eq. 5)
264 where (ibits(iBC,3,3) .eq. 6)
298 where (ibits(iBC,3,3) .eq. 7)
324 where (btest(iBC,1))
340 if (btest(iBC(j),10)) then
349 if (btest(iBC(j),10)) then
394 subroutine bc3BDgSclr (iBC, Diag, iper, ilwork) argument
417 dimension iBC(nshg),
426 where (btest(iBC,id))
433 if (btest(iBC(j),10)) then
442 if (btest(iBC(i),10)) then