bendcoeff.m

我自己编的计算地质埋藏史用的一维回拨程序。

function c=bendcoeff(rom,ros,D,lamda)
c=(rom-ros)/(rom-ros+D/9*(2*pi/lamda)^4);