Context Navigation

fft.icc@ 1969

Visit:

Last change on this file since 1969 was 1337, checked in by ansari, 25 years ago

Creation de module d'exemples (code Sophya + exemple pour (s)piapp)

Reza 20/11/2000

File size: 426 bytes

Rev	Line
[1337]	1	TVector<r_8> in(4048);
	2	TVector<r_8> noise(4048);
	3	TVector< complex<r_8> > out;
	4	in = RegularSequence(0., 0.05);
	5	noise = RandomSequence(RandomSequence::Gaussian, 0., 4.);
	6	MathArray<r_8> ma;
	7	ma.ApplyFunctionInPlace(in, myf);
	8	in += noise;
	9	FFTPackServer FFTServ;
	10	cout << " Calling FFT " << endl;
	11	FFTServ.FFTForward(in, out);
	12	ExecuteCommand("zone 1 2");
	13	KeepObj(in);
	14	DisplayObj(in, "");
	15	// KeepObj(out);
	16	DisplayObj(out, "red");
	17
	18
	19
	20

Note: See TracBrowser for help on using the repository browser.