[求助]跪求二维情况下PML的fortran程序代码？？

最近在做一个PMl吸收边界，我再matlab里面实现了简单矩形区域的电磁波传播吸收模拟，吸收效果有一些，但是还不够好，但运用这种差分格式嵌入到我老师给我的一个很大的模拟程序里面时发现几乎没有吸收效果，他是fortran 遍的，那位大虾能给我一个吸收效果特别好的 .. 'hl4cHk14  
[_?dpaTt  

未注册仅能浏览部分内容，查看全部内容及附件请先 登录 或 注册

http://bbs.rfeda.cn/read-htm-tid-16687-fpage-0-toread--page-2.html 0<";9qN)6  
我贴了一个PML的二维的源码，吸收效果还是不错的。你参考看看吧。

晕，原来是你发的帖子啊，我在整理帖子，呵呵。