Home
last modified time | relevance | path

Searched refs:IWHANDLER (Results 1 – 11 of 11) sorted by relevance

/dports/math/mumps/mumps-5.1.2/src/
H A Dsmumps_lr_data_m.F224 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 Ddmumps_lr_data_m.F224 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 Dzmumps_lr_data_m.F224 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 Dcmumps_lr_data_m.F224 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 Dfac_descband_data_m.F50 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 Dfac_maprow_data_m.F48 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 Dfront_data_mgt_m.F145 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 Dcfac_process_band.F228 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 Ddfac_process_band.F228 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 Dsfac_process_band.F228 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 Dzfac_process_band.F228 INTEGER :: IWHANDLER local
236 IF (MUMPS_FDBD_IS_DESCBAND_STORED( INODE, IWHANDLER )) THEN
237 CALL MUMPS_FDBD_RETRIEVE_DESCBAND(IWHANDLER, DESCBAND_STRUC)
246 & IWHANDLER,