ViewVC Help
View File | Revision Log | Show Annotations | Download File | Root Listing
root/radiance/ray/lib/plink.cal
Revision: 1.2
Committed: Tue Mar 18 17:30:17 2003 UTC (22 years, 1 month ago) by greg
Branch: MAIN
CVS Tags: HEAD
Changes since 1.1: +0 -0 lines
State: FILE REMOVED
Log Message:
Decided to move ray/lib directory into non-CVS distribution

File Contents

# User Rev Content
1 greg 1.1 {
2     Definitions for PLINK-specific materials
3    
4     This file assumes meters.
5    
6     Created: 03Sept91 Greg Ward
7     Last modified: 03Sept91
8     }
9    
10     { pattern for criss-crossed wires in armored glass (armee) }
11     wire_width : .001;
12     wire_spacing : .011;
13     u_armor = wire_width - mod(U,wire_spacing);
14     v_armor = wire_width - mod(V,wire_spacing);
15     arm_wire = if(or(u_armor,v_armor), .2, 1);
16    
17     { texture for bathroom-style glass (granule) }
18     gran_scale : .002;
19     gran_mag = .3*Rdot;
20     gran_dx = gran_mag * noise3a(Px/gran_scale,Py/gran_scale,Pz/gran_scale);
21     gran_dy = gran_mag * noise3b(Px/gran_scale,Py/gran_scale,Pz/gran_scale);
22     gran_dz = gran_mag * noise3c(Px/gran_scale,Py/gran_scale,Pz/gran_scale);
23    
24     { texture for "hammered" glass (martele) }
25     mg_scale : .001;
26     mg_mag = .15*Rdot;
27     mb_scale : .01;
28     mb_cvr : .2;
29     mb_val = noise3(Px/mb_scale,Py/mb_scale,Pz/mb_scale);
30     mb_true = mb_cvr/2 - abs(mb_val);
31     mb_mag = mb_val/(mb_cvr/2)*Rdot;
32     mar_dx = if(mb_true,
33     mb_mag*noise3a(Px/mb_scale,Py/mb_scale,Pz/mb_scale),
34     mg_mag*noise3a(Px/mg_scale,Py/mg_scale,Pz/mg_scale));
35     mar_dy = if(mb_true,
36     mb_mag*noise3b(Px/mb_scale,Py/mb_scale,Pz/mb_scale),
37     mg_mag*noise3b(Px/mg_scale,Py/mg_scale,Pz/mg_scale));
38     mar_dz = if(mb_true,
39     mb_mag*noise3c(Px/mb_scale,Py/mb_scale,Pz/mb_scale),
40     mg_mag*noise3c(Px/mg_scale,Py/mg_scale,Pz/mg_scale));