<< Chapter < Page Chapter >> Page >
A very efficient length N = 19 FFT module that can be use alone or with the PFA or the WFTA. Designed by Howard Johnson in 1981.

N=19 fft module

A FORTRAN implementation of a length-19 FFT module to be used in a Prime Factor Algorithm program.

C C-------------------WFTA N=19----------------------------C C 372 ADDS; 76 MPYSC DATA FOR LENGTH 19 DFT DATA C1901 / -1.0555555555555556 /DATA C1902 / .1775222851392708 / DATA C1903 / -.1282007750219153 /DATA C1904 / .0493215101173555 / DATA C1905 / .5761101149100590 /DATA C1906 / -.7499644965553628 / DATA C1907 / -.1738543816453038 /DATA C1908 / -2.1729997561977314 / DATA C1909 / -1.7021211726914737 /DATA C1910 / .4708785835062578 / DATA C1911 / -2.0239400846888438 /DATA C1912 / .1055164120166409 / DATA C1913 / 2.1294564967054848 /DATA C1914 / -.7508754389737117 / DATA C1915 / .1481281769515716 /DATA C1916 / .8990036159252833 / DATA C1917 / -.6214824677260278 /DATA C1918 / -.7986935209871269 / DATA C1919 / -.4733919962377183 /DATA C1920 / -.2421610524189263 / DATA C1921 / -.0593686079675051 /DATA C1922 / .0125786882551762 / DATA C1923 / -.0467899197123289 /DATA C1924 / -.9375012191378236 / DATA C1925 / -.0501115370433529 /DATA C1926 / -.9876127561811766 / DATA C1927 / -1.1745786501205960 /DATA C1928 / 1.1114482296234993 / DATA C1929 / 2.2860268797440954 /DATA C1930 / .2642052325793094 / DATA C1931 / 2.1981792779352138 /DATA C1932 / 1.9339740453559042 / DATA C1933 / -.7482584709125489 /DATA C1934 / -.4782083564276887 / DATA C1935 / .2700501144848602 /DATA C1936 / -.3464235615954227 / DATA C1937 / -.8348542936068828 /DATA C1938 / -.3937592850674352 / CC-----------------WFTA N=19-------------------------- CR100=X(I(2))+X(I(19)) R109=X(I(2))-X(I(19))R101=X(I(3))+X(I(18)) R110=-X(I(3))+X(I(18))R102=X(I(5))+X(I(16)) R111=X(I(5))-X(I(16))R103=X(I(9))+X(I(12)) R112=-X(I(9))+X(I(12))R104=X(I(17))+X(I(4)) R113=X(I(17))-X(I(4))R105=X(I(14))+X(I(7)) R114=-X(I(14))+X(I(7))R106=X(I(8))+X(I(13)) R115=X(I(8))-X(I(13))R107=X(I(15))+X(I(6)) R116=-X(I(15))+X(I(6))R108=X(I(10))+X(I(11)) R117=X(I(10))-X(I(11))R200=R100-R106 R201=R101-R107R202=R102-R108 R203=R103-R106R204=R104-R107 R205=R105-R108R206=R100+R103+R106 R207=R101+R104+R107R208=R102+R105+R108 R209=R200+R202R210=R203+R205 R31=R206+R207+R208R32=R210+R204 R33=R209+R201R34=R33-R32 R35=R210-R204R36=R209-R201 R37=R36-R35R38=R203 R39=R200-R203R310=R200 R311=R205R312=R202-R205 R313=R202R314=-R312+R200-R204 R315=R39+R205-R201R316=-R315+R314 R317=R206-R208R318=R207-R208 R319=R317+R318R220=R109-R115 R221=R110-R116R222=R111-R117 R223=R112-R115R224=R113-R116 R225=R114-R117R226=R109+R112+R115 R227=R110+R113+R116R228=R111+R114+R117 R229=R220+R222R230=R223+R225 R320=R226+R227+R228R321=R230+R224 R322=R229+R221R323=R322-R321 R324=R230-R224R325=R229-R221 R326=R325-R324R327=R223 R328=R220-R223R329=R220 R330=R225R331=R222-R225 R332=R222R333=-R331+R220-R224 R334=R328+R225-R221R335=-R334+R333 R336=R226-R228R337=R227-R228 R338=R336+R337X(I(1))=X(I(1))+R31 T11=R31*C1901T12=R32*C1902 T13=R33*C1903T14=R34*C1904 T15=R35*C1905T16=R36*C1906 T17=R37*C1907T18=R38*C1908 T19=R39*C1909T110=R310*C1910 T111=R311*C1911T112=R312*C1912 T113=R313*C1913T114=R314*C1914 T115=R315*C1915T116=R316*C1916 T117=R317*C1917T118=R318*C1918 T119=R319*C1919T120=R320*C1920 T121=R321*C1921T122=R322*C1922 T123=R323*C1923T124=R324*C1924 T125=R325*C1925T126=R326*C1926 T127=R327*C1927T128=R328*C1928 T129=R329*C1929T130=R330*C1930 T131=R331*C1931T132=R332*C1932 T133=R333*C1933T134=R334*C1934 T135=R335*C1935T136=R336*C1936 T137=R337*C1937T138=R338*C1938 T11=T11+X(I(1))T200=T12+T13 T201=T15+T16T202=T115+T116 T203=T200+T201T204=T12+T14 T205=T15+T17T206=T114+T116 T207=-T203+T18T208=T204+T205 T209=T111-T206T210=T19+T202+T207 T211=T208+T112+T209T212=T204-T205+T202 T213=T207+T208+T110+T206T214=T203+T113+T209+T202 T215=T200-T201+T206T216=T117-T119 T217=T118-T119T218=T11+T216 T219=T11-T216-T217T220=T11+T217 T2100=T121+T122T2101=T124+T125 T2102=T134+T135T2103=T2100+T2101 T2104=T121+T123T2105=T124+T126 T2106=T133+T135T2107=-T2103+T127 T2108=T2104+T2105T2109=T130-T2106 T2110=T128+T2102+T2107T2111=T2108+T131+T2109 T2112=T2104-T2105+T2102T2113=T2107+T2108+T129+T2106 T2114=T2103+T132+T2109+T2102T2115=T2100-T2101+T2106 T2116=T136-T138T2117=T137-T138 T2118=T120+T2116T2119=T120-T2116-T2117 T2120=T120+T2117T32=T213-T210+T218 T310=T214-T211+T219T36=T215-T212+T220 T38=-T213+T218T37=-T214+T219 T34=-T215+T220T39=T210+T218 T35=T211+T219T33=T212+T220 T311=T2113-T2110+T2118T319=T2114-T2111+T2119 T315=T2115-T2112+T2120 T317=-T2113+T2118T316=-T2114+T2119 T313=T2115-T2120T318=-T2110-T2118 T314=T2111+T2119T312=-T2112-T2120 S100=Y(I(2))+Y(I(19))S109=Y(I(2))-Y(I(19)) S101=Y(I(3))+Y(I(18))S110=-Y(I(3))+Y(I(18)) S102=Y(I(5))+Y(I(16))S111=Y(I(5))-Y(I(16)) S103=Y(I(9))+Y(I(12))S112=-Y(I(9))+Y(I(12)) S104=Y(I(17))+Y(I(4))S113=Y(I(17))-Y(I(4)) S105=Y(I(14))+Y(I(7))S114=-Y(I(14))+Y(I(7)) S106=Y(I(8))+Y(I(13))S115=Y(I(8))-Y(I(13)) S107=Y(I(15))+Y(I(6))S116=-Y(I(15))+Y(I(6)) S108=Y(I(10))+Y(I(11))S117=Y(I(10))-Y(I(11)) S200=S100-S106S201=S101-S107 S202=S102-S108S203=S103-S106 S204=S104-S107S205=S105-S108 S206=S100+S103+S106S207=S101+S104+S107 S208=S102+S105+S108S209=S200+S202 S210=S203+S205S31=S206+S207+S208 S32=S210+S204S33=S209+S201 S34=S33-S32S35=S210-S204 S36=S209-S201S37=S36-S35 S38=S203S39=S200-S203 S310=S200S311=S205 S312=S202-S205S313=S202 S314=-S312+S200-S204S315=S39+S205-S201 S316=-S315+S314S317=S206-S208 S318=S207-S208S319=S317+S318 S220=S109-S115S221=S110-S116 S222=S111-S117S223=S112-S115 S224=S113-S116S225=S114-S117 S226=S109+S112+S115S227=S110+S113+S116 S228=S111+S114+S117S229=S220+S222 S230=S223+S225S320=S226+S227+S228 S321=S230+S224S322=S229+S221 S323=S322-S321S324=S230-S224 S325=S229-S221S326=S325-S324 S327=S223S328=S220-S223 S329=S220S330=S225 S331=S222-S225S332=S222 S333=-S331+S220-S224S334=S328+S225-S221 S335=-S334+S333S336=S226-S228 S337=S227-S228S338=S336+S337 Y(I(1))=Y(I(1))+S31U11=S31*C1901 U12=S32*C1902U13=S33*C1903 U14=S34*C1904U15=S35*C1905 U16=S36*C1906U17=S37*C1907 U18=S38*C1908U19=S39*C1909 U110=S310*C1910U111=S311*C1911 U112=S312*C1912U113=S313*C1913 U114=S314*C1914U115=S315*C1915 U116=S316*C1916U117=S317*C1917 U118=S318*C1918U119=S319*C1919 U120=S320*C1920U121=S321*C1921 U122=S322*C1922U123=S323*C1923 U124=S324*C1924U125=S325*C1925 U126=S326*C1926U127=S327*C1927 U128=S328*C1928U129=S329*C1929 U130=S330*C1930U131=S331*C1931 U132=S332*C1932U133=S333*C1933 U134=S334*C1934U135=S335*C1935 U136=S336*C1936U137=S337*C1937 U138=S338*C1938U11=U11+X(I(1)) U200=U12+U13U201=U15+U16 U202=U115+U116U203=U200+U201 U204=U12+U14U205=U15+U17 U206=U114+U116U207=-U203+U18 U208=U204+U205U209=U111-U206 U210=U19+U202+U207U211=U208+U112+U209 U212=U204-U205+U202U213=U207+U208+U110+U206 U214=U203+U113+U209+U202U215=U200-U201+U206 U216=U117-U119U217=U118-U119 U218=U11+U216U219=U11-U216-U217 U220=U11+U217U2100=U121+U122 U2101=U124+U125U2102=U134+U135 U2103=U2100+U2101U2104=U121+U123 U2105=U124+U126U2106=U133+U135 U2107=-U2103+U127U2108=U2104+U2105 U2109=U130-U2106U2110=U128+U2102+U2107 U2111=U2108+U131+U2109U2112=U2104-U2105+U2102 U2113=U2107+U2108+U129+U2106U2114=U2103+U132+U2109+U2102 U2115=U2100-U2101+U2106U2116=U136-U138 U2117=U137-U138U2118=U120+U2116 U2119=U120-U2116-U2117U2120=U120+U2117 U32=U213-U210+U218U310=U214-U211+U219 U36=U215-U212+U220U38=-U213+U218 U37=-U214+U219U34=-U215+U220 U39=U210+U218U35=U211+U219 U33=U212+U220U311=U2113-U2110+U2118 U319=U2114-U2111+U2119U315=U2115-U2112+U2120 U317=-U2113+U2118U316=-U2114+U2119 U313=U2115-U2120U318=-U2110-U2118 U314=U2111+U2119U312=-U2112-U2120 X(I(2))=T32-U311X(I(19))=T32+U311 Y(I(2))=T311+U32Y(I(19))=-T311+U32 X(I(3))=T33-U312X(I(18))=T33+U312 Y(I(3))=T312+U33Y(I(18))=-T312+U33 X(I(4))=T34-U313X(I(17))=T34+U313 Y(I(4))=T313+U34Y(I(17))=-T313+U34 X(I(5))=T35-U314X(I(16))=T35+U314 Y(I(5))=T314+U35Y(I(16))=-T314+U35 X(I(6))=T36-U315X(I(15))=T36+U315 Y(I(6))=T315+U36Y(I(15))=-T315+U36 X(I(7))=T37-U316X(I(14))=T37+U316 Y(I(7))=T316+U37Y(I(14))=-T316+U37 X(I(8))=T38-U317X(I(13)=T38+U317 Y(I(8))=T317+U38Y(I(13)=-T317+U38 X(I(9))=T39-U318X(I(12))=T39+U318 Y(I(9))=T318+U39Y(I(12))=-T318+U39 X(I(10))=T310-U319X(I(11))=T310+U319 Y(I(10))=T319+U310Y(I(11))=-T319+U310 CGOTO 20 CFigure. Length-19 FFT Module

Questions & Answers

I'm interested in biological psychology and cognitive psychology
Tanya Reply
what does preconceived mean
sammie Reply
physiological Psychology
Nwosu Reply
How can I develope my cognitive domain
Amanyire Reply
why is communication effective
Dakolo Reply
Communication is effective because it allows individuals to share ideas, thoughts, and information with others.
effective communication can lead to improved outcomes in various settings, including personal relationships, business environments, and educational settings. By communicating effectively, individuals can negotiate effectively, solve problems collaboratively, and work towards common goals.
it starts up serve and return practice/assessments.it helps find voice talking therapy also assessments through relaxed conversation.
miss
Every time someone flushes a toilet in the apartment building, the person begins to jumb back automatically after hearing the flush, before the water temperature changes. Identify the types of learning, if it is classical conditioning identify the NS, UCS, CS and CR. If it is operant conditioning, identify the type of consequence positive reinforcement, negative reinforcement or punishment
Wekolamo Reply
please i need answer
Wekolamo
because it helps many people around the world to understand how to interact with other people and understand them well, for example at work (job).
Manix Reply
Agreed 👍 There are many parts of our brains and behaviors, we really need to get to know. Blessings for everyone and happy Sunday!
ARC
A child is a member of community not society elucidate ?
JESSY Reply
Isn't practices worldwide, be it psychology, be it science. isn't much just a false belief of control over something the mind cannot truly comprehend?
Simon Reply
compare and contrast skinner's perspective on personality development on freud
namakula Reply
Skinner skipped the whole unconscious phenomenon and rather emphasized on classical conditioning
war
explain how nature and nurture affect the development and later the productivity of an individual.
Amesalu Reply
nature is an hereditary factor while nurture is an environmental factor which constitute an individual personality. so if an individual's parent has a deviant behavior and was also brought up in an deviant environment, observation of the behavior and the inborn trait we make the individual deviant.
Samuel
I am taking this course because I am hoping that I could somehow learn more about my chosen field of interest and due to the fact that being a PsyD really ignites my passion as an individual the more I hope to learn about developing and literally explore the complexity of my critical thinking skills
Zyryn Reply
good👍
Jonathan
and having a good philosophy of the world is like a sandwich and a peanut butter 👍
Jonathan
generally amnesi how long yrs memory loss
Kelu Reply
interpersonal relationships
Abdulfatai Reply
What would be the best educational aid(s) for gifted kids/savants?
Heidi Reply
treat them normal, if they want help then give them. that will make everyone happy
Saurabh
Got questions? Join the online conversation and get instant answers!
Jobilize.com Reply

Get Jobilize Job Search Mobile App in your pocket Now!

Get it on Google Play Download on the App Store Now




Source:  OpenStax, Large dft modules: 11, 13, 16, 17, 19, and 25. revised ece technical report 8105. OpenStax CNX. Sep 14, 2009 Download for free at http://cnx.org/content/col10569/1.7
Google Play and the Google Play logo are trademarks of Google Inc.

Notification Switch

Would you like to follow the 'Large dft modules: 11, 13, 16, 17, 19, and 25. revised ece technical report 8105' conversation and receive update notifications?

Ask