%beer lambert's law

%creating an output structure similar to input
OutputPort1 = InputPort1;

%I0 = max(InputPort1.Sampled.Signal);
A = Parameter0;
Z = Parameter1;
[ls, cs] = size(InputPort1.Sampled);
if( ls > 0 )
% caculate the attenuation at each signal
    for counter1=1:cs
    OutputPort1.Sampled(1, counter1).Signal = InputPort1.Sampled(1, counter1).Signal * exp(-1*A*Z);
    end
end