Forget it...

This digging lark sounds like a right pain in the neck. I'm busy researching Scram Jet technology to fly at Mach12 *around* the world, instead of *through* it.

GOT to be easier.
F = [m dot * V]e - [m dot * V]0 + (pe - p0) * Ae