Home
last modified time | relevance | path

Searched refs:REQPTR (Results 1 – 16 of 16) sorted by relevance

/dports/math/ipopt/Ipopt-3.12.13/ThirdParty/Mumps/MUMPS/src/
H A Dsmumps_part5.F2135 INTEGER, ALLOCATABLE :: REQPTR(:,:) local
2184 CALL MPI_RECV( REQPTR( I+1, 1 ), 1,
2189 REQPTR( 1, 1 ) = 1
2191 REQPTR( 1, 1 ) = id%NZ_loc + 1
2194 REQPTR( I, 1 ) = REQPTR( I, 1 ) + REQPTR( I-1, 1 )
2203 IF ( REQPTR( I + 1, 1 ) - REQPTR( I, 1 ) .NE. 0 ) THEN
2206 & REQPTR( I + 1, 1 ) - REQPTR( I, 1 ),
2210 & REQPTR( I + 1, 1 ) - REQPTR( I, 1 ),
2214 REQPTR(I, 2) = MPI_REQUEST_NULL
2215 REQPTR(I, 3) = MPI_REQUEST_NULL
[all …]
H A Ddmumps_part5.F2135 INTEGER, ALLOCATABLE :: REQPTR(:,:) local
2184 CALL MPI_RECV( REQPTR( I+1, 1 ), 1,
2189 REQPTR( 1, 1 ) = 1
2191 REQPTR( 1, 1 ) = id%NZ_loc + 1
2194 REQPTR( I, 1 ) = REQPTR( I, 1 ) + REQPTR( I-1, 1 )
2203 IF ( REQPTR( I + 1, 1 ) - REQPTR( I, 1 ) .NE. 0 ) THEN
2206 & REQPTR( I + 1, 1 ) - REQPTR( I, 1 ),
2210 & REQPTR( I + 1, 1 ) - REQPTR( I, 1 ),
2214 REQPTR(I, 2) = MPI_REQUEST_NULL
2215 REQPTR(I, 3) = MPI_REQUEST_NULL
[all …]
H A Dcmumps_part5.F2135 INTEGER, ALLOCATABLE :: REQPTR(:,:) local
2184 CALL MPI_RECV( REQPTR( I+1, 1 ), 1,
2189 REQPTR( 1, 1 ) = 1
2191 REQPTR( 1, 1 ) = id%NZ_loc + 1
2194 REQPTR( I, 1 ) = REQPTR( I, 1 ) + REQPTR( I-1, 1 )
2203 IF ( REQPTR( I + 1, 1 ) - REQPTR( I, 1 ) .NE. 0 ) THEN
2206 & REQPTR( I + 1, 1 ) - REQPTR( I, 1 ),
2210 & REQPTR( I + 1, 1 ) - REQPTR( I, 1 ),
2214 REQPTR(I, 2) = MPI_REQUEST_NULL
2215 REQPTR(I, 3) = MPI_REQUEST_NULL
[all …]
H A Dzmumps_part5.F2135 INTEGER, ALLOCATABLE :: REQPTR(:,:) local
2184 CALL MPI_RECV( REQPTR( I+1, 1 ), 1,
2189 REQPTR( 1, 1 ) = 1
2191 REQPTR( 1, 1 ) = id%NZ_loc + 1
2194 REQPTR( I, 1 ) = REQPTR( I, 1 ) + REQPTR( I-1, 1 )
2203 IF ( REQPTR( I + 1, 1 ) - REQPTR( I, 1 ) .NE. 0 ) THEN
2206 & REQPTR( I + 1, 1 ) - REQPTR( I, 1 ),
2210 & REQPTR( I + 1, 1 ) - REQPTR( I, 1 ),
2214 REQPTR(I, 2) = MPI_REQUEST_NULL
2215 REQPTR(I, 3) = MPI_REQUEST_NULL
[all …]
/dports/math/coinmumps/MUMPS_4.10.0/src/
H A Dzmumps_part5.F2135 INTEGER, ALLOCATABLE :: REQPTR(:,:) local
2184 CALL MPI_RECV( REQPTR( I+1, 1 ), 1,
2189 REQPTR( 1, 1 ) = 1
2191 REQPTR( 1, 1 ) = id%NZ_loc + 1
2194 REQPTR( I, 1 ) = REQPTR( I, 1 ) + REQPTR( I-1, 1 )
2203 IF ( REQPTR( I + 1, 1 ) - REQPTR( I, 1 ) .NE. 0 ) THEN
2206 & REQPTR( I + 1, 1 ) - REQPTR( I, 1 ),
2210 & REQPTR( I + 1, 1 ) - REQPTR( I, 1 ),
2214 REQPTR(I, 2) = MPI_REQUEST_NULL
2215 REQPTR(I, 3) = MPI_REQUEST_NULL
[all …]
H A Dcmumps_part5.F2135 INTEGER, ALLOCATABLE :: REQPTR(:,:) local
2184 CALL MPI_RECV( REQPTR( I+1, 1 ), 1,
2189 REQPTR( 1, 1 ) = 1
2191 REQPTR( 1, 1 ) = id%NZ_loc + 1
2194 REQPTR( I, 1 ) = REQPTR( I, 1 ) + REQPTR( I-1, 1 )
2203 IF ( REQPTR( I + 1, 1 ) - REQPTR( I, 1 ) .NE. 0 ) THEN
2206 & REQPTR( I + 1, 1 ) - REQPTR( I, 1 ),
2210 & REQPTR( I + 1, 1 ) - REQPTR( I, 1 ),
2214 REQPTR(I, 2) = MPI_REQUEST_NULL
2215 REQPTR(I, 3) = MPI_REQUEST_NULL
[all …]
H A Dsmumps_part5.F2135 INTEGER, ALLOCATABLE :: REQPTR(:,:) local
2184 CALL MPI_RECV( REQPTR( I+1, 1 ), 1,
2189 REQPTR( 1, 1 ) = 1
2191 REQPTR( 1, 1 ) = id%NZ_loc + 1
2194 REQPTR( I, 1 ) = REQPTR( I, 1 ) + REQPTR( I-1, 1 )
2203 IF ( REQPTR( I + 1, 1 ) - REQPTR( I, 1 ) .NE. 0 ) THEN
2206 & REQPTR( I + 1, 1 ) - REQPTR( I, 1 ),
2210 & REQPTR( I + 1, 1 ) - REQPTR( I, 1 ),
2214 REQPTR(I, 2) = MPI_REQUEST_NULL
2215 REQPTR(I, 3) = MPI_REQUEST_NULL
[all …]
H A Ddmumps_part5.F2135 INTEGER, ALLOCATABLE :: REQPTR(:,:) local
2184 CALL MPI_RECV( REQPTR( I+1, 1 ), 1,
2189 REQPTR( 1, 1 ) = 1
2191 REQPTR( 1, 1 ) = id%NZ_loc + 1
2194 REQPTR( I, 1 ) = REQPTR( I, 1 ) + REQPTR( I-1, 1 )
2203 IF ( REQPTR( I + 1, 1 ) - REQPTR( I, 1 ) .NE. 0 ) THEN
2206 & REQPTR( I + 1, 1 ) - REQPTR( I, 1 ),
2210 & REQPTR( I + 1, 1 ) - REQPTR( I, 1 ),
2214 REQPTR(I, 2) = MPI_REQUEST_NULL
2215 REQPTR(I, 3) = MPI_REQUEST_NULL
[all …]
/dports/math/mumps4/MUMPS_4.10.0/src/
H A Dcmumps_part5.F2135 INTEGER, ALLOCATABLE :: REQPTR(:,:) local
2184 CALL MPI_RECV( REQPTR( I+1, 1 ), 1,
2189 REQPTR( 1, 1 ) = 1
2191 REQPTR( 1, 1 ) = id%NZ_loc + 1
2194 REQPTR( I, 1 ) = REQPTR( I, 1 ) + REQPTR( I-1, 1 )
2203 IF ( REQPTR( I + 1, 1 ) - REQPTR( I, 1 ) .NE. 0 ) THEN
2206 & REQPTR( I + 1, 1 ) - REQPTR( I, 1 ),
2210 & REQPTR( I + 1, 1 ) - REQPTR( I, 1 ),
2214 REQPTR(I, 2) = MPI_REQUEST_NULL
2215 REQPTR(I, 3) = MPI_REQUEST_NULL
[all …]
H A Ddmumps_part5.F2135 INTEGER, ALLOCATABLE :: REQPTR(:,:) local
2184 CALL MPI_RECV( REQPTR( I+1, 1 ), 1,
2189 REQPTR( 1, 1 ) = 1
2191 REQPTR( 1, 1 ) = id%NZ_loc + 1
2194 REQPTR( I, 1 ) = REQPTR( I, 1 ) + REQPTR( I-1, 1 )
2203 IF ( REQPTR( I + 1, 1 ) - REQPTR( I, 1 ) .NE. 0 ) THEN
2206 & REQPTR( I + 1, 1 ) - REQPTR( I, 1 ),
2210 & REQPTR( I + 1, 1 ) - REQPTR( I, 1 ),
2214 REQPTR(I, 2) = MPI_REQUEST_NULL
2215 REQPTR(I, 3) = MPI_REQUEST_NULL
[all …]
H A Dzmumps_part5.F2135 INTEGER, ALLOCATABLE :: REQPTR(:,:) local
2184 CALL MPI_RECV( REQPTR( I+1, 1 ), 1,
2189 REQPTR( 1, 1 ) = 1
2191 REQPTR( 1, 1 ) = id%NZ_loc + 1
2194 REQPTR( I, 1 ) = REQPTR( I, 1 ) + REQPTR( I-1, 1 )
2203 IF ( REQPTR( I + 1, 1 ) - REQPTR( I, 1 ) .NE. 0 ) THEN
2206 & REQPTR( I + 1, 1 ) - REQPTR( I, 1 ),
2210 & REQPTR( I + 1, 1 ) - REQPTR( I, 1 ),
2214 REQPTR(I, 2) = MPI_REQUEST_NULL
2215 REQPTR(I, 3) = MPI_REQUEST_NULL
[all …]
H A Dsmumps_part5.F2135 INTEGER, ALLOCATABLE :: REQPTR(:,:) local
2184 CALL MPI_RECV( REQPTR( I+1, 1 ), 1,
2189 REQPTR( 1, 1 ) = 1
2191 REQPTR( 1, 1 ) = id%NZ_loc + 1
2194 REQPTR( I, 1 ) = REQPTR( I, 1 ) + REQPTR( I-1, 1 )
2203 IF ( REQPTR( I + 1, 1 ) - REQPTR( I, 1 ) .NE. 0 ) THEN
2206 & REQPTR( I + 1, 1 ) - REQPTR( I, 1 ),
2210 & REQPTR( I + 1, 1 ) - REQPTR( I, 1 ),
2214 REQPTR(I, 2) = MPI_REQUEST_NULL
2215 REQPTR(I, 3) = MPI_REQUEST_NULL
[all …]
/dports/math/mumps/mumps-5.1.2/src/
H A Dcana_driver.F2997 INTEGER, ALLOCATABLE :: REQPTR(:,:) local
3073 ALLOCATE( REQPTR( id%NPROCS-1, 2 ), STAT = IERR )
3190 & I, COLLECT_IRN, id%COMM, REQPTR(I,1), IERR )
3193 & I, COLLECT_JCN, id%COMM, REQPTR(I,2), IERR )
3195 REQPTR( I,1 ) = MPI_REQUEST_NULL
3196 REQPTR( I,2 ) = MPI_REQUEST_NULL
3207 & ( 2 * (id%NPROCS-1), REQPTR( 1, 1 ), INDX,
3213 DEALLOCATE( REQPTR )
H A Ddana_driver.F2997 INTEGER, ALLOCATABLE :: REQPTR(:,:) local
3073 ALLOCATE( REQPTR( id%NPROCS-1, 2 ), STAT = IERR )
3190 & I, COLLECT_IRN, id%COMM, REQPTR(I,1), IERR )
3193 & I, COLLECT_JCN, id%COMM, REQPTR(I,2), IERR )
3195 REQPTR( I,1 ) = MPI_REQUEST_NULL
3196 REQPTR( I,2 ) = MPI_REQUEST_NULL
3207 & ( 2 * (id%NPROCS-1), REQPTR( 1, 1 ), INDX,
3213 DEALLOCATE( REQPTR )
H A Dzana_driver.F2997 INTEGER, ALLOCATABLE :: REQPTR(:,:) local
3073 ALLOCATE( REQPTR( id%NPROCS-1, 2 ), STAT = IERR )
3190 & I, COLLECT_IRN, id%COMM, REQPTR(I,1), IERR )
3193 & I, COLLECT_JCN, id%COMM, REQPTR(I,2), IERR )
3195 REQPTR( I,1 ) = MPI_REQUEST_NULL
3196 REQPTR( I,2 ) = MPI_REQUEST_NULL
3207 & ( 2 * (id%NPROCS-1), REQPTR( 1, 1 ), INDX,
3213 DEALLOCATE( REQPTR )
H A Dsana_driver.F2997 INTEGER, ALLOCATABLE :: REQPTR(:,:) local
3073 ALLOCATE( REQPTR( id%NPROCS-1, 2 ), STAT = IERR )
3190 & I, COLLECT_IRN, id%COMM, REQPTR(I,1), IERR )
3193 & I, COLLECT_JCN, id%COMM, REQPTR(I,2), IERR )
3195 REQPTR( I,1 ) = MPI_REQUEST_NULL
3196 REQPTR( I,2 ) = MPI_REQUEST_NULL
3207 & ( 2 * (id%NPROCS-1), REQPTR( 1, 1 ), INDX,
3213 DEALLOCATE( REQPTR )