Home
last modified time | relevance | path

Searched refs:IDO (Results 1 – 25 of 483) sorted by relevance

12345678910>>...20

/dports/cad/calculix-ccx/CalculiX/ccx_2.18/src/
H A Ddrfftf.f130 102 IDP2 = IDO+2
145 CH(IDO,1,K) = CC(IDO,K,1)
161 IDP2 = IDO+2
199 102 IDP2 = IDO+2
230 TI1 = -HSQT2*(CC(IDO,K,2)+CC(IDO,K,4))
231 TR1 = HSQT2*(CC(IDO,K,2)-CC(IDO,K,4))
232 CH(IDO,1,K) = TR1+CC(IDO,K,1)
233 CH(IDO,3,K) = CC(IDO,K,1)-TR1
257 IDP2 = IDO+2
322 IS = -IDO
[all …]
/dports/math/cloog/cloog-cloog-0.20.0/test/bigs/
H A Dapsi.N.w2p829 # IDO IP L1 IPPH IDL1 1
21 # IDO IP L1 IPPH IDL1 1
28 # IDO IP L1 IPPH IDL1 1
35 # IDO IP L1 IPPH IDL1 1
42 # IDO IP L1 IPPH IDL1 1
49 # IDO IP L1 IPPH IDL1 1
56 # IDO IP L1 IPPH IDL1 1
63 # IDO IP L1 IPPH IDL1 1
70 # IDO IP L1 IPPH IDL1 1
77 # IDO IP L1 IPPH IDL1 1
[all …]
H A Dapsi.N.w2p899 # IDL1 IDO L1 IP IPPH NBD 1
13 IDL1 IDO L1 IP IPPH NBD # parameter names
21 # IDL1 IDO L1 IP IPPH NBD 1
28 # IDL1 IDO L1 IP IPPH NBD 1
35 # IDL1 IDO L1 IP IPPH NBD 1
42 # IDL1 IDO L1 IP IPPH NBD 1
49 # IDL1 IDO L1 IP IPPH NBD 1
56 # IDL1 IDO L1 IP IPPH NBD 1
63 # IDL1 IDO L1 IP IPPH NBD 1
70 # IDL1 IDO L1 IP IPPH NBD 1
[all …]
/dports/math/cmlib/cmlib-3.0_8/src/vfft/
H A Dvradb4.f5 DIMENSION CC(MDIMC,IDO,4,L1) ,CH(MDIMC,IDO,L1,4) ,
6 1 WA1(IDO) ,WA2(IDO) ,WA3(IDO)
11 1 -(CC(M,IDO,2,K)+CC(M,IDO,2,K))
13 1 +(CC(M,IDO,2,K)+CC(M,IDO,2,K))
20 IF (IDO-2) 107,105,102
21 102 IDP2 = IDO+2
23 DO 103 I=3,IDO,2
56 CH(M,IDO,K,1) = (CC(M,IDO,1,K)+CC(M,IDO,3,K))
57 1 +(CC(M,IDO,1,K)+CC(M,IDO,3,K))
58 CH(M,IDO,K,2) = SQRT2*((CC(M,IDO,1,K)-CC(M,IDO,3,K))
[all …]
H A Dvrftb1.f13 IDO = N/L2
14 IDL1 = IDO*L1
16 IX2 = IW+IDO
17 IX3 = IX2+IDO
26 CALL VRADB2 (M,IDO,L1,C,CH,MDIMC,WA(IW))
32 IX2 = IW+IDO
40 IX2 = IW+IDO
41 IX3 = IX2+IDO
42 IX4 = IX3+IDO
53 114 IF (IDO .EQ. 1) NA = 1-NA
[all …]
H A Dvrftf1.f14 IDO = N/L2
15 IDL1 = IDO*L1
16 IW = IW-(IP-1)*IDO
19 IX2 = IW+IDO
20 IX3 = IX2+IDO
28 CALL VRADF2 (M,IDO,L1,C,CH,MDIMC,WA(IW))
33 IX2 = IW+IDO
40 IX2 = IW+IDO
41 IX3 = IX2+IDO
42 IX4 = IX3+IDO
[all …]
/dports/math/cmlib/cmlib-3.0_8/src/fftpkg/
H A Drfftb1.f18 IDO = N/L2
19 IDL1 = IDO*L1
21 IX2 = IW+IDO
22 IX3 = IX2+IDO
31 CALL RADB2 (IDO,L1,C,CH,WA(IW))
37 IX2 = IW+IDO
45 IX2 = IW+IDO
46 IX3 = IX2+IDO
47 IX4 = IX3+IDO
58 114 IF (IDO .EQ. 1) NA = 1-NA
[all …]
H A Drfftf1.f19 IDO = N/L2
20 IDL1 = IDO*L1
21 IW = IW-(IP-1)*IDO
24 IX2 = IW+IDO
25 IX3 = IX2+IDO
33 CALL RADF2 (IDO,L1,C,CH,WA(IW))
38 IX2 = IW+IDO
45 IX2 = IW+IDO
46 IX3 = IX2+IDO
47 IX4 = IX3+IDO
[all …]
/dports/math/PDL/PDL-2.019/Lib/Slatec/slatec/
H A Drfftb1.f94 IDO = N/L2
95 IDL1 = IDO*L1
97 IX2 = IW+IDO
98 IX3 = IX2+IDO
107 CALL RADB2 (IDO,L1,C,CH,WA(IW))
113 IX2 = IW+IDO
121 IX2 = IW+IDO
122 IX3 = IX2+IDO
123 IX4 = IX3+IDO
134 114 IF (IDO .EQ. 1) NA = 1-NA
[all …]
H A Drfftf1.f96 IDO = N/L2
97 IDL1 = IDO*L1
98 IW = IW-(IP-1)*IDO
101 IX2 = IW+IDO
102 IX3 = IX2+IDO
110 CALL RADF2 (IDO,L1,C,CH,WA(IW))
115 IX2 = IW+IDO
122 IX2 = IW+IDO
123 IX3 = IX2+IDO
124 IX4 = IX3+IDO
[all …]
/dports/science/dcl/dcl-5.4.8/src/math2/fftlib/
H A Drfftb1.f11 IDO = N/L2
12 IDL1 = IDO*L1
14 IX2 = IW+IDO
15 IX3 = IX2+IDO
24 CALL RADB2 (IDO,L1,C,CH,WA(IW))
30 IX2 = IW+IDO
38 IX2 = IW+IDO
39 IX3 = IX2+IDO
40 IX4 = IX3+IDO
51 114 IF (IDO .EQ. 1) NA = 1-NA
[all …]
H A Drfftf1.f12 IDO = N/L2
13 IDL1 = IDO*L1
14 IW = IW-(IP-1)*IDO
17 IX2 = IW+IDO
18 IX3 = IX2+IDO
26 CALL RADF2 (IDO,L1,C,CH,WA(IW))
31 IX2 = IW+IDO
38 IX2 = IW+IDO
39 IX3 = IX2+IDO
40 IX4 = IX3+IDO
[all …]
H A Dradf4.f3 DIMENSION CC(IDO,L1,4) ,CH(IDO,4,L1) ,
10 CH(IDO,4,K) = TR2-TR1
14 IF (IDO-2) 107,105,102
15 102 IDP2 = IDO+2
17 DO 103 I=3,IDO,2
43 IF (MOD(IDO,2) .EQ. 1) RETURN
46 TI1 = -HSQT2*(CC(IDO,K,2)+CC(IDO,K,4))
47 TR1 = HSQT2*(CC(IDO,K,2)-CC(IDO,K,4))
48 CH(IDO,1,K) = TR1+CC(IDO,K,1)
49 CH(IDO,3,K) = CC(IDO,K,1)-TR1
[all …]
H A Dradb4.f3 DIMENSION CC(IDO,4,L1) ,CH(IDO,L1,4) ,
7 TR1 = CC(1,1,K)-CC(IDO,4,K)
8 TR2 = CC(1,1,K)+CC(IDO,4,K)
9 TR3 = CC(IDO,2,K)+CC(IDO,2,K)
16 IF (IDO-2) 107,105,102
17 102 IDP2 = IDO+2
19 DO 103 I=3,IDO,2
50 TR1 = CC(IDO,1,K)-CC(IDO,3,K)
51 TR2 = CC(IDO,1,K)+CC(IDO,3,K)
52 CH(IDO,K,1) = TR2+TR2
[all …]
H A Dradb2.f2 SUBROUTINE RADB2 (IDO,L1,CC,CH,WA1) argument
3 DIMENSION CC(IDO,2,L1) ,CH(IDO,L1,2) ,
6 CH(1,K,1) = CC(1,1,K)+CC(IDO,2,K)
7 CH(1,K,2) = CC(1,1,K)-CC(IDO,2,K)
9 IF (IDO-2) 107,105,102
10 102 IDP2 = IDO+2
12 DO 103 I=3,IDO,2
22 IF (MOD(IDO,2) .EQ. 1) RETURN
24 CH(IDO,K,1) = CC(IDO,1,K)+CC(IDO,1,K)
25 CH(IDO,K,2) = -(CC(1,2,K)+CC(1,2,K))
/dports/math/slatec/src/
H A Drfftf1.f96 IDO = N/L2
97 IDL1 = IDO*L1
98 IW = IW-(IP-1)*IDO
101 IX2 = IW+IDO
102 IX3 = IX2+IDO
110 CALL RADF2 (IDO,L1,C,CH,WA(IW))
115 IX2 = IW+IDO
122 IX2 = IW+IDO
123 IX3 = IX2+IDO
124 IX4 = IX3+IDO
[all …]
H A Drfftb1.f94 IDO = N/L2
95 IDL1 = IDO*L1
97 IX2 = IW+IDO
98 IX3 = IX2+IDO
107 CALL RADB2 (IDO,L1,C,CH,WA(IW))
113 IX2 = IW+IDO
121 IX2 = IW+IDO
122 IX3 = IX2+IDO
123 IX4 = IX3+IDO
134 114 IF (IDO .EQ. 1) NA = 1-NA
[all …]
/dports/science/dakota/dakota-6.13.0-release-public.src-UI/packages/external/dfftpack/
H A Drfftb1.f11 IDO = N/L2
12 IDL1 = IDO*L1
14 IX2 = IW+IDO
15 IX3 = IX2+IDO
24 CALL RADB2 (IDO,L1,C,CH,WA(IW))
30 IX2 = IW+IDO
38 IX2 = IW+IDO
39 IX3 = IX2+IDO
40 IX4 = IX3+IDO
51 114 IF (IDO .EQ. 1) NA = 1-NA
[all …]
H A Drfftf1.f12 IDO = N/L2
13 IDL1 = IDO*L1
14 IW = IW-(IP-1)*IDO
17 IX2 = IW+IDO
18 IX3 = IX2+IDO
26 CALL RADF2 (IDO,L1,C,CH,WA(IW))
31 IX2 = IW+IDO
38 IX2 = IW+IDO
39 IX3 = IX2+IDO
40 IX4 = IX3+IDO
[all …]
H A Dradb4.f3 DIMENSION CC(IDO,4,L1) ,CH(IDO,L1,4) ,
7 TR1 = CC(1,1,K)-CC(IDO,4,K)
8 TR2 = CC(1,1,K)+CC(IDO,4,K)
9 TR3 = CC(IDO,2,K)+CC(IDO,2,K)
16 IF (IDO-2) 107,105,102
17 102 IDP2 = IDO+2
19 DO 103 I=3,IDO,2
50 TR1 = CC(IDO,1,K)-CC(IDO,3,K)
51 TR2 = CC(IDO,1,K)+CC(IDO,3,K)
52 CH(IDO,K,1) = TR2+TR2
[all …]
H A Dradf4.f1 SUBROUTINE RADF4 (IDO,L1,CC,CH,WA1,WA2,WA3) argument
3 DIMENSION CC(IDO,L1,4) ,CH(IDO,4,L1) ,
10 CH(IDO,4,K) = TR2-TR1
14 IF (IDO-2) 107,105,102
15 102 IDP2 = IDO+2
17 DO 103 I=3,IDO,2
43 IF (MOD(IDO,2) .EQ. 1) RETURN
46 TI1 = -HSQT2*(CC(IDO,K,2)+CC(IDO,K,4))
47 TR1 = HSQT2*(CC(IDO,K,2)-CC(IDO,K,4))
48 CH(IDO,1,K) = TR1+CC(IDO,K,1)
[all …]
/dports/science/nwchem-data/nwchem-7.0.2-release/src/ddscf/fast/
H A Dsint.F177 IDO = N/L2
337 DOUBLE PRECISION CH(IDO,2,L1),CC(IDO,L1,2),WA1(*)
367 CH(IDO,1,K) = CC(IDO,K,1)
398 DOUBLE PRECISION CH(IDO,3,L1),CC(IDO,L1,3),WA1(*),WA2(*)
515 TI1 = -HSQT2* (CC(IDO,K,2)+CC(IDO,K,4))
516 TR1 = HSQT2* (CC(IDO,K,2)-CC(IDO,K,4))
517 CH(IDO,1,K) = TR1 + CC(IDO,K,1)
518 CH(IDO,3,K) = CC(IDO,K,1) - TR1
657 DOUBLE PRECISION CH(IDO,L1,IP),CC(IDO,IP,L1),C1(IDO,L1,IP),
680 IS = -IDO
[all …]
H A Dvsint.F176 DIMENSION CH(MDIMC,IDO,2,L1) ,CC(MDIMC,IDO,L1,2) ,
190 102 IDP2 = IDO+2
208 CH(M,IDO,1,K) = CC(M,IDO,K,1)
218 DIMENSION CH(MDIMC,IDO,3,L1) ,CC(MDIMC,IDO,L1,3) ,
219 1 WA1(IDO) ,WA2(IDO)
266 1 WA1(IDO) ,WA2(IDO) ,WA3(IDO)
319 CH(M,IDO,1,K) = (HSQT2*(CC(M,IDO,K,2)-CC(M,IDO,K,4)))+
321 CH(M,IDO,3,K) = CC(M,IDO,K,1)-(HSQT2*(CC(M,IDO,K,2)-
337 1 WA1(IDO) ,WA2(IDO) ,WA3(IDO) ,WA4(IDO)
430 IS = -IDO
[all …]
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/ddscf/fast/
H A Dsint.F177 IDO = N/L2
337 DOUBLE PRECISION CH(IDO,2,L1),CC(IDO,L1,2),WA1(*)
367 CH(IDO,1,K) = CC(IDO,K,1)
398 DOUBLE PRECISION CH(IDO,3,L1),CC(IDO,L1,3),WA1(*),WA2(*)
515 TI1 = -HSQT2* (CC(IDO,K,2)+CC(IDO,K,4))
516 TR1 = HSQT2* (CC(IDO,K,2)-CC(IDO,K,4))
517 CH(IDO,1,K) = TR1 + CC(IDO,K,1)
518 CH(IDO,3,K) = CC(IDO,K,1) - TR1
657 DOUBLE PRECISION CH(IDO,L1,IP),CC(IDO,IP,L1),C1(IDO,L1,IP),
680 IS = -IDO
[all …]
H A Dvsint.F176 DIMENSION CH(MDIMC,IDO,2,L1) ,CC(MDIMC,IDO,L1,2) ,
190 102 IDP2 = IDO+2
208 CH(M,IDO,1,K) = CC(M,IDO,K,1)
218 DIMENSION CH(MDIMC,IDO,3,L1) ,CC(MDIMC,IDO,L1,3) ,
219 1 WA1(IDO) ,WA2(IDO)
266 1 WA1(IDO) ,WA2(IDO) ,WA3(IDO)
319 CH(M,IDO,1,K) = (HSQT2*(CC(M,IDO,K,2)-CC(M,IDO,K,4)))+
321 CH(M,IDO,3,K) = CC(M,IDO,K,1)-(HSQT2*(CC(M,IDO,K,2)-
337 1 WA1(IDO) ,WA2(IDO) ,WA3(IDO) ,WA4(IDO)
430 IS = -IDO
[all …]

12345678910>>...20