@@ -82,8 +82,8 @@ var ccRef = require( './cc_ref.js' );
8282* @returns {void }
8383*/
8484function 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 }
0 commit comments