home *** CD-ROM | disk | FTP | other *** search
/ Stars of Shareware: Raytrace & Morphing / SOS-RAYTRACE.ISO / programm / raytrace / radiance / lib / radpat.cal < prev    next >
Encoding:
Text File  |  1990-07-03  |  242 b   |  9 lines
  1. {
  2.     Make radial pattern for BRDF plots.
  3. }
  4. light_line = if(if(.0025-Px,Px--.0025,-1), 4, 1);
  5. red_band = if(inband, A1, 1);
  6. grn_band = if(inband, A2, 1);
  7. blu_band = if(inband, A3, 1);
  8. inband = .005-mod(sqrt(Px*Px+Py*Py+Pz*Pz)+.0025,.1);
  9.