← Back to branch summary

~ubuntu-branches/ubuntu/maverick/blender/maverick

« back to all changes in this revision

Viewing changes to extern/fftw/dft/codelets/standard/t1_2.c

  • Committer: Bazaar Package Importer
  • Author(s): Khashayar Naderehvandi, Khashayar Naderehvandi, Alessio Treglia
  • Date: 2009-01-22 16:53:59 UTC
  • mfrom: (14.1.1 experimental)
  • Revision ID: james.westby@ubuntu.com-20090122165359-v0996tn7fbit64ni
Tags: 2.48a+dfsg-1ubuntu1
https://launchpad.net/bugs/320045
[ Khashayar Naderehvandi ]
* Merge from debian experimental (LP: #320045), Ubuntu remaining changes:
  - Add patch correcting header file locations.
  - Add libvorbis-dev and libgsm1-dev to Build-Depends.
  - Use avcodec_decode_audio2() in source/blender/src/hddaudio.c

[ Alessio Treglia ]
* Add missing previous changelog entries.

Show diffs side-by-side

added added

removed removed

Lines of Context:
extern/fftw/dft/codelets/standard/t1_2.c
 
1
/*
 
2
 * Copyright (c) 2003, 2006 Matteo Frigo
 
3
 * Copyright (c) 2003, 2006 Massachusetts Institute of Technology
 
4
 *
 
5
 * This program is free software; you can redistribute it and/or modify
 
6
 * it under the terms of the GNU General Public License as published by
 
7
 * the Free Software Foundation; either version 2 of the License, or
 
8
 * (at your option) any later version.
 
9
 *
 
10
 * This program is distributed in the hope that it will be useful,
 
11
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 
12
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 
13
 * GNU General Public License for more details.
 
14
 *
 
15
 * You should have received a copy of the GNU General Public License
 
16
 * along with this program; if not, write to the Free Software
 
17
 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
 
18
 *
 
19
 */
 
20
 
 
21
/* This file was automatically generated --- DO NOT EDIT */
 
22
/* Generated on Sat Jul  1 13:58:08 EDT 2006 */
 
23
 
 
24
#include "codelet-dft.h"
 
25
 
 
26
#ifdef HAVE_FMA
 
27
 
 
28
/* Generated by: ../../../genfft/gen_twiddle -fma -reorder-insns -schedule-for-pipeline -compact -variables 4 -pipeline-latency 4 -n 2 -name t1_2 -include t.h */
 
29
 
 
30
/*
 
31
 * This function contains 6 FP additions, 4 FP multiplications,
 
32
 * (or, 4 additions, 2 multiplications, 2 fused multiply/add),
 
33
 * 11 stack variables, and 8 memory accesses
 
34
 */
 
35
/*
 
36
 * Generator Id's : 
 
37
 * $Id: algsimp.ml,v 1.9 2006-02-12 23:34:12 athena Exp $
 
38
 * $Id: fft.ml,v 1.4 2006-01-05 03:04:27 stevenj Exp $
 
39
 * $Id: gen_twiddle.ml,v 1.24 2006-02-12 23:34:12 athena Exp $
 
40
 */
 
41
 
 
42
#include "t.h"
 
43
 
 
44
static const R *t1_2(R *ri, R *ii, const R *W, stride ios, INT m, INT dist)
 
45
{
 
46
     INT i;
 
47
     for (i = m; i > 0; i = i - 1, ri = ri + dist, ii = ii + dist, W = W + 2, MAKE_VOLATILE_STRIDE(ios)) {
 
48
          E T1, Ta, T3, T6, T2, T5;
 
49
          T1 = ri[0];
 
50
          Ta = ii[0];
 
51
          T3 = ri[WS(ios, 1)];
 
52
          T6 = ii[WS(ios, 1)];
 
53
          T2 = W[0];
 
54
          T5 = W[1];
 
55
          {
 
56
               E T8, T4, T9, T7;
 
57
               T8 = T2 * T6;
 
58
               T4 = T2 * T3;
 
59
               T9 = FNMS(T5, T3, T8);
 
60
               T7 = FMA(T5, T6, T4);
 
61
               ii[0] = T9 + Ta;
 
62
               ii[WS(ios, 1)] = Ta - T9;
 
63
               ri[0] = T1 + T7;
 
64
               ri[WS(ios, 1)] = T1 - T7;
 
65
          }
 
66
     }
 
67
     return W;
 
68
}
 
69
 
 
70
static const tw_instr twinstr[] = {
 
71
     {TW_FULL, 0, 2},
 
72
     {TW_NEXT, 1, 0}
 
73
};
 
74
 
 
75
static const ct_desc desc = { 2, "t1_2", twinstr, &GENUS, {4, 2, 2, 0}, 0, 0, 0 };
 
76
 
 
77
void X(codelet_t1_2) (planner *p) {
 
78
     X(kdft_dit_register) (p, t1_2, &desc);
 
79
}
 
80
#else                           /* HAVE_FMA */
 
81
 
 
82
/* Generated by: ../../../genfft/gen_twiddle -compact -variables 4 -pipeline-latency 4 -n 2 -name t1_2 -include t.h */
 
83
 
 
84
/*
 
85
 * This function contains 6 FP additions, 4 FP multiplications,
 
86
 * (or, 4 additions, 2 multiplications, 2 fused multiply/add),
 
87
 * 9 stack variables, and 8 memory accesses
 
88
 */
 
89
/*
 
90
 * Generator Id's : 
 
91
 * $Id: algsimp.ml,v 1.9 2006-02-12 23:34:12 athena Exp $
 
92
 * $Id: fft.ml,v 1.4 2006-01-05 03:04:27 stevenj Exp $
 
93
 * $Id: gen_twiddle.ml,v 1.24 2006-02-12 23:34:12 athena Exp $
 
94
 */
 
95
 
 
96
#include "t.h"
 
97
 
 
98
static const R *t1_2(R *ri, R *ii, const R *W, stride ios, INT m, INT dist)
 
99
{
 
100
     INT i;
 
101
     for (i = m; i > 0; i = i - 1, ri = ri + dist, ii = ii + dist, W = W + 2, MAKE_VOLATILE_STRIDE(ios)) {
 
102
          E T1, T8, T6, T7;
 
103
          T1 = ri[0];
 
104
          T8 = ii[0];
 
105
          {
 
106
               E T3, T5, T2, T4;
 
107
               T3 = ri[WS(ios, 1)];
 
108
               T5 = ii[WS(ios, 1)];
 
109
               T2 = W[0];
 
110
               T4 = W[1];
 
111
               T6 = FMA(T2, T3, T4 * T5);
 
112
               T7 = FNMS(T4, T3, T2 * T5);
 
113
          }
 
114
          ri[WS(ios, 1)] = T1 - T6;
 
115
          ii[WS(ios, 1)] = T8 - T7;
 
116
          ri[0] = T1 + T6;
 
117
          ii[0] = T7 + T8;
 
118
     }
 
119
     return W;
 
120
}
 
121
 
 
122
static const tw_instr twinstr[] = {
 
123
     {TW_FULL, 0, 2},
 
124
     {TW_NEXT, 1, 0}
 
125
};
 
126
 
 
127
static const ct_desc desc = { 2, "t1_2", twinstr, &GENUS, {4, 2, 2, 0}, 0, 0, 0 };
 
128
 
 
129
void X(codelet_t1_2) (planner *p) {
 
130
     X(kdft_dit_register) (p, t1_2, &desc);
 
131
}
 
132
#endif                          /* HAVE_FMA */