| File |
Line number |
Procedure |
Code |
|
./pkg/obcs/obcs_set_connect.F |
193 |
OBCS_SET_CONNECT |
listLocal(n,bi,bj) = 0 |
|
./pkg/obcs/obcs_set_connect.F |
204 |
OBCS_SET_CONNECT |
& listLocal(numLocal(bi,bj),bi,bj) = newConnect |
|
./pkg/obcs/obcs_set_connect.F |
225 |
OBCS_SET_CONNECT |
& ' , listLocal:', listLocal(1,bi,bj) |
|
./pkg/obcs/obcs_set_connect.F |
232 |
OBCS_SET_CONNECT |
& ' ... ', (listLocal(i,bi,bj),i=j,n) |
|
./pkg/obcs/obcs_set_connect.F |
238 |
OBCS_SET_CONNECT |
maxConnect = MAX( maxConnect, listLocal(n,bi,bj) ) |
|
./pkg/obcs/obcs_set_connect.F |
255 |
OBCS_SET_CONNECT |
IF ( listLocal(n,bi,bj).EQ.j ) tmpRL = oneRL |
|
./pkg/obcs/obcs_set_connect.F |
47 |
OBCS_SET_CONNECT |
INTEGER numLocal(nSx,nSy), listLocal(OBCS_maxConnect,nSx,nSy) |