ViewVC Help
View File | Revision Log | Show Annotations | Download File | Root Listing
root/radiance/ray/src/cal/cal/trans.cal
Revision: 1.1
Committed: Sat Feb 22 02:07:21 2003 UTC (21 years, 2 months ago) by greg
Branch: MAIN
CVS Tags: rad3R5
Log Message: 
Changes and check-in for 3.5 release
Includes new source files and modifications not recorded for many years
See ray/doc/notes/ReleaseNotes for notes between 3.1 and 3.5 release

File Contents

# User Rev Content
1 greg 1.1 sq(x) : x*x;
2     n = 1.52; { index of refraction }
3     rn = sq((1-n)/(1+n)); { reflectivity at normal incidence }
4     tn(Tn) = (sqrt(sq(sq(1-rn))+4*sq(rn*Tn))-sq(1-rn)) / 2/rn/rn/Tn;