k60-keil

K60-Keil版本（下载安装MDK4.23）

/* ----------------------------------------------------------------------   
* Copyright (C) 2010 ARM Limited. All rights reserved.   
*   
* $Date:        15. July 2011  
* $Revision: 	V1.0.10  
*   
* Project: 	    CMSIS DSP Library   
* Title:	    arm_rfft_init_f32.c   
*   
* Description:	RFFT & RIFFT Floating point initialisation function   
*   
* Target Processor: Cortex-M4/Cortex-M3/Cortex-M0
*  
* Version 1.0.10 2011/7/15 
*    Big Endian support added and Merged M0 and M3/M4 Source code.  
*   
* Version 1.0.3 2010/11/29  
*    Re-organized the CMSIS folders and updated documentation.   
*    
* Version 1.0.2 2010/11/11   
*    Documentation updated.    
*   
* Version 1.0.1 2010/10/05    
*    Production release and review comments incorporated.   
*   
* Version 1.0.0 2010/09/20    
*    Production release and review comments incorporated.   
*   
* Version 0.0.7  2010/06/10    
*    Misra-C changes done   
* -------------------------------------------------------------------- */


#include "arm_math.h"

/**   
 * @ingroup groupTransforms   
 */

/**   
 * @addtogroup RFFT_RIFFT   
 * @{   
 */

/**   
* \par   
* Generation of realCoefA array:   
* \par   
* 	n = 1024   
* <pre>for (i = 0; i < n; i++)   
*  {   
*    pATable[2 * i] = 0.5 * (1.0 - sin (2 * PI / (double) (2 * n) * (double) i));   
*    pATable[2 * i + 1] = 0.5 * (-1.0 * cos (2 * PI / (double) (2 * n) * (double) i));   
*  } </pre>   
*/



static const float32_t realCoefA[2048] = {
  0.500000000000000000f, -0.500000000000000000f, 0.498466014862060550f,
  -0.499997645616531370f, 0.496932059526443480f, -0.499990582466125490f,
  0.495398133993148800f, -0.499978810548782350f,
  0.493864238262176510f, -0.499962359666824340f, 0.492330402135849000f,
  -0.499941170215606690f, 0.490796625614166260f, -0.499915301799774170f,
  0.489262968301773070f, -0.499884694814682010f,
  0.487729400396347050f, -0.499849408864974980f, 0.486195921897888180f,
  -0.499809414148330690f, 0.484662592411041260f, -0.499764710664749150f,
  0.483129411935806270f, -0.499715298414230350f,
  0.481596380472183230f, -0.499661177396774290f, 0.480063527822494510f,
  -0.499602377414703370f, 0.478530883789062500f, -0.499538868665695190f,
  0.476998418569564820f, -0.499470651149749760f,
  0.475466161966323850f, -0.499397724866867070f, 0.473934143781661990f,
  -0.499320119619369510f, 0.472402364015579220f, -0.499237775802612300f,
  0.470870882272720340f, -0.499150782823562620f,
  0.469339638948440550f, -0.499059051275253300f, 0.467808693647384640f,
  -0.498962640762329100f, 0.466278046369552610f, -0.498861521482467650f,
  0.464747726917266850f, -0.498755723237991330f,
  0.463217705488204960f, -0.498645216226577760f, 0.461688071489334110f,
  -0.498530030250549320f, 0.460158795118331910f, -0.498410135507583620f,
  0.458629876375198360f, -0.498285561800003050f,
  0.457101345062255860f, -0.498156309127807620f, 0.455573230981826780f,
  -0.498022347688674930f, 0.454045534133911130f, -0.497883707284927370f,
  0.452518254518508910f, -0.497740387916564940f,
  0.450991421937942500f, -0.497592359781265260f, 0.449465066194534300f,
  -0.497439652681350710f, 0.447939187288284300f, -0.497282296419143680f,
  0.446413785219192500f, -0.497120231389999390f,
  0.444888889789581300f, -0.496953487396240230f, 0.443364530801773070f,
  -0.496782064437866210f, 0.441840678453445430f, -0.496605962514877320f,
  0.440317392349243160f, -0.496425211429595950f,
  0.438794672489166260f, -0.496239781379699710f, 0.437272518873214720f,
  -0.496049642562866210f, 0.435750931501388550f, -0.495854884386062620f,
  0.434229999780654910f, -0.495655417442321780f,
  0.432709634304046630f, -0.495451331138610840f, 0.431189924478530880f,
  -0.495242536067962650f, 0.429670870304107670f, -0.495029091835021970f,
  0.428152471780776980f, -0.494810998439788820f,
  0.426634758710861210f, -0.494588255882263180f, 0.425117731094360350f,
  -0.494360834360122680f, 0.423601418733596800f, -0.494128793478012080f,
  0.422085791826248170f, -0.493892073631286620f,
  0.420570939779281620f, -0.493650704622268680f, 0.419056802988052370f,
  -0.493404686450958250f, 0.417543441057205200f, -0.493154048919677730f,
  0.416030853986740110f, -0.492898762226104740f,
  0.414519041776657100f, -0.492638826370239260f, 0.413008064031600950f,
  -0.492374241352081300f, 0.411497890949249270f, -0.492105036973953250f,
  0.409988552331924440f, -0.491831213235855100f,
  0.408480048179626460f, -0.491552740335464480f, 0.406972438097000120f,
  -0.491269648075103760f, 0.405465662479400630f, -0.490981936454772950f,
  0.403959810733795170f, -0.490689605474472050f,
  0.402454853057861330f, -0.490392625331878660f, 0.400950789451599120f,
  -0.490091055631637570f, 0.399447679519653320f, -0.489784896373748780f,
  0.397945523262023930f, -0.489474087953567500f,
  0.396444320678710940f, -0.489158689975738530f, 0.394944071769714360f,
  -0.488838672637939450f, 0.393444836139678960f, -0.488514065742492680f,
  0.391946613788604740f, -0.488184869289398190f,
  0.390449374914169310f, -0.487851053476333620f, 0.388953179121017460f,
  -0.487512677907943730f, 0.387458056211471560f, -0.487169682979583740f,
  0.385963946580886840f, -0.486822128295898440f,
  0.384470939636230470f, -0.486469984054565430f, 0.382979035377502440f,
  -0.486113250255584720f, 0.381488204002380370f, -0.485751956701278690f,
  0.379998475313186650f, -0.485386073589324950f,
  0.378509908914566040f, -0.485015630722045900f, 0.377022475004196170f,
  -0.484640628099441530f, 0.375536203384399410f, -0.484261035919189450f,
  0.374051094055175780f, -0.483876913785934450f,
  0.372567176818847660f, -0.483488231897354130f, 0.371084451675415040f,
  -0.483094990253448490f, 0.369602948427200320f, -0.482697218656539920f,
  0.368122667074203490f, -0.482294887304306030f,
  0.366643607616424560f, -0.481888025999069210f, 0.365165829658508300f,
  -0.481476634740829470f, 0.363689333200454710f, -0.481060713529586790f,
  0.362214088439941410f, -0.480640232563018800f,
  0.360740154981613160f, -0.480215251445770260f, 0.359267532825469970f,
  -0.479785770177841190f, 0.357796221971511840f, -0.479351729154586790f,
  0.356326282024383540f, -0.478913217782974240f,
  0.354857653379440310f, -0.478470176458358760f, 0.353390425443649290f,
  -0.478022634983062740f, 0.351924568414688110f, -0.477570593357086180f,
  0.350460082292556760f, -0.477114051580429080f,
  0.348997026681900020f, -0.476653009653091430f, 0.347535371780395510f,
  -0.476187497377395630f, 0.346075177192687990f, -0.475717514753341670f,
  0.344616413116455080f, -0.475243031978607180f,
  0.343159139156341550f, -0.474764078855514530f, 0.341703325510025020f,
  -0.474280685186386110f, 0.340248972177505490f, -0.473792791366577150f,
  0.338796168565750120f, -0.473300457000732420f,
  0.337344855070114140f, -0.472803652286529540f, 0.335895091295242310f,
  -0.472302407026290890f, 0.334446847438812260f, -0.471796721220016480f,
  0.333000183105468750f, -0.471286594867706300f,
  0.331555068492889400f, -0.470772027969360350f, 0.330111563205718990f,
  -0.470253020524978640f, 0.328669637441635130f, -0.469729602336883540f,
  0.327229350805282590f, -0.469201773405075070f,
  0.325790673494338990f, -0.468669503927230830f, 0.324353635311126710f,
  -0.468132823705673220f, 0.322918236255645750f, -0.467591762542724610f,
  0.321484506130218510f, -0.467046260833740230f,
  0.320052474737167360f, -0.466496407985687260f, 0.318622142076492310f,
  -0.465942144393920900f, 0.317193508148193360f, -0.465383470058441160f,
  0.315766572952270510f, -0.464820444583892820f,
  0.314341396093368530f, -0.464253038167953490f, 0.312917977571487430f,
  -0.463681250810623170f, 0.311496287584304810f, -0.463105112314224240f,
  0.310076385736465450f, -0.462524622678756710f,
  0.308658272027969360f, -0.461939752101898190f, 0.307241976261138920f,
  -0.461350560188293460f, 0.305827468633651730f, -0.460757017135620120f,
  0.304414808750152590f, -0.460159152746200560f,
  0.303003966808319090f, -0.459556937217712400f, 0.301595002412796020f,
  -0.458950400352478030f, 0.300187885761260990f, -0.458339542150497440f,
  0.298782676458358760f, -0.457724362611770630f,
  0.297379344701766970f, -0.457104891538620000f, 0.295977920293807980f,
  -0.456481099128723140f, 0.294578403234481810f, -0.455853015184402470f,
  0.293180853128433230f, -0.455220639705657960f,
  0.291785210371017460f, -0.454584002494812010f, 0.290391564369201660f,
  -0.453943043947219850f, 0.288999855518341060f, -0.453297853469848630f,
  0.287610173225402830f, -0.452648371458053590f,
  0.286222457885742190f, -0.451994657516479490f, 0.284836769104003910f,
  -0.451336652040481570f, 0.283453077077865600f, -0.450674414634704590f,
  0.282071471214294430f, -0.450007945299148560f,
  0.280691891908645630f, -0.449337244033813480f, 0.279314368963241580f,
  -0.448662281036376950f, 0.277938932180404660f, -0.447983115911483760f,
  0.276565581560134890f, -0.447299748659133910f,
  0.275194346904754640f, -0.446612149477005000f, 0.273825198411941530f,
  -0.445920348167419430f, 0.272458195686340330f, -0.445224374532699580f,
  0.271093338727951050f, -0.444524168968200680f,
  0.269730657339096070f, -0.443819820880889890f, 0.268370121717453000f,
  -0.443111270666122440f, 0.267011761665344240f, -0.442398548126220700f,
  0.265655577182769780f, -0.441681683063507080f,
  0.264301627874374390f, -0.440960645675659180f, 0.262949883937835690f,
  -0.440235435962677000f, 0.261600375175476070f, -0.439506113529205320f,
  0.260253131389617920f, -0.438772648572921750f,
  0.258908122777938840f, -0.438035041093826290f, 0.257565379142761230f,
  -0.437293320894241330f, 0.256224930286407470f, -0.436547487974166870f,
  0.254886746406555180f, -0.435797542333602910f,
  0.253550916910171510f, -0.435043483972549440f, 0.252217382192611690f,
  -0.434285342693328860f, 0.250886172056198120f, -0.433523118495941160f,
  0.249557301402091980f, -0.432756811380386350f,
  0.248230814933776860f, -0.431986421346664430f, 0.246906682848930360f,
  -0.431211978197097780f, 0.245584934949874880f, -0.430433481931686400f,
  0.244265571236610410f, -0.429650902748107910f,
  0.242948621511459350f, -0.428864300251007080f, 0.241634100675582890f,
  -0.428073674440383910f, 0.240322008728981020f, -0.427278995513916020f,
  0.239012360572814940f, -0.426480293273925780f,
  0.237705156207084660f, -0.425677597522735600f, 0.236400425434112550f,
  -0.424870878458023070f, 0.235098183155059810f, -0.424060165882110600f,
  0.233798429369926450f, -0.423245459794998170f,
  0.232501193881034850f, -0.422426789999008180f, 0.231206461787223820f,
  -0.421604126691818240f, 0.229914262890815730f, -0.420777499675750730f,
  0.228624612092971800f, -0.419946908950805660f,
  0.227337509393692020f, -0.419112354516983030f, 0.226052969694137570f,
  -0.418273866176605220f, 0.224771007895469670f, -0.417431443929672240f,
  0.223491653800010680f, -0.416585087776184080f,
  0.222214877605438230f, -0.415734797716140750f, 0.220940738916397090f,
  -0.414880603551864620f, 0.219669207930564880f, -0.414022535085678100f,
  0.218400329351425170f, -0.413160532712936400f,
  0.217134088277816770f, -0.412294656038284300f, 0.215870529413223270f,
  -0.411424905061721800f, 0.214609622955322270f, -0.410551249980926510f,
  0.213351413607597350f, -0.409673750400543210f,
  0.212095901370048520f, -0.408792406320571900f, 0.210843101143836980f,
  -0.407907217741012570f, 0.209593027830123900f, -0.407018154859542850f,
  0.208345666527748110f, -0.406125307083129880f,