| /dports/science/nwchem-data/nwchem-7.0.2-release/src/fft/pfft1.0/fftpack/ |
| H A D | dpssb.F | 107 idij = 0
109 idij = idij+2
111 idij = idij+2
113 c1(i-1,k,j) = wa(idij-1)*ch(i-1,k,j)-wa(idij)*ch(i,k,j)
114 c1(i,k,j) = wa(idij-1)*ch(i,k,j)+wa(idij)*ch(i-1,k,j)
124 idij = idj
126 idij = idij+2
127 c1(i-1,k,j) = wa(idij-1)*ch(i-1,k,j)-wa(idij)*ch(i,k,j)
128 c1(i,k,j) = wa(idij-1)*ch(i,k,j)+wa(idij)*ch(i-1,k,j)
|
| H A D | dpssf.F | 107 idij = 0
109 idij = idij+2
111 idij = idij+2
113 c1(i-1,k,j) = wa(idij-1)*ch(i-1,k,j)+wa(idij)*ch(i,k,j)
114 c1(i,k,j) = wa(idij-1)*ch(i,k,j)-wa(idij)*ch(i-1,k,j)
124 idij = idj
126 idij = idij+2
127 c1(i-1,k,j) = wa(idij-1)*ch(i-1,k,j)+wa(idij)*ch(i,k,j)
128 c1(i,k,j) = wa(idij-1)*ch(i,k,j)-wa(idij)*ch(i-1,k,j)
|
| /dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/fft/pfft1.0/fftpack/ |
| H A D | dpssb.F | 107 idij = 0
109 idij = idij+2
111 idij = idij+2
113 c1(i-1,k,j) = wa(idij-1)*ch(i-1,k,j)-wa(idij)*ch(i,k,j)
114 c1(i,k,j) = wa(idij-1)*ch(i,k,j)+wa(idij)*ch(i-1,k,j)
124 idij = idj
126 idij = idij+2
127 c1(i-1,k,j) = wa(idij-1)*ch(i-1,k,j)-wa(idij)*ch(i,k,j)
128 c1(i,k,j) = wa(idij-1)*ch(i,k,j)+wa(idij)*ch(i-1,k,j)
|
| H A D | dpssf.F | 107 idij = 0
109 idij = idij+2
111 idij = idij+2
113 c1(i-1,k,j) = wa(idij-1)*ch(i-1,k,j)+wa(idij)*ch(i,k,j)
114 c1(i,k,j) = wa(idij-1)*ch(i,k,j)-wa(idij)*ch(i-1,k,j)
124 idij = idj
126 idij = idij+2
127 c1(i-1,k,j) = wa(idij-1)*ch(i-1,k,j)+wa(idij)*ch(i,k,j)
128 c1(i,k,j) = wa(idij-1)*ch(i,k,j)-wa(idij)*ch(i-1,k,j)
|
| H A D | spssf.F | 95 idij = 0
97 idij = idij+2
99 idij = idij+2
101 c1(i-1,k,j) = wa(idij-1)*ch(i-1,k,j)+wa(idij)*ch(i,k,j)
102 c1(i,k,j) = wa(idij-1)*ch(i,k,j)-wa(idij)*ch(i-1,k,j)
111 idij = idj
113 idij = idij+2
114 c1(i-1,k,j) = wa(idij-1)*ch(i-1,k,j)+wa(idij)*ch(i,k,j)
115 c1(i,k,j) = wa(idij-1)*ch(i,k,j)-wa(idij)*ch(i-1,k,j)
|
| H A D | spssb.F | 95 idij = 0
97 idij = idij+2
99 idij = idij+2
101 c1(i-1,k,j) = wa(idij-1)*ch(i-1,k,j)-wa(idij)*ch(i,k,j)
102 c1(i,k,j) = wa(idij-1)*ch(i,k,j)+wa(idij)*ch(i-1,k,j)
111 idij = idj
113 idij = idij+2
114 c1(i-1,k,j) = wa(idij-1)*ch(i-1,k,j)-wa(idij)*ch(i,k,j)
115 c1(i,k,j) = wa(idij-1)*ch(i,k,j)+wa(idij)*ch(i-1,k,j)
|
| H A D | sradfg.F | 30 idij = is
32 idij = idij+2
34 ch(i-1,k,j) = wa(idij-1)*c1(i-1,k,j)+wa(idij)*c1(i,k,j)
35 ch(i,k,j) = wa(idij-1)*c1(i,k,j)-wa(idij)*c1(i-1,k,j)
44 idij = is
46 idij = idij+2
47 ch(i-1,k,j) = wa(idij-1)*c1(i-1,k,j)+wa(idij)*c1(i,k,j)
48 ch(i,k,j) = wa(idij-1)*c1(i,k,j)-wa(idij)*c1(i-1,k,j)
|
| H A D | sradbg.F | 141 idij = is
143 idij = idij+2
145 c1(i-1,k,j) = wa(idij-1)*ch(i-1,k,j)-wa(idij)*ch(i,k,j)
146 c1(i,k,j) = wa(idij-1)*ch(i,k,j)+wa(idij)*ch(i-1,k,j)
155 idij = is
157 idij = idij+2
158 c1(i-1,k,j) = wa(idij-1)*ch(i-1,k,j)-wa(idij)*ch(i,k,j)
159 c1(i,k,j) = wa(idij-1)*ch(i,k,j)+wa(idij)*ch(i-1,k,j)
|
| /dports/science/cdcl/dcl-5.4.8-C/src/math2/fftlib/ |
| H A D | passb.c | 28 static integer ipp2, idij, idlj, idot, ipph; in passb_() local
207 idij = 0; in passb_()
210 idij += 2; in passb_()
213 idij += 2; in passb_()
216 c1[i__ - 1 + (k + j * c1_dim2) * c1_dim1] = wa[idij - 1] * ch[ in passb_()
217 i__ - 1 + (k + j * ch_dim2) * ch_dim1] - wa[idij] * in passb_()
220 + (k + j * ch_dim2) * ch_dim1] + wa[idij] * ch[i__ - in passb_()
236 idij = idj; in passb_()
239 idij += 2; in passb_()
241 i__ - 1 + (k + j * ch_dim2) * ch_dim1] - wa[idij] * in passb_()
[all …]
|
| H A D | passf.c | 28 static integer ipp2, idij, idlj, idot, ipph; in passf_() local
207 idij = 0; in passf_()
210 idij += 2; in passf_()
213 idij += 2; in passf_()
216 c1[i__ - 1 + (k + j * c1_dim2) * c1_dim1] = wa[idij - 1] * ch[ in passf_()
217 i__ - 1 + (k + j * ch_dim2) * ch_dim1] + wa[idij] * in passf_()
220 + (k + j * ch_dim2) * ch_dim1] - wa[idij] * ch[i__ - in passf_()
236 idij = idj; in passf_()
239 idij += 2; in passf_()
241 i__ - 1 + (k + j * ch_dim2) * ch_dim1] + wa[idij] * in passf_()
[all …]
|
| H A D | radbg.c | 32 static integer idp2, ipp2, idij; in radbg_() local
309 idij = is; in radbg_()
312 idij += 2; in radbg_()
315 c1[i__ - 1 + (k + j * c1_dim2) * c1_dim1] = wa[idij - 1] * ch[ in radbg_()
316 i__ - 1 + (k + j * ch_dim2) * ch_dim1] - wa[idij] * in radbg_()
318 c1[i__ + (k + j * c1_dim2) * c1_dim1] = wa[idij - 1] * ch[i__ in radbg_()
319 + (k + j * ch_dim2) * ch_dim1] + wa[idij] * ch[i__ - in radbg_()
335 idij = is; in radbg_()
338 idij += 2; in radbg_()
340 i__ - 1 + (k + j * ch_dim2) * ch_dim1] - wa[idij] * in radbg_()
[all …]
|
| H A D | radfg.c | 32 static integer idp2, ipp2, idij; in radfg_() local
91 idij = is; in radfg_()
94 idij += 2; in radfg_()
97 ch[i__ - 1 + (k + j * ch_dim2) * ch_dim1] = wa[idij - 1] * c1[ in radfg_()
98 i__ - 1 + (k + j * c1_dim2) * c1_dim1] + wa[idij] * in radfg_()
100 ch[i__ + (k + j * ch_dim2) * ch_dim1] = wa[idij - 1] * c1[i__ in radfg_()
101 + (k + j * c1_dim2) * c1_dim1] - wa[idij] * c1[i__ - in radfg_()
117 idij = is; in radfg_()
120 idij += 2; in radfg_()
122 i__ - 1 + (k + j * c1_dim2) * c1_dim1] + wa[idij] * in radfg_()
[all …]
|
| /dports/science/tinker/tinker/source/ |
| H A D | fftpack.f | 362 integer idij,idlj local
460 idij = 0
462 idij = idij + 2
464 idij = idij + 2
478 idij = idj
480 idij = idij + 2
878 idij = 0
880 idij = idij + 2
882 idij = idij + 2
896 idij = idj
[all …]
|
| /dports/games/libretro-tyrquake/tyrquake-e76477d/deps/libvorbis/lib/ |
| H A D | smallft.c | 319 ch[t3-1]=wa[idij-1]*c1[t3-1]+wa[idij]*c1[t3]; in dradfg()
320 ch[t3]=wa[idij-1]*c1[t3]-wa[idij]*c1[t3-1]; in dradfg()
336 ch[t3-1]=wa[idij-1]*c1[t3-1]+wa[idij]*c1[t3]; in dradfg()
337 ch[t3]=wa[idij-1]*c1[t3]-wa[idij]*c1[t3-1]; in dradfg()
1118 idij=is; in dradbg()
1122 idij+=2; in dradbg()
1125 c1[t3-1]=wa[idij-1]*ch[t3-1]-wa[idij]*ch[t3]; in dradbg()
1126 c1[t3]=wa[idij-1]*ch[t3]+wa[idij]*ch[t3-1]; in dradbg()
1141 idij=is; in dradbg()
1146 c1[t3-1]=wa[idij-1]*ch[t3-1]-wa[idij]*ch[t3]; in dradbg()
[all …]
|
| /dports/multimedia/librespot/librespot-0.1.3/cargo-crates/vorbis-sys-0.1.0/libvorbis/lib/ |
| H A D | smallft.c | 318 ch[t3-1]=wa[idij-1]*c1[t3-1]+wa[idij]*c1[t3]; in dradfg()
319 ch[t3]=wa[idij-1]*c1[t3]-wa[idij]*c1[t3-1]; in dradfg()
335 ch[t3-1]=wa[idij-1]*c1[t3-1]+wa[idij]*c1[t3]; in dradfg()
336 ch[t3]=wa[idij-1]*c1[t3]-wa[idij]*c1[t3-1]; in dradfg()
1117 idij=is; in dradbg()
1121 idij+=2; in dradbg()
1124 c1[t3-1]=wa[idij-1]*ch[t3-1]-wa[idij]*ch[t3]; in dradbg()
1125 c1[t3]=wa[idij-1]*ch[t3]+wa[idij]*ch[t3-1]; in dradbg()
1140 idij=is; in dradbg()
1145 c1[t3-1]=wa[idij-1]*ch[t3-1]-wa[idij]*ch[t3]; in dradbg()
[all …]
|
| /dports/net/h323plus/h323plus-1_27_2/plugins/audio/Speex/libspeex/ |
| H A D | smallft.c | 324 ch[t3-1]=wa[idij-1]*c1[t3-1]+wa[idij]*c1[t3]; in dradfg()
325 ch[t3]=wa[idij-1]*c1[t3]-wa[idij]*c1[t3-1]; in dradfg()
341 ch[t3-1]=wa[idij-1]*c1[t3-1]+wa[idij]*c1[t3]; in dradfg()
342 ch[t3]=wa[idij-1]*c1[t3]-wa[idij]*c1[t3-1]; in dradfg()
1123 idij=is; in dradbg()
1127 idij+=2; in dradbg()
1130 c1[t3-1]=wa[idij-1]*ch[t3-1]-wa[idij]*ch[t3]; in dradbg()
1131 c1[t3]=wa[idij-1]*ch[t3]+wa[idij]*ch[t3-1]; in dradbg()
1146 idij=is; in dradbg()
1151 c1[t3-1]=wa[idij-1]*ch[t3-1]-wa[idij]*ch[t3]; in dradbg()
[all …]
|
| /dports/games/libretro-scummvm/scummvm-7b1e929/backends/platform/libretro/deps/libvorbis/lib/ |
| H A D | smallft.c | 319 ch[t3-1]=wa[idij-1]*c1[t3-1]+wa[idij]*c1[t3]; in dradfg()
320 ch[t3]=wa[idij-1]*c1[t3]-wa[idij]*c1[t3-1]; in dradfg()
336 ch[t3-1]=wa[idij-1]*c1[t3-1]+wa[idij]*c1[t3]; in dradfg()
337 ch[t3]=wa[idij-1]*c1[t3]-wa[idij]*c1[t3-1]; in dradfg()
1118 idij=is; in dradbg()
1122 idij+=2; in dradbg()
1125 c1[t3-1]=wa[idij-1]*ch[t3-1]-wa[idij]*ch[t3]; in dradbg()
1126 c1[t3]=wa[idij-1]*ch[t3]+wa[idij]*ch[t3-1]; in dradbg()
1141 idij=is; in dradbg()
1146 c1[t3-1]=wa[idij-1]*ch[t3-1]-wa[idij]*ch[t3]; in dradbg()
[all …]
|
| /dports/games/libretro-prboom/libretro-prboom-cc80175/deps/fluidlite/libvorbis-1.3.5/lib/ |
| H A D | smallft.c | 319 ch[t3-1]=wa[idij-1]*c1[t3-1]+wa[idij]*c1[t3]; in dradfg()
320 ch[t3]=wa[idij-1]*c1[t3]-wa[idij]*c1[t3-1]; in dradfg()
336 ch[t3-1]=wa[idij-1]*c1[t3-1]+wa[idij]*c1[t3]; in dradfg()
337 ch[t3]=wa[idij-1]*c1[t3]-wa[idij]*c1[t3-1]; in dradfg()
1118 idij=is; in dradbg()
1122 idij+=2; in dradbg()
1125 c1[t3-1]=wa[idij-1]*ch[t3-1]-wa[idij]*ch[t3]; in dradbg()
1126 c1[t3]=wa[idij-1]*ch[t3]+wa[idij]*ch[t3-1]; in dradbg()
1141 idij=is; in dradbg()
1146 c1[t3-1]=wa[idij-1]*ch[t3-1]-wa[idij]*ch[t3]; in dradbg()
[all …]
|
| /dports/devel/juce/JUCE-f37e9a1/modules/juce_audio_formats/codecs/oggvorbis/libvorbis-1.3.7/lib/ |
| H A D | smallft.c | 318 ch[t3-1]=wa[idij-1]*c1[t3-1]+wa[idij]*c1[t3]; in dradfg()
319 ch[t3]=wa[idij-1]*c1[t3]-wa[idij]*c1[t3-1]; in dradfg()
335 ch[t3-1]=wa[idij-1]*c1[t3-1]+wa[idij]*c1[t3]; in dradfg()
336 ch[t3]=wa[idij-1]*c1[t3]-wa[idij]*c1[t3-1]; in dradfg()
1117 idij=is; in dradbg()
1121 idij+=2; in dradbg()
1124 c1[t3-1]=wa[idij-1]*ch[t3-1]-wa[idij]*ch[t3]; in dradbg()
1125 c1[t3]=wa[idij-1]*ch[t3]+wa[idij]*ch[t3-1]; in dradbg()
1140 idij=is; in dradbg()
1145 c1[t3-1]=wa[idij-1]*ch[t3-1]-wa[idij]*ch[t3]; in dradbg()
[all …]
|
| /dports/games/ioquake3-server/ioquake3-1.36/code/libspeex/ |
| H A D | smallft.c | 321 ch[t3-1]=wa[idij-1]*c1[t3-1]+wa[idij]*c1[t3]; in dradfg()
322 ch[t3]=wa[idij-1]*c1[t3]-wa[idij]*c1[t3-1]; in dradfg()
338 ch[t3-1]=wa[idij-1]*c1[t3-1]+wa[idij]*c1[t3]; in dradfg()
339 ch[t3]=wa[idij-1]*c1[t3]-wa[idij]*c1[t3-1]; in dradfg()
1120 idij=is; in dradbg()
1124 idij+=2; in dradbg()
1127 c1[t3-1]=wa[idij-1]*ch[t3-1]-wa[idij]*ch[t3]; in dradbg()
1128 c1[t3]=wa[idij-1]*ch[t3]+wa[idij]*ch[t3-1]; in dradbg()
1143 idij=is; in dradbg()
1148 c1[t3-1]=wa[idij-1]*ch[t3-1]-wa[idij]*ch[t3]; in dradbg()
[all …]
|
| /dports/games/iortcw/iortcw-1.51c/MP/code/libvorbis-1.3.6/lib/ |
| H A D | smallft.c | 318 ch[t3-1]=wa[idij-1]*c1[t3-1]+wa[idij]*c1[t3]; in dradfg()
319 ch[t3]=wa[idij-1]*c1[t3]-wa[idij]*c1[t3-1]; in dradfg()
335 ch[t3-1]=wa[idij-1]*c1[t3-1]+wa[idij]*c1[t3]; in dradfg()
336 ch[t3]=wa[idij-1]*c1[t3]-wa[idij]*c1[t3-1]; in dradfg()
1117 idij=is; in dradbg()
1121 idij+=2; in dradbg()
1124 c1[t3-1]=wa[idij-1]*ch[t3-1]-wa[idij]*ch[t3]; in dradbg()
1125 c1[t3]=wa[idij-1]*ch[t3]+wa[idij]*ch[t3-1]; in dradbg()
1140 idij=is; in dradbg()
1145 c1[t3-1]=wa[idij-1]*ch[t3-1]-wa[idij]*ch[t3]; in dradbg()
[all …]
|
| /dports/games/ioquake3/ioquake3-1.36/code/libspeex/ |
| H A D | smallft.c | 321 ch[t3-1]=wa[idij-1]*c1[t3-1]+wa[idij]*c1[t3]; in dradfg()
322 ch[t3]=wa[idij-1]*c1[t3]-wa[idij]*c1[t3-1]; in dradfg()
338 ch[t3-1]=wa[idij-1]*c1[t3-1]+wa[idij]*c1[t3]; in dradfg()
339 ch[t3]=wa[idij-1]*c1[t3]-wa[idij]*c1[t3-1]; in dradfg()
1120 idij=is; in dradbg()
1124 idij+=2; in dradbg()
1127 c1[t3-1]=wa[idij-1]*ch[t3-1]-wa[idij]*ch[t3]; in dradbg()
1128 c1[t3]=wa[idij-1]*ch[t3]+wa[idij]*ch[t3-1]; in dradbg()
1143 idij=is; in dradbg()
1148 c1[t3-1]=wa[idij-1]*ch[t3-1]-wa[idij]*ch[t3]; in dradbg()
[all …]
|
| /dports/games/iortcw/iortcw-1.51c/SP/code/libvorbis-1.3.6/lib/ |
| H A D | smallft.c | 318 ch[t3-1]=wa[idij-1]*c1[t3-1]+wa[idij]*c1[t3]; in dradfg()
319 ch[t3]=wa[idij-1]*c1[t3]-wa[idij]*c1[t3-1]; in dradfg()
335 ch[t3-1]=wa[idij-1]*c1[t3-1]+wa[idij]*c1[t3]; in dradfg()
336 ch[t3]=wa[idij-1]*c1[t3]-wa[idij]*c1[t3-1]; in dradfg()
1117 idij=is; in dradbg()
1121 idij+=2; in dradbg()
1124 c1[t3-1]=wa[idij-1]*ch[t3-1]-wa[idij]*ch[t3]; in dradbg()
1125 c1[t3]=wa[idij-1]*ch[t3]+wa[idij]*ch[t3-1]; in dradbg()
1140 idij=is; in dradbg()
1145 c1[t3-1]=wa[idij-1]*ch[t3-1]-wa[idij]*ch[t3]; in dradbg()
[all …]
|
| /dports/www/firefox-esr/firefox-91.8.0/media/libvorbis/lib/ |
| H A D | vorbis_smallft.c | 318 ch[t3-1]=wa[idij-1]*c1[t3-1]+wa[idij]*c1[t3]; in dradfg()
319 ch[t3]=wa[idij-1]*c1[t3]-wa[idij]*c1[t3-1]; in dradfg()
335 ch[t3-1]=wa[idij-1]*c1[t3-1]+wa[idij]*c1[t3]; in dradfg()
336 ch[t3]=wa[idij-1]*c1[t3]-wa[idij]*c1[t3-1]; in dradfg()
1117 idij=is; in dradbg()
1121 idij+=2; in dradbg()
1124 c1[t3-1]=wa[idij-1]*ch[t3-1]-wa[idij]*ch[t3]; in dradbg()
1125 c1[t3]=wa[idij-1]*ch[t3]+wa[idij]*ch[t3-1]; in dradbg()
1140 idij=is; in dradbg()
1145 c1[t3-1]=wa[idij-1]*ch[t3-1]-wa[idij]*ch[t3]; in dradbg()
[all …]
|
| /dports/lang/spidermonkey60/firefox-60.9.0/media/libvorbis/lib/ |
| H A D | vorbis_smallft.c | 318 ch[t3-1]=wa[idij-1]*c1[t3-1]+wa[idij]*c1[t3]; in dradfg()
319 ch[t3]=wa[idij-1]*c1[t3]-wa[idij]*c1[t3-1]; in dradfg()
335 ch[t3-1]=wa[idij-1]*c1[t3-1]+wa[idij]*c1[t3]; in dradfg()
336 ch[t3]=wa[idij-1]*c1[t3]-wa[idij]*c1[t3-1]; in dradfg()
1117 idij=is; in dradbg()
1121 idij+=2; in dradbg()
1124 c1[t3-1]=wa[idij-1]*ch[t3-1]-wa[idij]*ch[t3]; in dradbg()
1125 c1[t3]=wa[idij-1]*ch[t3]+wa[idij]*ch[t3-1]; in dradbg()
1140 idij=is; in dradbg()
1145 c1[t3-1]=wa[idij-1]*ch[t3-1]-wa[idij]*ch[t3]; in dradbg()
[all …]
|