[原创]CODEV中引入自定义间断面 [复制链接]

今天，我解决了CODEV中引入自定义间断面的问题。积累了经验，与大家分享。 :&:>sd(QD  
V)(pe #P  
  按照说明书，有间断的面最好使用USERSUR2，但是，当我打开他的模板后，发现比较复杂，这是一个专门为菲涅尔透镜的生成而编制的程序，参数很多，复杂之处在于处理与各个间断点有关的问题，具体我也没太看懂，只知道是反复叠代找到交点。 !m(6/*PAl  
gdG
: &{|x  
  但是，虽然codev的说明挡中强调USERSUR型子程序只适合于连续表面，但考虑到，光线追迹实际上只需要知道表面的函数和该点的导数，所以，如果在程序中仔细定义间断点处的导数，就可以当成连续面来处理。 uk'<9g^  
$!vi:+ED  
   我的解决办法是，利用有限差分计算导数，而且是前后差分导数都计算出来，做对比，取绝对值小的那一个作为导数。因为，很容易理解，如果某个差分取在了间断点的两侧，一定很大。另一个较小的 '6WDs]\  
fGe{7p6XV*  
就是在间断点同侧取的。数学上来说，相当于左右导数。 +?@qux!  
(/KF;J^M  
  计算表明，比较OK。 `GDYL7pM(  
qJ!oH&/cD  
      USERSUR.for的使用比较简单。只需把CODEV自带的程序，即， USERSUR.for改成自己的程序名字，再把内容修改就可以。重要的参数就是输出导数。其他像锥常数，曲率等都不用。虽然，允许使用MODE参数选择用codev自己用有限差分计算导数，但最好别这样。应按如上所述处理，比较安全。 {(MG: B  
Y-{spTI  
  此外，生成dll文件要使用nmake技术。注意环境变量要设对。此外，如果还出现找不到文件的问题。 r2Z`4tN:  
{ o;0Fx  
那就手动找文件，通常在fortran的安装目录的某些子目录中，用windows的搜索功能就可找到，然后考备到当前目录下，通常是c:\CVuser. 其他问题在codev的帮助文档中很容易找到。 eD(a +El}  
=H?Nb:s  
在nmake语句中，要注意空格。例如，nmake  -f *******