Searched refs:nBC (Results 1 – 7 of 7) sorted by relevance
47 where (nBC(:) .ne. 0) iBC(:) = iBCtmp(nBC(:))54 if (nBC(n) .ne. 0) then55 nb = nBC(n)
23 integer, allocatable :: nBC(:) variable301 allocate( nBC(nshg) )309 nBC=nBCread
55 where (nBC(:) .ne. 0) BCtmp(:,i) = BCinp(nBC(:),i)131 if (nBC(n) .ne. 0) then
113 deallocate(nBC)
26 integer, allocatable :: nBC(:) variable
28 integer, allocatable :: nBC(:) variable