Home
last modified time | relevance | path

Searched refs:tF (Results 1 – 5 of 5) sorted by relevance

/phasta/svLS/
H A DINCOMMU.f50 INTEGER i, j, k, s, e, ierr, nTasks, tF, stat(MPI_STATUS_SIZE) local
57 tF = commu%tF
60 IF (tF .NE. 1) THEN
61 i = tF - 1
70 IF (i .LT. tF) THEN
81 DO i=1, tF - 1
94 DO i=1, tF - 1
107 IF (i .GT. tF) THEN
138 INTEGER i, j, k, s, e, ierr, nTasks, tF, stat(MPI_STATUS_SIZE) local
145 tF = commu%tF
[all …]
H A DLHS.f52 INTEGER i, j, k, a, Ac, ai, s, e, nTasks, tF, maxnNo, ierr, local
73 tF = commu%tF
126 IF (i .EQ. tF) CYCLE
133 IF (aNodes(ai,tF) .NE. 0) THEN
134 IF (i .GT. tF) aNodes(ai,tF) = 0
149 IF (i.NE.tF .AND. i.NE.1) THEN
158 IF (i.GT.tF .OR. aNodes(ai,tF).NE.0) THEN
161 aNodes(ai,tF) = 0
166 IF (i .LT. tF) THEN
167 lhs%cS(i)%tag = nTasks*i + tF
[all …]
H A DsvLS_STRUCT_c.h60 int tF; // Task in FORTRAN indexing (USE) member
H A DCOMMU.f74 commu%tF = commu%task + 1
H A DsvLS_STRUCT.h58 INTEGER :: tF