def _overpressuretotalimpulse(r, y, alt):
sgr = r / y**(1.0/3)
shob = alt / y**(1.0/3)
x_m = _scaledmachstemformationrange(y, alt)
v = _slantrangescalingfactor(r, y, alt)
r1 = _scale_slant_range(r, y, alt) / v
ta_air = _scaledfreeairblastwavetoa(r1) * v
dp = _scaledopposphasedur(r, y, alt)
t_p = 13 * (ta_air + dp) / 14
scaled_impulse, _ = quad(lambda t: _opatscaledtime(r, y, alt, sgr, shob, x_m, ta_air, dp, t), ta_air, ta_air + dp)
return scaled_impulse * y**(1.0/3)
评论列表
文章目录