clc; clear all; close all; F1 = 85000; Fe = 320000; F = 5000; Te = 1/Fe; T = 1/F ; M = T/Te; Tsim = T-Te; Res = sim('carre'); plot(Res.Carre_Continu,'b'); hold on; plot(Res.Signal_Filtre,'o'); %figure f = fft(Res.Signal_Filtre.data, M); %stem(linspace(0, M-1, M), abs(f),'o'); figure stem(linspace(0, M-1, M) / (M*Te), abs(f),'o'); figure bode(tf(1,[1.7483E-23 7.6663E-18 1.162E-11 3.0332E-6 1]))