function [L,VolRodSide,VolPistonSide] = RamState(Ram,x)
if((max(x)>Ram.S) || (min(x)<0))
    error('Ram Position out of Range');
end

L = Ram.lRod+Ram.lRam+Ram.S+Ram.tp+x;
VolRodSide = x*Ram.A;
VolPistonSide = x*Ram.A;
return
end
