| /dports/math/slatec/src/ |
| H A D | dxpqnu.f | 40 IERROR=0
59 IF (IERROR.NE.0) RETURN
90 CALL DXADJ(A,IA,IERROR)
91 IF (IERROR.NE.0) RETURN
94 IF (IERROR.NE.0) RETURN
104 IF (IERROR.NE.0) RETURN
108 IF (IERROR.NE.0) RETURN
136 CALL DXADJ(A,IA,IERROR)
137 IF (IERROR.NE.0) RETURN
143 IF (IERROR.NE.0) RETURN
[all …]
|
| H A D | chkprm.f | 3 + COFX, COFY, IDMN, IERROR)
25 IERROR = 1
30 IERROR = 2
32 IERROR = 3
37 IERROR = 5
42 IERROR = 6
47 IERROR = 7
52 IERROR = 8
57 IERROR = 9
71 IERROR = 10
[all …]
|
| H A D | chkpr4.f | 3 + IDMN, IERROR)
24 IERROR = 1
29 IERROR = 2
31 IERROR = 3
36 IERROR = 5
41 IERROR = 6
46 IERROR = 7
51 IERROR = 8
61 IERROR=10
68 IERROR = 0
|
| H A D | xqnu.f | 3 1 IERROR)
28 IERROR=0
40 IF (IERROR.NE.0) RETURN
52 IF (IERROR.NE.0) RETURN
73 IF (IERROR.NE.0) RETURN
74 CALL XADJ(PQ,IPQ,IERROR)
75 IF (IERROR.NE.0) RETURN
112 CALL XADD(X1,IPQ1,X2,IPQ2,PQ,IPQ,IERROR)
113 IF (IERROR.NE.0) RETURN
114 CALL XADJ(PQ,IPQ,IERROR)
[all …]
|
| H A D | dxqnu.f | 3 1 IERROR)
28 IERROR=0
40 IF (IERROR.NE.0) RETURN
52 IF (IERROR.NE.0) RETURN
73 IF (IERROR.NE.0) RETURN
74 CALL DXADJ(PQ,IPQ,IERROR)
75 IF (IERROR.NE.0) RETURN
112 CALL DXADD(X1,IPQ1,X2,IPQ2,PQ,IPQ,IERROR)
113 IF (IERROR.NE.0) RETURN
114 CALL DXADJ(PQ,IPQ,IERROR)
[all …]
|
| H A D | xpmu.f | 3 1 IERROR)
31 IERROR=0
32 CALL XPQNU(NU1,NU2,MU2,THETA,ID,PQA,IPQA,IERROR)
33 IF (IERROR.NE.0) RETURN
40 CALL XPQNU(NU1,NU2,MU,THETA,ID,PQA,IPQA,IERROR)
41 IF (IERROR.NE.0) RETURN
60 CALL XADD(X1,IPQA(J+1),X2,IPQA(J+2),PQA(J),IPQA(J),IERROR)
61 IF (IERROR.NE.0) RETURN
62 CALL XADJ(PQA(J),IPQA(J),IERROR)
63 IF (IERROR.NE.0) RETURN
|
| H A D | dxpmu.f | 3 1 IERROR)
31 IERROR=0
32 CALL DXPQNU(NU1,NU2,MU2,THETA,ID,PQA,IPQA,IERROR)
33 IF (IERROR.NE.0) RETURN
40 CALL DXPQNU(NU1,NU2,MU,THETA,ID,PQA,IPQA,IERROR)
41 IF (IERROR.NE.0) RETURN
60 CALL DXADD(X1,IPQA(J+1),X2,IPQA(J+2),PQA(J),IPQA(J),IERROR)
61 IF (IERROR.NE.0) RETURN
62 CALL DXADJ(PQA(J),IPQA(J),IERROR)
63 IF (IERROR.NE.0) RETURN
|
| H A D | dxnrmp.f | 3 1 IERROR)
137 IERROR=0
139 IF (IERROR.NE.0) RETURN
194 CALL DXADJ(P2, IP2,IERROR)
195 IF (IERROR.NE.0) RETURN
199 CALL DXADJ(P2, IP2,IERROR)
200 IF (IERROR.NE.0) RETURN
216 IF (IERROR.NE.0) RETURN
255 IERROR=212
258 IERROR=213
[all …]
|
| H A D | xnrmp.f | 3 1 IERROR)
137 IERROR=0
139 IF (IERROR.NE.0) RETURN
194 CALL XADJ(P2, IP2,IERROR)
195 IF (IERROR.NE.0) RETURN
199 CALL XADJ(P2, IP2,IERROR)
200 IF (IERROR.NE.0) RETURN
216 IF (IERROR.NE.0) RETURN
255 IERROR=112
258 IERROR=113
[all …]
|
| H A D | xpmup.f | 2 SUBROUTINE XPMUP (NU1, NU2, MU1, MU2, PQA, IPQA, IERROR) argument
28 IERROR=0
54 220 CALL XADJ(PROD,IPROD,IERROR)
55 IF (IERROR.NE.0) RETURN
61 CALL XADJ(PQA(I),IPQA(I),IERROR)
62 IF (IERROR.NE.0) RETURN
65 CALL XADJ(PROD,IPROD,IERROR)
66 IF (IERROR.NE.0) RETURN
71 CALL XADJ(PROD,IPROD,IERROR)
72 IF (IERROR.NE.0) RETURN
|
| H A D | dxpmup.f | 2 SUBROUTINE DXPMUP (NU1, NU2, MU1, MU2, PQA, IPQA, IERROR) argument
28 IERROR=0
54 220 CALL DXADJ(PROD,IPROD,IERROR)
55 IF (IERROR.NE.0) RETURN
61 CALL DXADJ(PQA(I),IPQA(I),IERROR)
62 IF (IERROR.NE.0) RETURN
65 CALL DXADJ(PROD,IPROD,IERROR)
66 IF (IERROR.NE.0) RETURN
71 CALL DXADJ(PROD,IPROD,IERROR)
72 IF (IERROR.NE.0) RETURN
|
| H A D | dxqmu.f | 3 1 IERROR)
27 IERROR=0
32 CALL DXPQNU(NU1,NU2,MU,THETA,ID,PQA,IPQA,IERROR)
33 IF (IERROR.NE.0) RETURN
40 CALL DXPQNU(NU1,NU2,MU,THETA,ID,PQA,IPQA,IERROR)
41 IF (IERROR.NE.0) RETURN
67 CALL DXADD(X1,IPQ1,-X2,IPQ2,PQ,IPQ,IERROR)
68 IF (IERROR.NE.0) RETURN
69 CALL DXADJ(PQ,IPQ,IERROR)
70 IF (IERROR.NE.0) RETURN
|
| H A D | xpnrm.f | 2 SUBROUTINE XPNRM (NU1, NU2, MU1, MU2, PQA, IPQA, IERROR) argument
28 IERROR=0
60 510 CALL XADJ(PROD,IPROD,IERROR)
61 IF (IERROR.NE.0) RETURN
66 CALL XADJ(PQA(I),IPQA(I),IERROR)
67 IF (IERROR.NE.0) RETURN
72 CALL XADJ(PROD,IPROD,IERROR)
73 IF (IERROR.NE.0) RETURN
84 CALL XADJ(PROD,IPROD,IERROR)
85 IF (IERROR.NE.0) RETURN
|
| H A D | xqmu.f | 3 1 IERROR)
27 IERROR=0
32 CALL XPQNU(NU1,NU2,MU,THETA,ID,PQA,IPQA,IERROR)
33 IF (IERROR.NE.0) RETURN
40 CALL XPQNU(NU1,NU2,MU,THETA,ID,PQA,IPQA,IERROR)
41 IF (IERROR.NE.0) RETURN
67 CALL XADD(X1,IPQ1,-X2,IPQ2,PQ,IPQ,IERROR)
68 IF (IERROR.NE.0) RETURN
69 CALL XADJ(PQ,IPQ,IERROR)
70 IF (IERROR.NE.0) RETURN
|
| /dports/math/cmlib/cmlib-3.0_8/src/vhs3/ |
| H A D | hs3cri.f | 11 IERROR = 0
12 IF (XS.GT.XF) IERROR=1
13 IF (L.LT.3) IERROR=2
15 IF (YS.GT.YF) IERROR=4
16 IF (M.LT.3) IERROR=5
18 IF (ZS.GT.ZF) IERROR=7
19 IF (N.LT.3) IERROR=8
21 IF (LDIMF.LT.L) IERROR=11
22 IF (MDIMF.LT.M) IERROR=12
23 IF (IERROR.NE.0) RETURN
[all …]
|
| H A D | pst3di.f | 2 * LDIMF,MDIMF,IERROR,W)
14 IERROR=0
15 IF (LPEROD.NE.0 .AND. LPEROD.NE.1) IERROR=1
16 IF (L.LT.3) IERROR=2
17 IF (MPEROD.LT.0 .AND. MPEROD.GT.4) IERROR=3
18 IF (M.LT.3) IERROR=4
20 IF (N.LT.3) IERROR=6
21 IF (LDIMF.LT.L) IERROR=7
22 IF (MDIMF.LT.M) IERROR=8
31 110 IERROR=9
[all …]
|
| /dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/peigs/comm/ |
| H A D | mxsubs.F | 105 INTEGER IERROR
128 IF( IERROR .NE. 0 ) THEN
135 CALL MPI_INIT( IERROR )
190 INTEGER IERROR
208 IF( IERROR .NE. 0 ) THEN
215 IF( IERROR .NE. 0 ) THEN
347 IF( IERROR .NE. 0 ) THEN
398 INTEGER IERROR
476 INTEGER IERROR
590 INTEGER IERROR local
[all …]
|
| /dports/science/nwchem-data/nwchem-7.0.2-release/src/peigs/comm/ |
| H A D | mxsubs.F | 105 INTEGER IERROR
128 IF( IERROR .NE. 0 ) THEN
135 CALL MPI_INIT( IERROR )
190 INTEGER IERROR
208 IF( IERROR .NE. 0 ) THEN
215 IF( IERROR .NE. 0 ) THEN
347 IF( IERROR .NE. 0 ) THEN
398 INTEGER IERROR
476 INTEGER IERROR
590 INTEGER IERROR local
[all …]
|
| /dports/math/cmlib/cmlib-3.0_8/src/fishpak/ |
| H A D | chkprm.f | 2 + COFX, COFY, IDMN, IERROR)
24 IERROR = 1
29 IERROR = 2
31 IERROR = 3
36 IERROR = 5
41 IERROR = 6
46 IERROR = 7
51 IERROR = 8
56 IERROR = 9
70 IERROR = 10
[all …]
|
| H A D | chkpr4.f | 2 + IDMN, IERROR)
24 IERROR = 1
29 IERROR = 2
31 IERROR = 3
36 IERROR = 5
41 IERROR = 6
46 IERROR = 7
51 IERROR = 8
64 IERROR=10
71 IERROR = 0
|
| /dports/math/py-pynleq2/pysces-0.9.8/pysces/pitcon/ |
| H A D | dpcon61.f | 1205 IERROR=0
1272 IERROR=1
1277 IERROR=1
1374 IERROR=0
1736 IERROR=8
1840 IERROR=4
1931 IERROR=9
2222 IERROR=0
2326 IERROR=5
3012 IERROR=0
[all …]
|
| /dports/biology/py-PySCeS/pysces-1.0.0/pysces/pitcon/ |
| H A D | dpcon61.f | 1205 IERROR=0
1272 IERROR=1
1277 IERROR=1
1374 IERROR=0
1736 IERROR=8
1840 IERROR=4
1931 IERROR=9
2222 IERROR=0
2326 IERROR=5
3012 IERROR=0
[all …]
|
| /dports/graphics/dataplot/dataplot-2c1b27601a3b7523449de612613eadeead9a8f70/src/ |
| H A D | dp4.F | 381 IERROR='NO'
554 IERROR='YES'
629 IERROR='YES'
727 IERROR='NO'
1207 IERROR='NO'
1244 IERROR='NO'
1365 IERROR='NO'
1912 IERROR='NO'
3531 IERROR='NO'
4554 IERROR='NO'
[all …]
|
| H A D | dp20.F | 247 IERROR='NO'
295 IERROR='YES'
313 IERROR='YES'
1851 IERROR='NO'
1895 IERROR='NO'
2202 IERROR='NO'
2645 IERROR='NO'
2680 IERROR='NO'
2966 IERROR='NO'
3505 IERROR='NO'
[all …]
|
| /dports/misc/libemos/libemos-4.5.9-Source/interpolation/ |
| H A D | iafree.F | 158 INTEGER IABORT, IERROR
194 IERROR = 0
201 CALL HPDEALLC (MADDR (JLEVEL), IERROR, IABORT)
203 IF (IERROR .EQ. -4) THEN
208 ELSE IF (IERROR .NE. 0) THEN
210 IF (IERROR .EQ. -3) THEN
216 X 'IAFREE: Heap deallocation failed.',IERROR)
220 ELSE IF (IERROR .EQ. -5) THEN
226 X 'IAFREE: Heap deallocation failed.',IERROR)
236 X 'IAFREE: Heap deallocation failed.',IERROR)
|