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

今天，我解决了CODEV中引入自定义间断面的问题。积累了经验，与大家分享。 }
(ma__Ao  
<rB3[IJo  
  按照说明书，有间断的面最好使用USERSUR2，但是，当我打开他的模板后，发现比较复杂，这是一个专门为菲涅尔透镜的生成而编制的程序，参数很多，复杂之处在于处理与各个间断点有关的问题，具体我也没太看懂，只知道是反复叠代找到交点。 zkh hN"bX  
v]:+`dV  
  但是，虽然codev的说明挡中强调USERSUR型子程序只适合于连续表面，但考虑到，光线追迹实际上只需要知道表面的函数和该点的导数，所以，如果在程序中仔细定义间断点处的导数，就可以当成连续面来处理。 d@4rD}_Z  
^XBzZ!h|  
   我的解决办法是，利用有限差分计算导数，而且是前后差分导数都计算出来，做对比，取绝对值小的那一个作为导数。因为，很容易理解，如果某个差分取在了间断点的两侧，一定很大。另一个较小的 qX5yN| A4  
NfTCpA  
就是在间断点同侧取的。数学上来说，相当于左右导数。 eyT>wma0  
W|25t)cJ8h  
  计算表明，比较OK。 =`Po<7D  
s.yq}Q  
      USERSUR.for的使用比较简单。只需把CODEV自带的程序，即， USERSUR.for改成自己的程序名字，再把内容修改就可以。重要的参数就是输出导数。其他像锥常数，曲率等都不用。虽然，允许使用MODE参数选择用codev自己用有限差分计算导数，但最好别这样。应按如上所述处理，比较安全。 <vB<`   
F$Im9T6  
  此外，生成dll文件要使用nmake技术。注意环境变量要设对。此外，如果还出现找不到文件的问题。 V@D]bV@4  
OM.k?1%+M  
那就手动找文件，通常在fortran的安装目录的某些子目录中，用windows的搜索功能就可找到，然后考备到当前目录下，通常是c:\CVuser. 其他问题在codev的帮助文档中很容易找到。 N]14  
wG1y,u'  
在nmake语句中，要注意空格。例如，nmake  -f *******