Home
last modified time | relevance | path

Searched refs:TR12 (Results 1 – 25 of 47) sorted by relevance

12

/dports/math/cmlib/cmlib-3.0_8/src/vfft/
H A Dvradb5.f10 TR12=COS(2.*ARG)
16 1 +TR12*2.*CC(M,IDO,4,K))-(TI11*2.*CC(M,1,3,K)
18 CH(M,1,K,3) = (CC(M,1,1,K)+TR12*2.*CC(M,IDO,2,K)
21 CH(M,1,K,4) = (CC(M,1,1,K)+TR12*2.*CC(M,IDO,2,K)
25 1 +TR12*2.*CC(M,IDO,4,K))+(TI11*2.*CC(M,1,3,K)
40 1 (CC(M,I-1,3,K)+CC(M,IC-1,2,K))+TR12
47 1 -CC(M,IC,2,K))+TR12*(CC(M,I,5,K)-CC(M,IC,4,K)))
59 1 *((CC(M,I,1,K)+TR12*(CC(M,I,3,K)-
64 1 *((CC(M,I,1,K)+TR12*(CC(M,I,3,K)-
77 1 *((CC(M,I,1,K)+TR12*(CC(M,I,3,K)-
[all …]
H A Dvradf5.f10 TR12=COS(2.*ARG)
17 1 TR12*(CC(M,1,K,4)+CC(M,1,K,3))
20 CH(M,IDO,4,K) = CC(M,1,K,1)+TR12*(CC(M,1,K,5)+CC(M,1,K,2))+
43 1 +WA4(I-2)*CC(M,I-1,K,5)+WA4(I-1)*CC(M,I,K,5))+TR12*
52 1 +WA4(I-2)*CC(M,I-1,K,5)+WA4(I-1)*CC(M,I,K,5))+TR12*
61 1 CC(M,I-1,K,5)))+TR12*((WA2(I-2)*CC(M,I,K,3)-WA2(I-1)*
74 1 CC(M,I-1,K,5)))+TR12*((WA2(I-2)*CC(M,I,K,3)-WA2(I-1)*
77 CH(M,I-1,5,K) = (CC(M,I-1,K,1)+TR12*((WA1(I-2)*
86 CH(M,IC-1,4,K) = (CC(M,I-1,K,1)+TR12*((WA1(I-2)*
95 CH(M,I,5,K) = (CC(M,I,K,1)+TR12*((WA1(I-2)*CC(M,I,K,2)-
[all …]
/dports/math/cmlib/cmlib-3.0_8/src/fftpkg/
H A Dpassb5.f26 CR2 = CC(1,1,K)+TR11*TR2+TR12*TR3
27 CI2 = CC(2,1,K)+TR11*TI2+TR12*TI3
28 CR3 = CC(1,1,K)+TR12*TR2+TR11*TR3
29 CI3 = CC(2,1,K)+TR12*TI2+TR11*TI3
58 CR2 = CC(I-1,1,K)+TR11*TR2+TR12*TR3
59 CI2 = CC(I,1,K)+TR11*TI2+TR12*TI3
60 CR3 = CC(I-1,1,K)+TR12*TR2+TR11*TR3
61 CI3 = CC(I,1,K)+TR12*TI2+TR11*TI3
98 CR2 = CC(I-1,1,K)+TR11*TR2+TR12*TR3
99 CI2 = CC(I,1,K)+TR11*TI2+TR12*TI3
[all …]
H A Dpassf5.f26 CR2 = CC(1,1,K)+TR11*TR2+TR12*TR3
27 CI2 = CC(2,1,K)+TR11*TI2+TR12*TI3
28 CR3 = CC(1,1,K)+TR12*TR2+TR11*TR3
29 CI3 = CC(2,1,K)+TR12*TI2+TR11*TI3
58 CR2 = CC(I-1,1,K)+TR11*TR2+TR12*TR3
59 CI2 = CC(I,1,K)+TR11*TI2+TR12*TI3
60 CR3 = CC(I-1,1,K)+TR12*TR2+TR11*TR3
61 CI3 = CC(I,1,K)+TR12*TI2+TR11*TI3
98 CR2 = CC(I-1,1,K)+TR11*TR2+TR12*TR3
99 CI2 = CC(I,1,K)+TR11*TI2+TR12*TI3
[all …]
H A Dradf5.f11 DATA TR11,TI11,TR12,TI12 /.309016994374947,.951056516295154,
20 CH(IDO,2,K) = CC(1,K,1)+TR11*CR2+TR12*CR3
22 CH(IDO,4,K) = CC(1,K,1)+TR12*CR2+TR11*CR3
50 TR2 = CC(I-1,K,1)+TR11*CR2+TR12*CR3
51 TI2 = CC(I,K,1)+TR11*CI2+TR12*CI3
52 TR3 = CC(I-1,K,1)+TR12*CR2+TR11*CR3
53 TI3 = CC(I,K,1)+TR12*CI2+TR11*CI3
91 TR2 = CC(I-1,K,1)+TR11*CR2+TR12*CR3
92 TI2 = CC(I,K,1)+TR11*CI2+TR12*CI3
93 TR3 = CC(I-1,K,1)+TR12*CR2+TR11*CR3
[all …]
H A Dradb5.f11 DATA TR11,TI11,TR12,TI12 /.309016994374947,.951056516295154,
20 CR2 = CC(1,1,K)+TR11*TR2+TR12*TR3
21 CR3 = CC(1,1,K)+TR12*TR2+TR11*TR3
46 CR2 = CC(I-1,1,K)+TR11*TR2+TR12*TR3
47 CI2 = CC(I,1,K)+TR11*TI2+TR12*TI3
48 CR3 = CC(I-1,1,K)+TR12*TR2+TR11*TR3
49 CI3 = CC(I,1,K)+TR12*TI2+TR11*TI3
87 CR2 = CC(I-1,1,K)+TR11*TR2+TR12*TR3
88 CI2 = CC(I,1,K)+TR11*TI2+TR12*TI3
89 CR3 = CC(I-1,1,K)+TR12*TR2+TR11*TR3
[all …]
/dports/math/slatec/src/
H A Dpassf5.f30 TR12 = -SIN(.3*PI)
44 CR2 = CC(1,1,K)+TR11*TR2+TR12*TR3
45 CI2 = CC(2,1,K)+TR11*TI2+TR12*TI3
46 CR3 = CC(1,1,K)+TR12*TR2+TR11*TR3
47 CI3 = CC(2,1,K)+TR12*TI2+TR11*TI3
76 CR2 = CC(I-1,1,K)+TR11*TR2+TR12*TR3
77 CI2 = CC(I,1,K)+TR11*TI2+TR12*TI3
78 CR3 = CC(I-1,1,K)+TR12*TR2+TR11*TR3
79 CI3 = CC(I,1,K)+TR12*TI2+TR11*TI3
117 CI2 = CC(I,1,K)+TR11*TI2+TR12*TI3
[all …]
H A Dpassb5.f30 TR12 = -SIN(.3*PI)
44 CR2 = CC(1,1,K)+TR11*TR2+TR12*TR3
45 CI2 = CC(2,1,K)+TR11*TI2+TR12*TI3
46 CR3 = CC(1,1,K)+TR12*TR2+TR11*TR3
47 CI3 = CC(2,1,K)+TR12*TI2+TR11*TI3
76 CR2 = CC(I-1,1,K)+TR11*TR2+TR12*TR3
77 CI2 = CC(I,1,K)+TR11*TI2+TR12*TI3
78 CR3 = CC(I-1,1,K)+TR12*TR2+TR11*TR3
79 CI3 = CC(I,1,K)+TR12*TI2+TR11*TI3
117 CI2 = CC(I,1,K)+TR11*TI2+TR12*TI3
[all …]
H A Dradf5.f30 TR12 = -SIN(.3*PI)
38 CH(IDO,2,K) = CC(1,K,1)+TR11*CR2+TR12*CR3
40 CH(IDO,4,K) = CC(1,K,1)+TR12*CR2+TR11*CR3
68 TR2 = CC(I-1,K,1)+TR11*CR2+TR12*CR3
69 TI2 = CC(I,K,1)+TR11*CI2+TR12*CI3
70 TR3 = CC(I-1,K,1)+TR12*CR2+TR11*CR3
71 TI3 = CC(I,K,1)+TR12*CI2+TR11*CI3
109 TR2 = CC(I-1,K,1)+TR11*CR2+TR12*CR3
110 TI2 = CC(I,K,1)+TR11*CI2+TR12*CI3
111 TR3 = CC(I-1,K,1)+TR12*CR2+TR11*CR3
[all …]
H A Dradb5.f30 TR12 = -SIN(.3*PI)
38 CR2 = CC(1,1,K)+TR11*TR2+TR12*TR3
39 CR3 = CC(1,1,K)+TR12*TR2+TR11*TR3
64 CR2 = CC(I-1,1,K)+TR11*TR2+TR12*TR3
65 CI2 = CC(I,1,K)+TR11*TI2+TR12*TI3
66 CR3 = CC(I-1,1,K)+TR12*TR2+TR11*TR3
67 CI3 = CC(I,1,K)+TR12*TI2+TR11*TI3
105 CR2 = CC(I-1,1,K)+TR11*TR2+TR12*TR3
106 CI2 = CC(I,1,K)+TR11*TI2+TR12*TI3
107 CR3 = CC(I-1,1,K)+TR12*TR2+TR11*TR3
[all …]
/dports/science/dcl/dcl-5.4.8/src/math2/fftlib/
H A Dpassb5.f5 DATA TR11,TI11,TR12,TI12 /.309016994374947,.951056516295154,
19 CR2 = CC(1,1,K)+TR11*TR2+TR12*TR3
20 CI2 = CC(2,1,K)+TR11*TI2+TR12*TI3
21 CR3 = CC(1,1,K)+TR12*TR2+TR11*TR3
22 CI3 = CC(2,1,K)+TR12*TI2+TR11*TI3
49 CR2 = CC(I-1,1,K)+TR11*TR2+TR12*TR3
50 CI2 = CC(I,1,K)+TR11*TI2+TR12*TI3
51 CR3 = CC(I-1,1,K)+TR12*TR2+TR11*TR3
52 CI3 = CC(I,1,K)+TR12*TI2+TR11*TI3
H A Dpassf5.f5 DATA TR11,TI11,TR12,TI12 /.309016994374947,-.951056516295154,
19 CR2 = CC(1,1,K)+TR11*TR2+TR12*TR3
20 CI2 = CC(2,1,K)+TR11*TI2+TR12*TI3
21 CR3 = CC(1,1,K)+TR12*TR2+TR11*TR3
22 CI3 = CC(2,1,K)+TR12*TI2+TR11*TI3
49 CR2 = CC(I-1,1,K)+TR11*TR2+TR12*TR3
50 CI2 = CC(I,1,K)+TR11*TI2+TR12*TI3
51 CR3 = CC(I-1,1,K)+TR12*TR2+TR11*TR3
52 CI3 = CC(I,1,K)+TR12*TI2+TR11*TI3
H A Dradf5.f5 DATA TR11,TI11,TR12,TI12 /.309016994374947,.951056516295154,
13 CH(IDO,2,K) = CC(1,K,1)+TR11*CR2+TR12*CR3
15 CH(IDO,4,K) = CC(1,K,1)+TR12*CR2+TR11*CR3
41 TR2 = CC(I-1,K,1)+TR11*CR2+TR12*CR3
42 TI2 = CC(I,K,1)+TR11*CI2+TR12*CI3
43 TR3 = CC(I-1,K,1)+TR12*CR2+TR11*CR3
44 TI3 = CC(I,K,1)+TR12*CI2+TR11*CI3
H A Dradb5.f5 DATA TR11,TI11,TR12,TI12 /.309016994374947,.951056516295154,
13 CR2 = CC(1,1,K)+TR11*TR2+TR12*TR3
14 CR3 = CC(1,1,K)+TR12*TR2+TR11*TR3
37 CR2 = CC(I-1,1,K)+TR11*TR2+TR12*TR3
38 CI2 = CC(I,1,K)+TR11*TI2+TR12*TI3
39 CR3 = CC(I-1,1,K)+TR12*TR2+TR11*TR3
40 CI3 = CC(I,1,K)+TR12*TI2+TR11*TI3
/dports/science/dakota/dakota-6.13.0-release-public.src-UI/packages/external/dfftpack/
H A Dpassf5.f7 DATA TR11,TI11,TR12,TI12 /0.3090169943749474241D0,
22 CR2 = CC(1,1,K)+TR11*TR2+TR12*TR3
23 CI2 = CC(2,1,K)+TR11*TI2+TR12*TI3
24 CR3 = CC(1,1,K)+TR12*TR2+TR11*TR3
25 CI3 = CC(2,1,K)+TR12*TI2+TR11*TI3
52 CR2 = CC(I-1,1,K)+TR11*TR2+TR12*TR3
53 CI2 = CC(I,1,K)+TR11*TI2+TR12*TI3
54 CR3 = CC(I-1,1,K)+TR12*TR2+TR11*TR3
55 CI3 = CC(I,1,K)+TR12*TI2+TR11*TI3
H A Dpassb5.f7 DATA TR11,TI11,TR12,TI12 /0.3090169943749474241D0,
22 CR2 = CC(1,1,K)+TR11*TR2+TR12*TR3
23 CI2 = CC(2,1,K)+TR11*TI2+TR12*TI3
24 CR3 = CC(1,1,K)+TR12*TR2+TR11*TR3
25 CI3 = CC(2,1,K)+TR12*TI2+TR11*TI3
52 CR2 = CC(I-1,1,K)+TR11*TR2+TR12*TR3
53 CI2 = CC(I,1,K)+TR11*TI2+TR12*TI3
54 CR3 = CC(I-1,1,K)+TR12*TR2+TR11*TR3
55 CI3 = CC(I,1,K)+TR12*TI2+TR11*TI3
H A Dradf5.f5 DATA TR11,TI11,TR12,TI12 /0.3090169943749474241D0,
14 CH(IDO,2,K) = CC(1,K,1)+TR11*CR2+TR12*CR3
16 CH(IDO,4,K) = CC(1,K,1)+TR12*CR2+TR11*CR3
42 TR2 = CC(I-1,K,1)+TR11*CR2+TR12*CR3
43 TI2 = CC(I,K,1)+TR11*CI2+TR12*CI3
44 TR3 = CC(I-1,K,1)+TR12*CR2+TR11*CR3
45 TI3 = CC(I,K,1)+TR12*CI2+TR11*CI3
H A Dradb5.f7 DATA TR11,TI11,TR12,TI12 /0.3090169943749474241D0,
16 CR2 = CC(1,1,K)+TR11*TR2+TR12*TR3
17 CR3 = CC(1,1,K)+TR12*TR2+TR11*TR3
40 CR2 = CC(I-1,1,K)+TR11*TR2+TR12*TR3
41 CI2 = CC(I,1,K)+TR11*TI2+TR12*TI3
42 CR3 = CC(I-1,1,K)+TR12*TR2+TR11*TR3
43 CI3 = CC(I,1,K)+TR12*TI2+TR11*TI3
/dports/math/PDL/PDL-2.019/Lib/Slatec/slatec/
H A Dradf5.f30 TR12 = -SIN(.3*PI)
38 CH(IDO,2,K) = CC(1,K,1)+TR11*CR2+TR12*CR3
40 CH(IDO,4,K) = CC(1,K,1)+TR12*CR2+TR11*CR3
68 TR2 = CC(I-1,K,1)+TR11*CR2+TR12*CR3
69 TI2 = CC(I,K,1)+TR11*CI2+TR12*CI3
70 TR3 = CC(I-1,K,1)+TR12*CR2+TR11*CR3
71 TI3 = CC(I,K,1)+TR12*CI2+TR11*CI3
109 TR2 = CC(I-1,K,1)+TR11*CR2+TR12*CR3
110 TI2 = CC(I,K,1)+TR11*CI2+TR12*CI3
111 TR3 = CC(I-1,K,1)+TR12*CR2+TR11*CR3
[all …]
H A Dradb5.f30 TR12 = -SIN(.3*PI)
38 CR2 = CC(1,1,K)+TR11*TR2+TR12*TR3
39 CR3 = CC(1,1,K)+TR12*TR2+TR11*TR3
64 CR2 = CC(I-1,1,K)+TR11*TR2+TR12*TR3
65 CI2 = CC(I,1,K)+TR11*TI2+TR12*TI3
66 CR3 = CC(I-1,1,K)+TR12*TR2+TR11*TR3
67 CI3 = CC(I,1,K)+TR12*TI2+TR11*TI3
105 CR2 = CC(I-1,1,K)+TR11*TR2+TR12*TR3
106 CI2 = CC(I,1,K)+TR11*TI2+TR12*TI3
107 CR3 = CC(I-1,1,K)+TR12*TR2+TR11*TR3
[all …]
/dports/math/algae/algae-4.3.6/src/
H A Dcfft.f630 CR2 = CC(1,1,K)+TR11*TR2+TR12*TR3
631 CI2 = CC(2,1,K)+TR11*TI2+TR12*TI3
632 CR3 = CC(1,1,K)+TR12*TR2+TR11*TR3
633 CI3 = CC(2,1,K)+TR12*TI2+TR11*TI3
663 CI2 = CC(I,1,K)+TR11*TI2+TR12*TI3
665 CI3 = CC(I,1,K)+TR12*TI2+TR11*TI3
703 CI2 = CC(I,1,K)+TR11*TI2+TR12*TI3
1234 CR2 = CC(1,1,K)+TR11*TR2+TR12*TR3
1235 CI2 = CC(2,1,K)+TR11*TI2+TR12*TI3
1236 CR3 = CC(1,1,K)+TR12*TR2+TR11*TR3
[all …]
/dports/science/nwchem-data/nwchem-7.0.2-release/contrib/qmd_tools/
H A Dqmd_analysis.f901088 CR2 = CC(1,1,K)+TR11*TR2+TR12*TR3
1089 CI2 = CC(2,1,K)+TR11*TI2+TR12*TI3
1090 CR3 = CC(1,1,K)+TR12*TR2+TR11*TR3
1091 CI3 = CC(2,1,K)+TR12*TI2+TR11*TI3
1119 CI2 = CC(I,1,K)+TR11*TI2+TR12*TI3
1121 CI3 = CC(I,1,K)+TR12*TI2+TR11*TI3
1409 CR2 = CC(1,1,K)+TR11*TR2+TR12*TR3
1410 CI2 = CC(2,1,K)+TR11*TI2+TR12*TI3
1411 CR3 = CC(1,1,K)+TR12*TR2+TR11*TR3
1412 CI3 = CC(2,1,K)+TR12*TI2+TR11*TI3
[all …]
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/contrib/qmd_tools/
H A Dqmd_analysis.f901088 CR2 = CC(1,1,K)+TR11*TR2+TR12*TR3
1089 CI2 = CC(2,1,K)+TR11*TI2+TR12*TI3
1090 CR3 = CC(1,1,K)+TR12*TR2+TR11*TR3
1091 CI3 = CC(2,1,K)+TR12*TI2+TR11*TI3
1119 CI2 = CC(I,1,K)+TR11*TI2+TR12*TI3
1121 CI3 = CC(I,1,K)+TR12*TI2+TR11*TI3
1409 CR2 = CC(1,1,K)+TR11*TR2+TR12*TR3
1410 CI2 = CC(2,1,K)+TR11*TI2+TR12*TI3
1411 CR3 = CC(1,1,K)+TR12*TR2+TR11*TR3
1412 CI3 = CC(2,1,K)+TR12*TI2+TR11*TI3
[all …]
/dports/science/py-scipy/scipy-1.7.1/scipy/linalg/src/id_dist/src/
H A Ddfft.f1608 DATA TR11,TI11,TR12,TI12 /
1625 CR2 = CC(1,1,K)+TR11*TR2+TR12*TR3
1626 CI2 = CC(2,1,K)+TR11*TI2+TR12*TI3
1627 CR3 = CC(1,1,K)+TR12*TR2+TR11*TR3
1628 CI3 = CC(2,1,K)+TR12*TI2+TR11*TI3
1923 DATA TR11,TI11,TR12,TI12 /
1940 CR2 = CC(1,1,K)+TR11*TR2+TR12*TR3
1941 CI2 = CC(2,1,K)+TR11*TI2+TR12*TI3
1942 CR3 = CC(1,1,K)+TR12*TR2+TR11*TR3
2126 DATA TR11,TI11,TR12,TI12 /
[all …]
/dports/science/nwchem-data/nwchem-7.0.2-release/src/ddscf/fast/
H A Dsint.F541 DOUBLE PRECISION TR12 local
569 DATA TR11,TI11,TR12,TI12/.309016994374947D0,.951056516295154D0,
580 CH(IDO,2,K) = CC(1,K,1) + TR11*CR2 + TR12*CR3
582 CH(IDO,4,K) = CC(1,K,1) + TR12*CR2 + TR11*CR3
608 TR2 = CC(I-1,K,1) + TR11*CR2 + TR12*CR3
609 TI2 = CC(I,K,1) + TR11*CI2 + TR12*CI3
610 TR3 = CC(I-1,K,1) + TR12*CR2 + TR11*CR3
611 TI3 = CC(I,K,1) + TR12*CI2 + TR11*CI3

12