function lowpasd = lowpass(ordr,cutoff,data);

cutoffreq = 2/cutoff;
[B,A]=butter(ordr,cutoffreq); 
lowpasd=filtfilt(B,A,data);

