功能函数，土体一维运动响应分析，计算由于SV或SH波引起的土层界面的位移。-Function [f, U, A, B] = WAVEPROP(input) calculates the displacement fields on the soil interfaces, caused by the wave propagation of a unitary VERTICAL SV or SH wave through an elastic multilayer soil profile.