function [disp] = voltageToDisplacementL22(voltage, time, gain)
% voltageToDisplacementL22 -
%
% Syntax: [disp] = voltageToDisplacementL22(voltage, time, gain)
%
% Inputs:
%    - voltage - Measured voltage
%    - time - Time vector
%    - gain - Gain of the voltage amplifier in dB
%
% Outputs:
%    - disp -

s = zpk('s');

velocity = voltageToVelocityL22(voltage, time, gain);

disp = lsim(1/(1+s/(2*pi*0.5)), velocity, time);
