| /dports/math/mumps/mumps-5.1.2/src/ |
| H A D | cana_driver.F | 3267 LOGICAL :: IS_ELEMENTAL local
3286 IS_ELEMENTAL = (id%KEEP(55) .NE. 0)
3296 & IS_ELEMENTAL ) ! Elemental or not
3326 & IS_ELEMENTAL ) ! Elemental or not
3347 & IS_DISTRIBUTED, IS_ELEMENTAL ) argument
3378 & IS_ELEMENTAL local
3392 & .NOT. IS_ELEMENTAL) THEN
3481 ELSE IF (IS_ELEMENTAL .AND. I_AM_MASTER) THEN
|
| H A D | dana_driver.F | 3267 LOGICAL :: IS_ELEMENTAL local
3286 IS_ELEMENTAL = (id%KEEP(55) .NE. 0)
3296 & IS_ELEMENTAL ) ! Elemental or not
3326 & IS_ELEMENTAL ) ! Elemental or not
3347 & IS_DISTRIBUTED, IS_ELEMENTAL ) argument
3378 & IS_ELEMENTAL local
3392 & .NOT. IS_ELEMENTAL) THEN
3479 ELSE IF (IS_ELEMENTAL .AND. I_AM_MASTER) THEN
|
| H A D | zana_driver.F | 3267 LOGICAL :: IS_ELEMENTAL local
3286 IS_ELEMENTAL = (id%KEEP(55) .NE. 0)
3296 & IS_ELEMENTAL ) ! Elemental or not
3326 & IS_ELEMENTAL ) ! Elemental or not
3347 & IS_DISTRIBUTED, IS_ELEMENTAL ) argument
3378 & IS_ELEMENTAL local
3392 & .NOT. IS_ELEMENTAL) THEN
3481 ELSE IF (IS_ELEMENTAL .AND. I_AM_MASTER) THEN
|
| H A D | sana_driver.F | 3267 LOGICAL :: IS_ELEMENTAL local
3286 IS_ELEMENTAL = (id%KEEP(55) .NE. 0)
3296 & IS_ELEMENTAL ) ! Elemental or not
3326 & IS_ELEMENTAL ) ! Elemental or not
3347 & IS_DISTRIBUTED, IS_ELEMENTAL ) argument
3378 & IS_ELEMENTAL local
3392 & .NOT. IS_ELEMENTAL) THEN
3479 ELSE IF (IS_ELEMENTAL .AND. I_AM_MASTER) THEN
|
| /dports/math/ipopt/Ipopt-3.12.13/ThirdParty/Mumps/MUMPS/src/ |
| H A D | smumps_part5.F | 2255 LOGICAL :: IS_ELEMENTAL local
2268 IS_ELEMENTAL = (id%KEEP(55) .NE. 0)
2274 & IS_ELEMENTAL )
2292 & IS_ELEMENTAL )
2308 & IS_DISTRIBUTED, IS_ELEMENTAL )
2314 & IS_ELEMENTAL
2320 IF (IS_ELEMENTAL) THEN
|
| H A D | dmumps_part5.F | 2255 LOGICAL :: IS_ELEMENTAL local
2268 IS_ELEMENTAL = (id%KEEP(55) .NE. 0)
2274 & IS_ELEMENTAL )
2292 & IS_ELEMENTAL )
2308 & IS_DISTRIBUTED, IS_ELEMENTAL )
2314 & IS_ELEMENTAL
2320 IF (IS_ELEMENTAL) THEN
|
| H A D | cmumps_part5.F | 2255 LOGICAL :: IS_ELEMENTAL local
2268 IS_ELEMENTAL = (id%KEEP(55) .NE. 0)
2274 & IS_ELEMENTAL )
2292 & IS_ELEMENTAL )
2308 & IS_DISTRIBUTED, IS_ELEMENTAL )
2314 & IS_ELEMENTAL
2320 IF (IS_ELEMENTAL) THEN
|
| H A D | zmumps_part5.F | 2255 LOGICAL :: IS_ELEMENTAL local
2268 IS_ELEMENTAL = (id%KEEP(55) .NE. 0)
2274 & IS_ELEMENTAL )
2292 & IS_ELEMENTAL )
2308 & IS_DISTRIBUTED, IS_ELEMENTAL )
2314 & IS_ELEMENTAL
2320 IF (IS_ELEMENTAL) THEN
|
| /dports/math/coinmumps/MUMPS_4.10.0/src/ |
| H A D | zmumps_part5.F | 2255 LOGICAL :: IS_ELEMENTAL local
2268 IS_ELEMENTAL = (id%KEEP(55) .NE. 0)
2274 & IS_ELEMENTAL )
2292 & IS_ELEMENTAL )
2308 & IS_DISTRIBUTED, IS_ELEMENTAL )
2314 & IS_ELEMENTAL
2320 IF (IS_ELEMENTAL) THEN
|
| H A D | cmumps_part5.F | 2255 LOGICAL :: IS_ELEMENTAL local
2268 IS_ELEMENTAL = (id%KEEP(55) .NE. 0)
2274 & IS_ELEMENTAL )
2292 & IS_ELEMENTAL )
2308 & IS_DISTRIBUTED, IS_ELEMENTAL )
2314 & IS_ELEMENTAL
2320 IF (IS_ELEMENTAL) THEN
|
| H A D | smumps_part5.F | 2255 LOGICAL :: IS_ELEMENTAL local
2268 IS_ELEMENTAL = (id%KEEP(55) .NE. 0)
2274 & IS_ELEMENTAL )
2292 & IS_ELEMENTAL )
2308 & IS_DISTRIBUTED, IS_ELEMENTAL ) argument
2314 & IS_ELEMENTAL local
2320 IF (IS_ELEMENTAL) THEN
|
| H A D | dmumps_part5.F | 2255 LOGICAL :: IS_ELEMENTAL local
2268 IS_ELEMENTAL = (id%KEEP(55) .NE. 0)
2274 & IS_ELEMENTAL )
2292 & IS_ELEMENTAL )
2308 & IS_DISTRIBUTED, IS_ELEMENTAL )
2314 & IS_ELEMENTAL
2320 IF (IS_ELEMENTAL) THEN
|
| /dports/math/mumps4/MUMPS_4.10.0/src/ |
| H A D | cmumps_part5.F | 2255 LOGICAL :: IS_ELEMENTAL local
2268 IS_ELEMENTAL = (id%KEEP(55) .NE. 0)
2274 & IS_ELEMENTAL )
2292 & IS_ELEMENTAL )
2308 & IS_DISTRIBUTED, IS_ELEMENTAL ) argument
2314 & IS_ELEMENTAL local
2320 IF (IS_ELEMENTAL) THEN
|
| H A D | dmumps_part5.F | 2255 LOGICAL :: IS_ELEMENTAL local
2268 IS_ELEMENTAL = (id%KEEP(55) .NE. 0)
2274 & IS_ELEMENTAL )
2292 & IS_ELEMENTAL )
2308 & IS_DISTRIBUTED, IS_ELEMENTAL ) argument
2314 & IS_ELEMENTAL local
2320 IF (IS_ELEMENTAL) THEN
|
| H A D | zmumps_part5.F | 2255 LOGICAL :: IS_ELEMENTAL local
2268 IS_ELEMENTAL = (id%KEEP(55) .NE. 0)
2274 & IS_ELEMENTAL )
2292 & IS_ELEMENTAL )
2308 & IS_DISTRIBUTED, IS_ELEMENTAL ) argument
2314 & IS_ELEMENTAL local
2320 IF (IS_ELEMENTAL) THEN
|
| H A D | smumps_part5.F | 2255 LOGICAL :: IS_ELEMENTAL local
2268 IS_ELEMENTAL = (id%KEEP(55) .NE. 0)
2274 & IS_ELEMENTAL )
2292 & IS_ELEMENTAL )
2308 & IS_DISTRIBUTED, IS_ELEMENTAL ) argument
2314 & IS_ELEMENTAL local
2320 IF (IS_ELEMENTAL) THEN
|