Searched refs:IWHANDLER (Results 1 – 11 of 11) sorted by relevance
/dports/math/mumps/mumps-5.1.2/src/ |
H A D | smumps_lr_data_m.F | 224 IF (IWHANDLER.LE.0) THEN 282 & IWHANDLER 302 IF ( IWHANDLER .GT. size(BLR_ARRAY) .OR. IWHANDLER .LE. 0 ) THEN 328 IF ( IWHANDLER .GT. size(BLR_ARRAY) .OR. IWHANDLER .LE. 0 ) THEN 345 IF ( IWHANDLER .GT. size(BLR_ARRAY) .OR. IWHANDLER .LE. 0 ) THEN 365 IF ( IWHANDLER .GT. size(BLR_ARRAY) .OR. IWHANDLER .LE. 0 ) THEN 400 IF ( IWHANDLER .GT. size(BLR_ARRAY) .OR. IWHANDLER .LE. 0 ) THEN 453 IF (IWHANDLER.LE.0) RETURN 469 IF (IWHANDLER.LE.0) RETURN 494 IF (IWHANDLER.LE.0) RETURN [all …]
|
H A D | dmumps_lr_data_m.F | 224 IF (IWHANDLER.LE.0) THEN 282 & IWHANDLER 302 IF ( IWHANDLER .GT. size(BLR_ARRAY) .OR. IWHANDLER .LE. 0 ) THEN 328 IF ( IWHANDLER .GT. size(BLR_ARRAY) .OR. IWHANDLER .LE. 0 ) THEN 345 IF ( IWHANDLER .GT. size(BLR_ARRAY) .OR. IWHANDLER .LE. 0 ) THEN 365 IF ( IWHANDLER .GT. size(BLR_ARRAY) .OR. IWHANDLER .LE. 0 ) THEN 400 IF ( IWHANDLER .GT. size(BLR_ARRAY) .OR. IWHANDLER .LE. 0 ) THEN 453 IF (IWHANDLER.LE.0) RETURN 469 IF (IWHANDLER.LE.0) RETURN 494 IF (IWHANDLER.LE.0) RETURN [all …]
|
H A D | zmumps_lr_data_m.F | 224 IF (IWHANDLER.LE.0) THEN 282 & IWHANDLER 302 IF ( IWHANDLER .GT. size(BLR_ARRAY) .OR. IWHANDLER .LE. 0 ) THEN 328 IF ( IWHANDLER .GT. size(BLR_ARRAY) .OR. IWHANDLER .LE. 0 ) THEN 345 IF ( IWHANDLER .GT. size(BLR_ARRAY) .OR. IWHANDLER .LE. 0 ) THEN 365 IF ( IWHANDLER .GT. size(BLR_ARRAY) .OR. IWHANDLER .LE. 0 ) THEN 400 IF ( IWHANDLER .GT. size(BLR_ARRAY) .OR. IWHANDLER .LE. 0 ) THEN 453 IF (IWHANDLER.LE.0) RETURN 469 IF (IWHANDLER.LE.0) RETURN 494 IF (IWHANDLER.LE.0) RETURN [all …]
|
H A D | cmumps_lr_data_m.F | 224 IF (IWHANDLER.LE.0) THEN 282 & IWHANDLER 302 IF ( IWHANDLER .GT. size(BLR_ARRAY) .OR. IWHANDLER .LE. 0 ) THEN 328 IF ( IWHANDLER .GT. size(BLR_ARRAY) .OR. IWHANDLER .LE. 0 ) THEN 345 IF ( IWHANDLER .GT. size(BLR_ARRAY) .OR. IWHANDLER .LE. 0 ) THEN 365 IF ( IWHANDLER .GT. size(BLR_ARRAY) .OR. IWHANDLER .LE. 0 ) THEN 400 IF ( IWHANDLER .GT. size(BLR_ARRAY) .OR. IWHANDLER .LE. 0 ) THEN 453 IF (IWHANDLER.LE.0) RETURN 469 IF (IWHANDLER.LE.0) RETURN 494 IF (IWHANDLER.LE.0) RETURN [all …]
|
H A D | fac_descband_data_m.F | 50 INTEGER, INTENT(OUT) :: IWHANDLER local 54 IWHANDLER = I 67 INTEGER, INTENT(OUT) :: IWHANDLER local 70 IWHANDLER = -1 94 FDBD_ARRAY(IWHANDLER)%INODE = INODE 95 FDBD_ARRAY(IWHANDLER)%LBUFR = LBUFR 102 FDBD_ARRAY(IWHANDLER)%BUFR = BUFR 106 INTEGER, INTENT(IN) :: IWHANDLER local 117 INTEGER, INTENT(INOUT) :: IWHANDLER local 129 INTEGER :: I, IWHANDLER local [all …]
|
H A D | fac_maprow_data_m.F | 48 INTEGER, INTENT(IN) :: IWHANDLER local 49 IF (IWHANDLER .LT. 0 .OR. IWHANDLER .GT. size(FMRD_ARRAY)) THEN 95 & IWHANDLER, argument 155 IF (IWHANDLER > size(FMRD_ARRAY)) THEN 179 FMRD_ARRAY(IWHANDLER) = MAPROW_STRUC 248 INTEGER, INTENT(INOUT) :: IWHANDLER local 255 MAPROW_STRUC => FMRD_ARRAY(IWHANDLER) 276 INTEGER, INTENT(IN) :: IWHANDLER local 282 MAPROW_STRUC => FMRD_ARRAY(IWHANDLER) 298 INTEGER :: I, IWHANDLER local [all …]
|
H A D | front_data_mgt_m.F | 145 INTEGER, INTENT(INOUT) :: IWHANDLER local 157 IF (IWHANDLER .GT. 0) THEN 159 IF (FDM_PTR%COUNT_ACCESS(IWHANDLER) .LT. 1) THEN 161 & FDM_PTR%COUNT_ACCESS(IWHANDLER) 199 FDM_PTR%COUNT_ACCESS(IWHANDLER)=FDM_PTR%COUNT_ACCESS(IWHANDLER)+1 216 INTEGER, INTENT(INOUT) :: IWHANDLER local 220 IF (IWHANDLER .LE.0) THEN 228 FDM_PTR%COUNT_ACCESS(IWHANDLER)=FDM_PTR%COUNT_ACCESS(IWHANDLER)-1 229 IF (FDM_PTR%COUNT_ACCESS(IWHANDLER) .LT. 0) THEN 232 & IWHANDLER, FDM_PTR%COUNT_ACCESS(IWHANDLER) [all …]
|
H A D | cfac_process_band.F | 228 INTEGER :: IWHANDLER local 236 IF (MUMPS_FDBD_IS_DESCBAND_STORED( INODE, IWHANDLER )) THEN 237 CALL MUMPS_FDBD_RETRIEVE_DESCBAND(IWHANDLER, DESCBAND_STRUC) 246 & IWHANDLER,
|
H A D | dfac_process_band.F | 228 INTEGER :: IWHANDLER local 236 IF (MUMPS_FDBD_IS_DESCBAND_STORED( INODE, IWHANDLER )) THEN 237 CALL MUMPS_FDBD_RETRIEVE_DESCBAND(IWHANDLER, DESCBAND_STRUC) 246 & IWHANDLER,
|
H A D | sfac_process_band.F | 228 INTEGER :: IWHANDLER local 236 IF (MUMPS_FDBD_IS_DESCBAND_STORED( INODE, IWHANDLER )) THEN 237 CALL MUMPS_FDBD_RETRIEVE_DESCBAND(IWHANDLER, DESCBAND_STRUC) 246 & IWHANDLER,
|
H A D | zfac_process_band.F | 228 INTEGER :: IWHANDLER local 236 IF (MUMPS_FDBD_IS_DESCBAND_STORED( INODE, IWHANDLER )) THEN 237 CALL MUMPS_FDBD_RETRIEVE_DESCBAND(IWHANDLER, DESCBAND_STRUC) 246 & IWHANDLER,
|