| /dports/math/slatec/src/ |
| H A D | dxpnrm.f | 2 SUBROUTINE DXPNRM (NU1, NU2, MU1, MU2, PQA, IPQA, IERROR) argument
28 IERROR=0
60 510 CALL DXADJ(PROD,IPROD,IERROR)
61 IF (IERROR.NE.0) RETURN
66 CALL DXADJ(PQA(I),IPQA(I),IERROR)
67 IF (IERROR.NE.0) RETURN
72 CALL DXADJ(PROD,IPROD,IERROR)
73 IF (IERROR.NE.0) RETURN
84 CALL DXADJ(PROD,IPROD,IERROR)
85 IF (IERROR.NE.0) RETURN
|
| H A D | pois3d.f | 3 + C, LDIMF, MDIMF, F, IERROR, W)
242 IERROR = 0
243 IF (LP.LT.1 .OR. LP.GT.5) IERROR = 1
244 IF (L .LT. 3) IERROR = 2
245 IF (MP.LT.1 .OR. MP.GT.5) IERROR = 3
246 IF (M .LT. 3) IERROR = 4
248 IF (N .LT. 3) IERROR = 6
249 IF (LDIMF .LT. L) IERROR = 7
250 IF (MDIMF .LT. M) IERROR = 8
258 102 IERROR = 9
[all …]
|
| H A D | hstcyl.f | 3 + BDC, BDD, ELMBDA, F, IDIMF, PERTRB, IERROR, W)
324 IERROR = 0
325 IF (A .LT. 0.) IERROR = 1
326 IF (A .GE. B) IERROR = 2
328 IF (C .GE. D) IERROR = 4
329 IF (N .LE. 2) IERROR = 5
332 IF (A.GT.0. .AND. MBDCND.GE.5) IERROR = 8
333 IF (IDIMF .LT. M) IERROR = 10
334 IF (M .LE. 2) IERROR = 9
336 IF (IERROR .NE. 0) RETURN
[all …]
|
| H A D | hstssp.f | 373 IERROR = 0
376 IF (A .GE. B) IERROR = 2
378 IF (C .GE. D) IERROR = 4
379 IF (N .LE. 2) IERROR = 5
382 1 IERROR = 7
384 1 IERROR = 8
387 1 IERROR = 10
390 IF (IDIMF .LT. M) IERROR = 12
391 IF (M .LE. 2) IERROR = 13
392 IF (IERROR .NE. 0) RETURN
[all …]
|
| H A D | xcon.f | 2 SUBROUTINE XCON (X, IX, IERROR) argument
68 IERROR=0
69 CALL XRED(X, IX,IERROR)
70 IF (IERROR.NE.0) RETURN
72 CALL XADJ(X, IX,IERROR)
73 IF (IERROR.NE.0) RETURN
134 CALL XC210(IX, Z, J,IERROR)
135 IF (IERROR.NE.0) RETURN
147 CALL XC210(IX, Z, J,IERROR)
148 IF (IERROR.NE.0) RETURN
|
| H A D | dxcon.f | 2 SUBROUTINE DXCON (X, IX, IERROR) argument
68 IERROR=0
69 CALL DXRED(X, IX,IERROR)
70 IF (IERROR.NE.0) RETURN
72 CALL DXADJ(X, IX,IERROR)
73 IF (IERROR.NE.0) RETURN
134 CALL DXC210(IX, Z, J,IERROR)
135 IF (IERROR.NE.0) RETURN
147 CALL DXC210(IX, Z, J,IERROR)
148 IF (IERROR.NE.0) RETURN
|
| H A D | hstplr.f | 3 + BDC, BDD, ELMBDA, F, IDIMF, PERTRB, IERROR, W)
327 IERROR = 0
328 IF (A .LT. 0.) IERROR = 1
329 IF (A .GE. B) IERROR = 2
331 IF (C .GE. D) IERROR = 4
332 IF (N .LE. 2) IERROR = 5
335 IF (A.GT.0. .AND. MBDCND.GE.5) IERROR = 8
337 IF (IDIMF .LT. M) IERROR = 10
338 IF (M .LE. 2) IERROR = 12
339 IF (IERROR .NE. 0) RETURN
[all …]
|
| H A D | hwscyl.f | 3 + BDC, BDD, ELMBDA, F, IDIMF, PERTRB, IERROR, W)
307 IERROR = 0
308 IF (A .LT. 0.) IERROR = 1
309 IF (A .GE. B) IERROR = 2
311 IF (C .GE. D) IERROR = 4
312 IF (N .LE. 3) IERROR = 5
315 IF (A.GT.0. .AND. MBDCND.GE.5) IERROR = 8
317 IF (IDIMF .LT. M+1) IERROR = 10
318 IF (M .LE. 3) IERROR = 12
319 IF (IERROR .NE. 0) RETURN
[all …]
|
| /dports/math/cmlib/cmlib-3.0_8/src/fishpak/ |
| H A D | pois3d.f | 2 + C, LDIMF, MDIMF, F, IERROR, W)
242 IERROR = 0
243 IF (LP.LT.1 .OR. LP.GT.5) IERROR = 1
244 IF (L .LT. 3) IERROR = 2
245 IF (MP.LT.1 .OR. MP.GT.5) IERROR = 3
246 IF (M .LT. 3) IERROR = 4
248 IF (N .LT. 3) IERROR = 6
249 IF (LDIMF .LT. L) IERROR = 7
250 IF (MDIMF .LT. M) IERROR = 8
258 102 IERROR = 9
[all …]
|
| H A D | hstcyl.f | 2 + BDC, BDD, ELMBDA, F, IDIMF, PERTRB, IERROR, W)
321 IERROR = 0
322 IF (A .LT. 0.) IERROR = 1
323 IF (A .GE. B) IERROR = 2
325 IF (C .GE. D) IERROR = 4
326 IF (N .LE. 2) IERROR = 5
329 IF (A.GT.0. .AND. MBDCND.GE.5) IERROR = 8
330 IF (IDIMF .LT. M) IERROR = 10
331 IF (M .LE. 2) IERROR = 9
333 IF (IERROR .NE. 0) RETURN
[all …]
|
| H A D | hstssp.f | 370 IERROR = 0
373 IF (A .GE. B) IERROR = 2
375 IF (C .GE. D) IERROR = 4
376 IF (N .LE. 2) IERROR = 5
379 1 IERROR = 7
381 1 IERROR = 8
384 1 IERROR = 10
387 IF (IDIMF .LT. M) IERROR = 12
388 IF (M .LE. 2) IERROR = 13
389 IF (IERROR .NE. 0) RETURN
[all …]
|
| H A D | hstplr.f | 2 + BDC, BDD, ELMBDA, F, IDIMF, PERTRB, IERROR, W)
324 IERROR = 0
325 IF (A .LT. 0.) IERROR = 1
326 IF (A .GE. B) IERROR = 2
328 IF (C .GE. D) IERROR = 4
329 IF (N .LE. 2) IERROR = 5
332 IF (A.GT.0. .AND. MBDCND.GE.5) IERROR = 8
334 IF (IDIMF .LT. M) IERROR = 10
335 IF (M .LE. 2) IERROR = 12
336 IF (IERROR .NE. 0) RETURN
[all …]
|
| H A D | hwscyl.f | 2 + BDC, BDD, ELMBDA, F, IDIMF, PERTRB, IERROR, W)
304 IERROR = 0
305 IF (A .LT. 0.) IERROR = 1
306 IF (A .GE. B) IERROR = 2
308 IF (C .GE. D) IERROR = 4
309 IF (N .LE. 3) IERROR = 5
312 IF (A.GT.0. .AND. MBDCND.GE.5) IERROR = 8
314 IF (IDIMF .LT. M+1) IERROR = 10
315 IF (M .LE. 3) IERROR = 12
316 IF (IERROR .NE. 0) RETURN
[all …]
|
| /dports/graphics/dataplot/dataplot-2c1b27601a3b7523449de612613eadeead9a8f70/src/ |
| H A D | dp28.F | 64 IERROR='NO'
111 IERROR='YES'
131 IERROR='YES'
285 IERROR='NO'
713 IERROR='YES'
1641 IERROR='NO'
1813 IERROR='NO'
1885 1IERROR)
3189 IERROR='NO'
4903 IERROR='NO'
[all …]
|
| H A D | dp15.F | 149 IERROR='NO'
1082 IERROR='NO'
2268 IERROR='NO'
2849 IERROR='NO'
2946 IERROR='NO'
3126 IERROR='NO'
3610 IERROR='NO'
3707 IERROR='NO'
3865 IERROR='NO'
4064 IERROR='NO'
[all …]
|
| H A D | dp24.F | 26 CHARACTER*4 IERROR
41 IERROR='NO'
172 IERROR='NO'
319 IERROR='NO'
450 IERROR='NO'
589 IERROR='NO'
721 IERROR='NO'
852 IERROR='NO'
1415 IERROR='NO'
1586 IERROR='YES'
[all …]
|
| H A D | dp9.F | 5 1IBUGP2,IFOUND,IERROR)
77 IERROR='NO'
377 IERROR='YES'
545 IERROR='NO'
635 IERROR='NO'
886 IERROR='NO'
1132 IERROR='NO'
1373 IERROR='NO'
1866 IERROR='NO'
3064 IERROR='NO'
[all …]
|
| H A D | dp17.F | 234 IERROR='NO'
2205 IERROR='NO'
2794 IERROR='NO'
3376 IERROR='NO'
3677 IERROR='NO'
3719 1IERROR)
5584 IERROR='NO'
6108 IERROR='NO'
6246 IERROR='NO'
6412 IERROR='NO'
[all …]
|
| H A D | dp14.F | 141 IERROR='NO'
319 IERROR='NO'
693 IERROR='NO'
2417 IERROR='NO'
2797 IERROR='NO'
3734 IERROR='NO'
4345 IERROR='NO'
4860 IERROR='NO'
5217 IERROR='NO'
5723 IERROR='NO'
[all …]
|
| H A D | dp8.F | 129 IERROR='NO'
420 IERROR='NO'
1342 IERROR='NO'
1551 IERROR='NO'
1792 IERROR='NO'
2113 IERROR='NO'
2505 IERROR='NO'
4444 IERROR='NO'
4913 IERROR='NO'
5422 IERROR='NO'
[all …]
|
| H A D | dp27.F | 26 CHARACTER*4 IERROR
41 IERROR='NO'
188 IERROR='NO'
320 IERROR='NO'
452 IERROR='NO'
634 IERROR='NO'
943 IERROR='NO'
1225 IERROR='NO'
1630 IERROR='NO'
2409 IERROR='NO'
[all …]
|
| H A D | dp23.F | 31 CHARACTER*4 IERROR
76 IERROR='NO'
351 IERROR='NO'
444 IERROR='NO'
530 IERROR='NO'
762 IERROR='NO'
1460 IERROR='NO'
1586 IERROR='NO'
1781 IERROR='NO'
2504 IERROR='NO'
[all …]
|
| H A D | dp11.F | 389 IERROR='NO'
390 IERRG4=IERROR
797 IERROR='NO'
962 IERROR='NO'
3062 IERROR='NO'
3287 IERROR='NO'
4569 IERROR='NO'
4795 IERROR='NO'
5055 IERROR='NO'
5636 IERROR='NO'
[all …]
|
| H A D | dp19.F | 1072 IERROR='NO'
1090 IERROR='YES'
1209 IERROR='NO'
1233 IERROR='YES'
1335 IERROR='YES'
1510 IERROR='NO'
2053 IERROR='NO'
2574 IERROR='NO'
3018 IERROR='NO'
3494 IERROR='NO'
[all …]
|
| /dports/science/apbs/apbs-pdb2pqr-apbs-1.5-102-g500c1473/apbs/externals/fetk/punc/src/cgcode/src_f77/ |
| H A D | scgdrv.f | 158 2 IPARAM,RPARAM,IWORK,RWORK,IERROR) argument
601 3 RWORK(2*N+2*KMAX+3),IERROR)
606 3 RWORK(3*N+KMAX+2),RWORK(3*N+2*KMAX+3),IERROR)
611 3 RWORK(5*N+1),RWORK(5*N+KMAX+2),RWORK(5*N+2*KMAX+3),IERROR)
616 3 RWORK(2*N+2*KMAX+3),IERROR)
621 3 RWORK(2*N+2*KMAX+3),IERROR)
626 3 RWORK(2*N+2*KMAX+3),IERROR)
631 3 RWORK(3*N+KMAX+2),RWORK(3*N+2*KMAX+3),IERROR)
636 3 RWORK(3*N+KMAX+2),RWORK(3*N+2*KMAX+3),IERROR)
641 3 RWORK(5*N+1),RWORK(6*N+1),RWORK(6*N+KMAX+2),IERROR)
[all …]
|