function [y]=f1PCMp(omega,x)
y=omega*exp(-omega*x);
end