基于Langan1984年提出的射线追踪的基本原理,用Fortran实现。