
using Interpolations

f = [0 0 .1 .2  .25  .2 .25 .3 .35 .43 .45 .5 .55  .5 .4 .425 .45 .425 .4 .35 .3 .25 .225 .2 .1 0 0];
g = [0 0 .025 .1  .2  .175 .2 .25 .25 .3 .32 .35 .375  .325 .3 .275 .275 .25 .225 .225 .2 .175 .15 .15 .05 0 0].- 0.025;

x = 0.1 * (1:length(f));
xf = .01:.01:last(x)

ff = scale(interpolate(f, BSpline(Cubic(Line(OnGrid())))), x)