stacksize(100000000);
clf

// __________________________________________________

function [signal] = signalPeriodique( frequence, amplitude, phase, taille )
	x = (1:taille);
	signal = zeros(1,taille);
	periode = 1.0 / frequence;
	signal = amplitude * sin( periode * x + phase );
endfunction

// __________________________________________________

taille = 500;

// on cree 4 signaux periodiques
signalPeriodique_1 = signalPeriodique( 50, 5, 0 , taille );
signalPeriodique_2 = signalPeriodique( 23, 5, 2 , taille );
signalPeriodique_3 = signalPeriodique( 12, 5 , 20, taille );
signalPeriodique_4 = signalPeriodique( 3 , 5 , 6, taille );

// notre signal final est compose de la somme des 4 signaux periodiques de bases
signal = signalPeriodique_1 + signalPeriodique_2 + signalPeriodique_3 + signalPeriodique_4;

subplot(5, 1, 1);
plot( (1:taille), signalPeriodique_1, axesflag= 0 );

subplot(5, 1, 2);
plot( signalPeriodique_2 );

subplot(5, 1, 3);
plot( signalPeriodique_3 );

subplot(5, 1, 4);
plot( signalPeriodique_4 );

subplot(5, 1, 5);
plot( signal );