home *** CD-ROM | disk | FTP | other *** search
/ Stars of Shareware: Raytrace & Morphing / SOS-RAYTRACE.ISO / programm / raytrace / radiance / lib / surf.cal < prev    next >
Encoding:
Text File  |  1991-11-12  |  606 b   |  19 lines
  1. { SCCSid "@(#)surf.cal 2.1 11/12/91 LBL" }
  2.  
  3. {
  4.     surf.cal - calculation of interpolated surface normal
  5.  
  6.     A1        - dominant axis (we use the other two)
  7.     A2  A3  A4    \
  8.     A5  A6  A7     \ normal perturbation vector matrix
  9.     A8  A9  A10     / multiplied by [u*v u v 1] for perturbation
  10.     A11 A12 A13    /
  11. }
  12.  
  13. surf_dx = surf_u*surf_v*arg(2) + surf_u*arg(5) + surf_v*arg(8) + arg(11);
  14. surf_dy = surf_u*surf_v*arg(3) + surf_u*arg(6) + surf_v*arg(9) + arg(12);
  15. surf_dz = surf_u*surf_v*arg(4) + surf_u*arg(7) + surf_v*arg(10) + arg(13);
  16.  
  17. surf_u = select(arg(1)+1, Py, Pz, Px);
  18. surf_v = select(arg(1)+1, Pz, Px, Py);
  19.