Skip to content

Commit 29f463a

Browse files
committed
docs: remove spaces before parenthesis, update variable names
1 parent b6ced12 commit 29f463a

File tree

11 files changed

+253
-254
lines changed

11 files changed

+253
-254
lines changed

lib/node_modules/@stdlib/fft/base/fftpack/lib/cc_ref.js

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -71,7 +71,7 @@
7171
* @param {number} ido - dimension order
7272
* @returns {number} - calculated index
7373
*/
74-
function ccRef ( a1, a2, a3, ip, ido ) {
74+
function ccRef( a1, a2, a3, ip, ido ) {
7575
return ( ( ( a3 * ip ) + a2 ) * ido ) + a1;
7676
}
7777

lib/node_modules/@stdlib/fft/base/fftpack/lib/ch2_ref.js

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -69,7 +69,7 @@
6969
* @param {number} idl1 - stride related to the `l1` parameter
7070
* @returns {number} - calculated index
7171
*/
72-
function ch2Ref ( a1, a2, idl1 ) {
72+
function ch2Ref( a1, a2, idl1 ) {
7373
return ( a2 * idl1 ) + a1;
7474
}
7575

lib/node_modules/@stdlib/fft/base/fftpack/lib/ch_ref.js

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -71,7 +71,7 @@
7171
* @param {number} ido - dimension order
7272
* @returns {number} - calculated index
7373
*/
74-
function chRef ( a1, a2, a3, l1, ido ) {
74+
function chRef( a1, a2, a3, l1, ido ) {
7575
return ( ( ( a3 * l1 ) + a2 ) * ido ) + a1;
7676
}
7777

lib/node_modules/@stdlib/fft/base/fftpack/lib/passb2.js

Lines changed: 14 additions & 14 deletions
Original file line numberDiff line numberDiff line change
@@ -80,35 +80,35 @@ var ccRef = require( './cc_ref.js' );
8080
* @returns {void}
8181
*/
8282
function passb2( ido, l1, cc, ch, wa1 ) {
83-
var ch_offset;
84-
var cc_offset;
83+
var chOffset;
84+
var ccOffset;
8585
var ti2;
8686
var tr2;
8787
var i;
8888
var k;
8989

9090
// Parameter adjustments...
91-
ch_offset = 1 + ( ido * ( 1 + l1 ) );
92-
cc_offset = 1 + ( ido * 3 );
91+
chOffset = 1 + ( ido * ( 1 + l1 ) );
92+
ccOffset = 1 + ( ido * 3 );
9393

9494
// Function body:
9595
if ( ido <= 2 ) {
9696
for ( k = 1; k <= l1; ++k ) {
97-
ch[ chRef( 1, k, 1, l1, ido ) - ch_offset ] = cc[ ccRef( 1, 1, k, 2, ido ) - cc_offset ] + cc[ ccRef( 1, 2, k, 2, ido ) - cc_offset ];
98-
ch[ chRef( 1, k, 2, l1, ido ) - ch_offset ] = cc[ ccRef( 1, 1, k, 2, ido ) - cc_offset ] - cc[ ccRef( 1, 2, k, 2, ido ) - cc_offset ];
99-
ch[ chRef( 2, k, 1, l1, ido ) - ch_offset ] = cc[ ccRef( 2, 1, k, 2, ido ) - cc_offset ] + cc[ ccRef( 2, 2, k, 2, ido ) - cc_offset ];
100-
ch[ chRef( 2, k, 2, l1, ido ) - ch_offset ] = cc[ ccRef( 2, 1, k, 2, ido ) - cc_offset ] - cc[ ccRef( 2, 2, k, 2, ido ) - cc_offset ];
97+
ch[ chRef( 1, k, 1, l1, ido ) - chOffset ] = cc[ ccRef( 1, 1, k, 2, ido ) - ccOffset ] + cc[ ccRef( 1, 2, k, 2, ido ) - ccOffset ];
98+
ch[ chRef( 1, k, 2, l1, ido ) - chOffset ] = cc[ ccRef( 1, 1, k, 2, ido ) - ccOffset ] - cc[ ccRef( 1, 2, k, 2, ido ) - ccOffset ];
99+
ch[ chRef( 2, k, 1, l1, ido ) - chOffset ] = cc[ ccRef( 2, 1, k, 2, ido ) - ccOffset ] + cc[ ccRef( 2, 2, k, 2, ido ) - ccOffset ];
100+
ch[ chRef( 2, k, 2, l1, ido ) - chOffset ] = cc[ ccRef( 2, 1, k, 2, ido ) - ccOffset ] - cc[ ccRef( 2, 2, k, 2, ido ) - ccOffset ];
101101
}
102102
return;
103103
}
104104
for ( k = 1; k <= l1; ++k ) {
105105
for ( i = 2; i <= ido; i += 2 ) {
106-
ch[ chRef( i - 1, k, 1, l1, ido ) - ch_offset ] = cc[ ccRef( i - 1, 1, k, 2, ido ) - cc_offset ] + cc[ ccRef( i - 1, 2, k, 2, ido ) - cc_offset ];
107-
tr2 = cc[ ccRef( i - 1, 1, k, 2, ido ) - cc_offset ] - cc[ ccRef( i - 1, 2, k, 2, ido ) - cc_offset ];
108-
ch[ chRef( i, k, 1, l1, ido ) - ch_offset ] = cc[ ccRef( i, 1, k, 2, ido ) - cc_offset ] + cc[ ccRef( i, 2, k, 2, ido ) - cc_offset ];
109-
ti2 = cc[ ccRef( i, 1, k, 2, ido ) - cc_offset ] - cc[ ccRef( i, 2, k, 2, ido ) - cc_offset ];
110-
ch[ chRef( i, k, 2, l1, ido ) - ch_offset ] = ( wa1[ i - 1 - 1 ] * ti2 ) - ( wa1[ i - 1 ] * tr2 );
111-
ch[ chRef( i - 1, k, 2, l1, ido ) - ch_offset ] = ( wa1[ i - 1 - 1 ] * tr2 ) - ( wa1[ i - 1 ] * ti2 );
106+
ch[ chRef( i - 1, k, 1, l1, ido ) - chOffset ] = cc[ ccRef( i - 1, 1, k, 2, ido ) - ccOffset ] + cc[ ccRef( i - 1, 2, k, 2, ido ) - ccOffset ];
107+
tr2 = cc[ ccRef( i - 1, 1, k, 2, ido ) - ccOffset ] - cc[ ccRef( i - 1, 2, k, 2, ido ) - ccOffset ];
108+
ch[ chRef( i, k, 1, l1, ido ) - chOffset ] = cc[ ccRef( i, 1, k, 2, ido ) - ccOffset ] + cc[ ccRef( i, 2, k, 2, ido ) - ccOffset ];
109+
ti2 = cc[ ccRef( i, 1, k, 2, ido ) - ccOffset ] - cc[ ccRef( i, 2, k, 2, ido ) - ccOffset ];
110+
ch[ chRef( i, k, 2, l1, ido ) - chOffset ] = ( wa1[ i - 1 - 1 ] * ti2 ) - ( wa1[ i - 1 ] * tr2 );
111+
ch[ chRef( i - 1, k, 2, l1, ido ) - chOffset ] = ( wa1[ i - 1 - 1 ] * tr2 ) - ( wa1[ i - 1 ] * ti2 );
112112
}
113113
}
114114
}

lib/node_modules/@stdlib/fft/base/fftpack/lib/passb3.js

Lines changed: 28 additions & 28 deletions
Original file line numberDiff line numberDiff line change
@@ -87,8 +87,8 @@ var taui = 0.866025403784439;
8787
* @returns {void}
8888
*/
8989
function passb3( ido, l1, cc, ch, wa1, wa2 ) {
90-
var ch_offset;
91-
var cc_offset;
90+
var chOffset;
91+
var ccOffset;
9292
var ci2;
9393
var ci3;
9494
var di2;
@@ -103,44 +103,44 @@ function passb3( ido, l1, cc, ch, wa1, wa2 ) {
103103
var k;
104104

105105
// Parameter adjustments...
106-
ch_offset = 1 + ( ido * ( 1 + l1 ) );
107-
cc_offset = 1 + ( ido << 2 );
106+
chOffset = 1 + ( ido * ( 1 + l1 ) );
107+
ccOffset = 1 + ( ido << 2 );
108108

109109
// Function body:
110110
if ( ido === 2 ) {
111111
for ( k = 1; k <= l1; ++k ) {
112-
tr2 = cc[ ccRef( 1, 2, k, 3, ido ) - cc_offset ] + cc[ ccRef( 1, 3, k, 3, ido ) - cc_offset ];
113-
cr2 = cc[ ccRef( 1, 1, k, 3, ido ) - cc_offset ] + ( taur * tr2 );
114-
ch[ chRef( 1, k, 1, l1, ido ) - ch_offset ] = cc[ ccRef( 1, 1, k, 3, ido ) - cc_offset ] + tr2;
115-
ti2 = cc[ ccRef( 2, 2, k, 3, ido ) - cc_offset ] + cc[ ccRef( 2, 3, k, 3, ido ) - cc_offset ];
116-
ci2 = cc[ ccRef( 2, 1, k, 3, ido ) - cc_offset ] + ( taur * ti2 );
117-
ch[ chRef( 2, k, 1, l1, ido ) - ch_offset ] = cc[ ccRef( 2, 1, k, 3, ido ) - cc_offset ] + ti2;
118-
cr3 = taui * ( cc[ ccRef( 1, 2, k, 3, ido ) - cc_offset ] - cc[ ccRef( 1, 3, k, 3, ido ) - cc_offset ] );
119-
ci3 = taui * ( cc[ ccRef( 2, 2, k, 3, ido ) - cc_offset ] - cc[ ccRef( 2, 3, k, 3, ido ) - cc_offset ] );
120-
ch[ chRef( 1, k, 2, l1, ido ) - ch_offset ] = cr2 - ci3;
121-
ch[ chRef( 1, k, 3, l1, ido ) - ch_offset ] = cr2 + ci3;
122-
ch[ chRef( 2, k, 2, l1, ido ) - ch_offset ] = ci2 + ci3;
123-
ch[ chRef( 2, k, 3, l1, ido ) - ch_offset ] = ci2 - cr3;
112+
tr2 = cc[ ccRef( 1, 2, k, 3, ido ) - ccOffset ] + cc[ ccRef( 1, 3, k, 3, ido ) - ccOffset ];
113+
cr2 = cc[ ccRef( 1, 1, k, 3, ido ) - ccOffset ] + ( taur * tr2 );
114+
ch[ chRef( 1, k, 1, l1, ido ) - chOffset ] = cc[ ccRef( 1, 1, k, 3, ido ) - ccOffset ] + tr2;
115+
ti2 = cc[ ccRef( 2, 2, k, 3, ido ) - ccOffset ] + cc[ ccRef( 2, 3, k, 3, ido ) - ccOffset ];
116+
ci2 = cc[ ccRef( 2, 1, k, 3, ido ) - ccOffset ] + ( taur * ti2 );
117+
ch[ chRef( 2, k, 1, l1, ido ) - chOffset ] = cc[ ccRef( 2, 1, k, 3, ido ) - ccOffset ] + ti2;
118+
cr3 = taui * ( cc[ ccRef( 1, 2, k, 3, ido ) - ccOffset ] - cc[ ccRef( 1, 3, k, 3, ido ) - ccOffset ] );
119+
ci3 = taui * ( cc[ ccRef( 2, 2, k, 3, ido ) - ccOffset ] - cc[ ccRef( 2, 3, k, 3, ido ) - ccOffset ] );
120+
ch[ chRef( 1, k, 2, l1, ido ) - chOffset ] = cr2 - ci3;
121+
ch[ chRef( 1, k, 3, l1, ido ) - chOffset ] = cr2 + ci3;
122+
ch[ chRef( 2, k, 2, l1, ido ) - chOffset ] = ci2 + ci3;
123+
ch[ chRef( 2, k, 3, l1, ido ) - chOffset ] = ci2 - cr3;
124124
}
125125
} else {
126126
for ( k = 1; k <= l1; ++k ) {
127127
for ( i = 2; i <= ido; i += 2 ) {
128-
tr2 = cc[ ccRef( i - 1, 2, k, 3, ido ) - cc_offset ] + cc[ ccRef( i - 1, 3, k, 3, ido ) - cc_offset ];
129-
cr2 = cc[ ccRef( i - 1, 1, k, 3, ido ) - cc_offset ] + ( taur * tr2 );
130-
ch[ chRef( i - 1, k, 1, l1, ido ) - ch_offset ] = cc[ ccRef( i - 1, 1, k, 3, ido ) - cc_offset ] + tr2;
131-
ti2 = cc[ ccRef( i, 2, k, 3, ido ) - cc_offset ] + cc[ ccRef( i, 3, k, 3, ido ) - cc_offset ];
132-
ci2 = cc[ ccRef( i, 1, k, 3, ido ) - cc_offset ] + ( taur * ti2 );
133-
ch[ chRef( i, k, 1, l1, ido ) - ch_offset ] = cc[ ccRef( i, 1, k, 3, ido ) - cc_offset ] + ti2;
134-
cr3 = taui * ( cc[ ccRef( i - 1, 2, k, 3, ido ) - cc_offset ] - cc[ ccRef( i - 1, 3, k, 3, ido ) - cc_offset ] );
135-
ci3 = taui * ( cc[ ccRef( i, 2, k, 3, ido ) - cc_offset ] - cc[ ccRef( i, 3, k, 3, ido ) - cc_offset ] );
128+
tr2 = cc[ ccRef( i - 1, 2, k, 3, ido ) - ccOffset ] + cc[ ccRef( i - 1, 3, k, 3, ido ) - ccOffset ];
129+
cr2 = cc[ ccRef( i - 1, 1, k, 3, ido ) - ccOffset ] + ( taur * tr2 );
130+
ch[ chRef( i - 1, k, 1, l1, ido ) - chOffset ] = cc[ ccRef( i - 1, 1, k, 3, ido ) - ccOffset ] + tr2;
131+
ti2 = cc[ ccRef( i, 2, k, 3, ido ) - ccOffset ] + cc[ ccRef( i, 3, k, 3, ido ) - ccOffset ];
132+
ci2 = cc[ ccRef( i, 1, k, 3, ido ) - ccOffset ] + ( taur * ti2 );
133+
ch[ chRef( i, k, 1, l1, ido ) - chOffset ] = cc[ ccRef( i, 1, k, 3, ido ) - ccOffset ] + ti2;
134+
cr3 = taui * ( cc[ ccRef( i - 1, 2, k, 3, ido ) - ccOffset ] - cc[ ccRef( i - 1, 3, k, 3, ido ) - ccOffset ] );
135+
ci3 = taui * ( cc[ ccRef( i, 2, k, 3, ido ) - ccOffset ] - cc[ ccRef( i, 3, k, 3, ido ) - ccOffset ] );
136136
dr2 = cr2 - ci3;
137137
dr3 = cr2 + ci3;
138138
di2 = ci2 + ci3;
139139
di3 = ci2 - cr3;
140-
ch[ chRef( i, k, 2, l1, ido) - ch_offset ] = ( wa1[ i - 1 - 1 ] * di2 ) + ( wa1[ i - 1 ] * dr2 );
141-
ch[ chRef( i - 1, k, 2, l1, ido) - ch_offset ] = ( wa1[ i - 1 - 1 ] * dr2 ) - ( wa1[ i - 1 ] * di2 );
142-
ch[ chRef( i, k, 3, l1, ido) - ch_offset ] = ( wa2[ i - 1 - 1 ] * dr3 ) - ( wa2[ i - 1 ] * di3 );
143-
ch[ chRef( i - 1, k, 3, l1, ido) - ch_offset ] = ( wa2[ i - 1 - 1 ] * dr3 ) - ( wa2[ i - 1 ] * di3 );
140+
ch[ chRef( i, k, 2, l1, ido) - chOffset ] = ( wa1[ i - 1 - 1 ] * di2 ) + ( wa1[ i - 1 ] * dr2 );
141+
ch[ chRef( i - 1, k, 2, l1, ido) - chOffset ] = ( wa1[ i - 1 - 1 ] * dr2 ) - ( wa1[ i - 1 ] * di2 );
142+
ch[ chRef( i, k, 3, l1, ido) - chOffset ] = ( wa2[ i - 1 - 1 ] * dr3 ) - ( wa2[ i - 1 ] * di3 );
143+
ch[ chRef( i - 1, k, 3, l1, ido) - chOffset ] = ( wa2[ i - 1 - 1 ] * dr3 ) - ( wa2[ i - 1 ] * di3 );
144144
}
145145
}
146146
}

lib/node_modules/@stdlib/fft/base/fftpack/lib/passb4.js

Lines changed: 36 additions & 36 deletions
Original file line numberDiff line numberDiff line change
@@ -82,8 +82,8 @@ var ccRef = require( './cc_ref.js' );
8282
* @returns {void}
8383
*/
8484
function passb4( ido, l1, cc, ch, wa1, wa2, wa3 ) {
85-
var ch_offset;
86-
var cc_offset;
85+
var chOffset;
86+
var ccOffset;
8787
var ci2;
8888
var ci3;
8989
var ci4;
@@ -102,54 +102,54 @@ function passb4( ido, l1, cc, ch, wa1, wa2, wa3 ) {
102102
var k;
103103

104104
// Parameter adjustments...
105-
ch_offset = 1 + ( ido * ( 1 + l1 ) );
106-
cc_offset = 1 + ( ido * 5 );
105+
chOffset = 1 + ( ido * ( 1 + l1 ) );
106+
ccOffset = 1 + ( ido * 5 );
107107

108108
// Function body:
109109
if ( ido === 2 ) {
110110
for ( k = 1; k <= l1; ++k ) {
111-
ti1 = cc[ ccRef( 2, 1, k, 4, ido ) - cc_offset ] - cc[ ccRef( 2, 3, k, 4, ido ) - cc_offset ];
112-
ti2 = cc[ ccRef( 2, 1, k, 4, ido ) - cc_offset ] + cc[ ccRef( 2, 3, k, 4, ido ) - cc_offset ];
113-
tr4 = cc[ ccRef( 2, 4, k, 4, ido ) - cc_offset ] - cc[ ccRef( 2, 2, k, 4, ido ) - cc_offset ];
114-
ti3 = cc[ ccRef( 2, 2, k, 4, ido ) - cc_offset ] + cc[ ccRef( 2, 4, k, 4, ido ) - cc_offset ];
115-
tr1 = cc[ ccRef( 1, 1, k, 4, ido ) - cc_offset ] - cc[ ccRef( 1, 3, k, 4, ido ) - cc_offset ];
116-
tr2 = cc[ ccRef( 1, 1, k, 4, ido ) - cc_offset ] + cc[ ccRef( 1, 3, k, 4, ido ) - cc_offset ];
117-
ti4 = cc[ ccRef( 1, 2, k, 4, ido ) - cc_offset ] - cc[ ccRef( 1, 4, k, 4, ido ) - cc_offset ];
118-
tr3 = cc[ ccRef( 1, 2, k, 4, ido ) - cc_offset ] + cc[ ccRef( 1, 4, k, 4, ido ) - cc_offset ];
119-
ch[ chRef( 1, k, 1, l1, ido ) - ch_offset ] = tr2 + tr3;
120-
ch[ chRef( 1, k, 3, l1, ido ) - ch_offset ] = tr2 - tr3;
121-
ch[ chRef( 2, k, 1, l1, ido ) - ch_offset ] = ti2 + ti3;
122-
ch[ chRef( 2, k, 3, l1, ido ) - ch_offset ] = ti2 - ti3;
123-
ch[ chRef( 1, k, 2, l1, ido ) - ch_offset ] = tr1 + tr4;
124-
ch[ chRef( 1, k, 4, l1, ido ) - ch_offset ] = tr1 - tr4;
125-
ch[ chRef( 2, k, 2, l1, ido ) - ch_offset ] = ti1 + ti4;
126-
ch[ chRef( 2, k, 4, l1, ido ) - ch_offset ] = ti1 - ti4;
111+
ti1 = cc[ ccRef( 2, 1, k, 4, ido ) - ccOffset ] - cc[ ccRef( 2, 3, k, 4, ido ) - ccOffset ];
112+
ti2 = cc[ ccRef( 2, 1, k, 4, ido ) - ccOffset ] + cc[ ccRef( 2, 3, k, 4, ido ) - ccOffset ];
113+
tr4 = cc[ ccRef( 2, 4, k, 4, ido ) - ccOffset ] - cc[ ccRef( 2, 2, k, 4, ido ) - ccOffset ];
114+
ti3 = cc[ ccRef( 2, 2, k, 4, ido ) - ccOffset ] + cc[ ccRef( 2, 4, k, 4, ido ) - ccOffset ];
115+
tr1 = cc[ ccRef( 1, 1, k, 4, ido ) - ccOffset ] - cc[ ccRef( 1, 3, k, 4, ido ) - ccOffset ];
116+
tr2 = cc[ ccRef( 1, 1, k, 4, ido ) - ccOffset ] + cc[ ccRef( 1, 3, k, 4, ido ) - ccOffset ];
117+
ti4 = cc[ ccRef( 1, 2, k, 4, ido ) - ccOffset ] - cc[ ccRef( 1, 4, k, 4, ido ) - ccOffset ];
118+
tr3 = cc[ ccRef( 1, 2, k, 4, ido ) - ccOffset ] + cc[ ccRef( 1, 4, k, 4, ido ) - ccOffset ];
119+
ch[ chRef( 1, k, 1, l1, ido ) - chOffset ] = tr2 + tr3;
120+
ch[ chRef( 1, k, 3, l1, ido ) - chOffset ] = tr2 - tr3;
121+
ch[ chRef( 2, k, 1, l1, ido ) - chOffset ] = ti2 + ti3;
122+
ch[ chRef( 2, k, 3, l1, ido ) - chOffset ] = ti2 - ti3;
123+
ch[ chRef( 1, k, 2, l1, ido ) - chOffset ] = tr1 + tr4;
124+
ch[ chRef( 1, k, 4, l1, ido ) - chOffset ] = tr1 - tr4;
125+
ch[ chRef( 2, k, 2, l1, ido ) - chOffset ] = ti1 + ti4;
126+
ch[ chRef( 2, k, 4, l1, ido ) - chOffset ] = ti1 - ti4;
127127
}
128128
} else {
129129
for ( k = 1; k <= l1; ++k ) {
130130
for ( i = 2; i <= ido; i += 2 ) {
131-
ti1 = cc[ ccRef( i, 1, k, 4, ido ) - cc_offset ] - cc[ ccRef( i, 3, k, 4, ido ) - cc_offset ];
132-
ti2 = cc[ ccRef( i, 1, k, 4, ido ) - cc_offset ] + cc[ ccRef( i, 3, k, 4, ido ) - cc_offset ];
133-
ti3 = cc[ ccRef( i, 2, k, 4, ido ) - cc_offset ] + cc[ ccRef( i, 4, k, 4, ido ) - cc_offset ];
134-
tr4 = cc[ ccRef( i, 4, k, 4, ido ) - cc_offset ] - cc[ ccRef( i, 2, k, 4, ido ) - cc_offset ];
135-
tr1 = cc[ ccRef( i - 1, 1, k, 4, ido ) - cc_offset ] - cc[ ccRef( i - 1, 3, k, 4, ido ) - cc_offset ];
136-
tr2 = cc[ ccRef( i - 1, 1, k, 4, ido ) - cc_offset ] + cc[ ccRef( i - 1, 3, k, 4, ido ) - cc_offset ];
137-
ti4 = cc[ ccRef( i - 1, 2, k, 4, ido ) - cc_offset ] - cc[ ccRef( i - 1, 4, k, 4, ido ) - cc_offset ];
138-
tr3 = cc[ ccRef( i - 1, 2, k, 4, ido ) - cc_offset ] + cc[ ccRef( i - 1, 4, k, 4, ido ) - cc_offset ];
139-
ch[ chRef( i - 1, k, 1, l1, ido ) - ch_offset ] = tr2 + tr3;
131+
ti1 = cc[ ccRef( i, 1, k, 4, ido ) - ccOffset ] - cc[ ccRef( i, 3, k, 4, ido ) - ccOffset ];
132+
ti2 = cc[ ccRef( i, 1, k, 4, ido ) - ccOffset ] + cc[ ccRef( i, 3, k, 4, ido ) - ccOffset ];
133+
ti3 = cc[ ccRef( i, 2, k, 4, ido ) - ccOffset ] + cc[ ccRef( i, 4, k, 4, ido ) - ccOffset ];
134+
tr4 = cc[ ccRef( i, 4, k, 4, ido ) - ccOffset ] - cc[ ccRef( i, 2, k, 4, ido ) - ccOffset ];
135+
tr1 = cc[ ccRef( i - 1, 1, k, 4, ido ) - ccOffset ] - cc[ ccRef( i - 1, 3, k, 4, ido ) - ccOffset ];
136+
tr2 = cc[ ccRef( i - 1, 1, k, 4, ido ) - ccOffset ] + cc[ ccRef( i - 1, 3, k, 4, ido ) - ccOffset ];
137+
ti4 = cc[ ccRef( i - 1, 2, k, 4, ido ) - ccOffset ] - cc[ ccRef( i - 1, 4, k, 4, ido ) - ccOffset ];
138+
tr3 = cc[ ccRef( i - 1, 2, k, 4, ido ) - ccOffset ] + cc[ ccRef( i - 1, 4, k, 4, ido ) - ccOffset ];
139+
ch[ chRef( i - 1, k, 1, l1, ido ) - chOffset ] = tr2 + tr3;
140140
cr3 = tr2 - tr3;
141-
ch[ chRef( i, k, 1, l1, ido ) - ch_offset ] = ti2 + ti3;
141+
ch[ chRef( i, k, 1, l1, ido ) - chOffset ] = ti2 + ti3;
142142
ci3 = ti2 - ti3;
143143
cr2 = tr1 + tr4;
144144
cr4 = tr1 - tr4;
145145
ci2 = ti1 + ti4;
146146
ci4 = ti1 - ti4;
147-
ch[ chRef( i - 1, k, 2, l1, ido ) - ch_offset ] = ( wa1[ i - 1 - 1 ] * cr2 ) - ( wa1[ i - 1 ] * ci2 );
148-
ch[ chRef( i, k, 2, l1, ido ) - ch_offset ] = ( wa1[ i - 1 - 1 ] * ci2 ) + ( wa1[ i - 1 ] * cr2 );
149-
ch[ chRef( i - 1, k, 3, l1, ido ) - ch_offset ] = ( wa2[ i - 1 - 1 ] * cr3 ) - ( wa2[ i - 1 ] * ci3 );
150-
ch[ chRef( i, k, 3, l1, ido ) - ch_offset ] = ( wa2[ i - 1 - 1 ] * ci3 ) + ( wa2[ i - 1 ] * cr3 );
151-
ch[ chRef( i - 1, k, 4, l1, ido ) - ch_offset ] = ( wa3[ i - 1 - 1 ] * cr4 ) - ( wa3[ i - 1 ] * ci4 );
152-
ch[ chRef( i, k, 4, l1, ido ) - ch_offset ] = ( wa3[ i - 1 - 1 ] * ci4 ) + ( wa3[ i - 1 ] * cr4 );
147+
ch[ chRef( i - 1, k, 2, l1, ido ) - chOffset ] = ( wa1[ i - 1 - 1 ] * cr2 ) - ( wa1[ i - 1 ] * ci2 );
148+
ch[ chRef( i, k, 2, l1, ido ) - chOffset ] = ( wa1[ i - 1 - 1 ] * ci2 ) + ( wa1[ i - 1 ] * cr2 );
149+
ch[ chRef( i - 1, k, 3, l1, ido ) - chOffset ] = ( wa2[ i - 1 - 1 ] * cr3 ) - ( wa2[ i - 1 ] * ci3 );
150+
ch[ chRef( i, k, 3, l1, ido ) - chOffset ] = ( wa2[ i - 1 - 1 ] * ci3 ) + ( wa2[ i - 1 ] * cr3 );
151+
ch[ chRef( i - 1, k, 4, l1, ido ) - chOffset ] = ( wa3[ i - 1 - 1 ] * cr4 ) - ( wa3[ i - 1 ] * ci4 );
152+
ch[ chRef( i, k, 4, l1, ido ) - chOffset ] = ( wa3[ i - 1 - 1 ] * ci4 ) + ( wa3[ i - 1 ] * cr4 );
153153
}
154154
}
155155
}

lib/node_modules/@stdlib/fft/base/fftpack/lib/passf2.js

Lines changed: 16 additions & 16 deletions
Original file line numberDiff line numberDiff line change
@@ -62,8 +62,8 @@
6262

6363
// MODULES //
6464

65-
var chRef = require( '@stdlib/fft/base/fftpack/lib/ch_ref.js' );
66-
var ccRef = require( '@stdlib/fft/base/fftpack/lib/cc_ref.js' );
65+
var chRef = require( './ch_ref.js' );
66+
var ccRef = require( './cc_ref.js' );
6767

6868

6969
// MAIN //
@@ -80,34 +80,34 @@ var ccRef = require( '@stdlib/fft/base/fftpack/lib/cc_ref.js' );
8080
* @returns {void}
8181
*/
8282
function passf2( ido, l1, cc, ch, wa1 ) {
83-
var ch_offset;
84-
var cc_offset;
83+
var chOffset;
84+
var ccOffset;
8585
var ti2;
8686
var tr2;
8787
var i;
8888
var k;
8989

9090
// Parameter adjustments...
91-
ch_offset = 1 + ( ido * ( 1 + l1 ) );
92-
cc_offset = 1 + ( ido * 3 );
91+
chOffset = 1 + ( ido * ( 1 + l1 ) );
92+
ccOffset = 1 + ( ido * 3 );
9393

9494
// Function body:
9595
if ( ido === 2 ) {
9696
for ( k = 1; k <= l1; ++k ) {
97-
ch[ chRef( 1, k, 1, l1, ido ) - ch_offset ] = cc[ ccRef( 1, 1, k, 2, ido ) - cc_offset ] + cc[ ccRef( 1, 2, k, 2, ido ) - cc_offset ];
98-
ch[ chRef( 1, k, 2, l1, ido ) - ch_offset ] = cc[ ccRef( 1, 1, k, 2, ido ) - cc_offset ] - cc[ ccRef( 1, 2, k, 2, ido ) - cc_offset ];
99-
ch[ chRef( 2, k, 1, l1, ido ) - ch_offset ] = cc[ ccRef( 2, 1, k, 2, ido ) - cc_offset ] + cc[ ccRef( 2, 2, k, 2, ido ) - cc_offset ];
100-
ch[ chRef( 2, k, 2, l1, ido ) - ch_offset ] = cc[ ccRef( 2, 1, k, 2, ido ) - cc_offset ] - cc[ ccRef( 2, 2, k, 2, ido ) - cc_offset ];
97+
ch[ chRef( 1, k, 1, l1, ido ) - chOffset ] = cc[ ccRef( 1, 1, k, 2, ido ) - ccOffset ] + cc[ ccRef( 1, 2, k, 2, ido ) - ccOffset ];
98+
ch[ chRef( 1, k, 2, l1, ido ) - chOffset ] = cc[ ccRef( 1, 1, k, 2, ido ) - ccOffset ] - cc[ ccRef( 1, 2, k, 2, ido ) - ccOffset ];
99+
ch[ chRef( 2, k, 1, l1, ido ) - chOffset ] = cc[ ccRef( 2, 1, k, 2, ido ) - ccOffset ] + cc[ ccRef( 2, 2, k, 2, ido ) - ccOffset ];
100+
ch[ chRef( 2, k, 2, l1, ido ) - chOffset ] = cc[ ccRef( 2, 1, k, 2, ido ) - ccOffset ] - cc[ ccRef( 2, 2, k, 2, ido ) - ccOffset ];
101101
}
102102
} else {
103103
for ( k = 1; k <= l1; ++k ) {
104104
for ( i = 2; i <= ido; i += 2 ) {
105-
ch[ chRef( i - 1, k, 1, l1, ido ) - ch_offset ] = cc[ ccRef( i - 1, 1, k, 2, ido ) - cc_offset ] + cc[ ccRef( i - 1, 2, k, 2, ido ) - cc_offset ];
106-
tr2 = cc[ ccRef( i - 1, 1, k, 2, ido ) - cc_offset ] - cc[ ccRef( i - 1, 2, k, 2, ido ) - cc_offset ];
107-
ch[ chRef( i, k, 1, l1, ido ) - ch_offset ] = cc[ ccRef( i, 1, k, 2, ido ) - cc_offset ] + cc[ ccRef( i, 2, k, 2, ido ) - cc_offset ];
108-
ti2 = cc[ ccRef( i, 1, k, 2, ido ) - cc_offset ] - cc[ ccRef( i, 2, k, 2, ido ) - cc_offset ];
109-
ch[ chRef( i, k, 2, l1, ido ) - ch_offset ] = ( wa1[ i - 1 - 1 ] * ti2 ) - ( wa1[ i - 1 ] * tr2 );
110-
ch[ chRef( i - 1, k, 2, l1, ido ) - ch_offset ] = ( wa1[ i - 1 - 1 ] * tr2 ) - ( wa1[ i - 1 ] * ti2 );
105+
ch[ chRef( i - 1, k, 1, l1, ido ) - chOffset ] = cc[ ccRef( i - 1, 1, k, 2, ido ) - ccOffset ] + cc[ ccRef( i - 1, 2, k, 2, ido ) - ccOffset ];
106+
tr2 = cc[ ccRef( i - 1, 1, k, 2, ido ) - ccOffset ] - cc[ ccRef( i - 1, 2, k, 2, ido ) - ccOffset ];
107+
ch[ chRef( i, k, 1, l1, ido ) - chOffset ] = cc[ ccRef( i, 1, k, 2, ido ) - ccOffset ] + cc[ ccRef( i, 2, k, 2, ido ) - ccOffset ];
108+
ti2 = cc[ ccRef( i, 1, k, 2, ido ) - ccOffset ] - cc[ ccRef( i, 2, k, 2, ido ) - ccOffset ];
109+
ch[ chRef( i, k, 2, l1, ido ) - chOffset ] = ( wa1[ i - 1 - 1 ] * ti2 ) - ( wa1[ i - 1 ] * tr2 );
110+
ch[ chRef( i - 1, k, 2, l1, ido ) - chOffset ] = ( wa1[ i - 1 - 1 ] * tr2 ) - ( wa1[ i - 1 ] * ti2 );
111111
}
112112
}
113113
}

0 commit comments

Comments
 (0)