rms2int(vrms, t0, flag)

Root-Mean-Square (RMS) velocity to interval velocity

% c----------------------------------------------------------------
% c This function converts Vrms to interval velocity in ft/s
% c
% c vint = rms2int(vrms,t0)
% c
% c INPUT
% c vrms,t0 = Rms velocity and t0 time pair
% c flag = inverse transform or forward(default: flag = 1)
% c = inverse transform from interval to rms flag = other
% c = forward from rms to interval flag = 1
% c OUTPUT
% c vint = interval velocity in ft/s
% c
% c------------------------------------------------------------------
% c Huizhong Yan March 2016
% c based on Dix equation
% c-------------------------------------------------------------------