ray/lib/brick.cal

{
        Brick patterns

        A1      = Grout width
        A2      = Nominal layer height
        A3      = Nominal brick spacing
        A4      = Offset
        A5      = Brick brightness
        A6      = Grout brightness
}

brick_xy = if( f_brick_xy, A5, A6 );
brick_x = if( f_brick_x, A5, A6 );
brick_y = if( f_brick_y, A5, A6 );

f_brick_xy = and( brick_inv,
        if( brick_inx, brick_inh(Px+2*A1), brick_inh(Py+2*A1) ) );
f_brick_x = and( brick_inv, brick_inh(Px) ) ;
f_brick_y = and( brick_inv, brick_inh(Py) ) ;

brick_inx = .5 - Nx*Nx;
brick_inv = mod(Pz,A2) - A1 ;
brick_inh(h) = mod(h+floor(Pz/A2)*A4,A3) - A1;

brick_swx = if(brick_inx, 1, 0);
Revision:	1.2
Committed:	Tue Mar 18 17:30:16 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
#	User	Rev	Content
1	greg	1.1	{
2			Brick patterns
3
4			A1 = Grout width
5			A2 = Nominal layer height
6			A3 = Nominal brick spacing
7			A4 = Offset
8			A5 = Brick brightness
9			A6 = Grout brightness
10			}
11
12			brick_xy = if( f_brick_xy, A5, A6 );
13			brick_x = if( f_brick_x, A5, A6 );
14			brick_y = if( f_brick_y, A5, A6 );
15
16			f_brick_xy = and( brick_inv,
17			if( brick_inx, brick_inh(Px+2A1), brick_inh(Py+2A1) ) );
18			f_brick_x = and( brick_inv, brick_inh(Px) ) ;
19			f_brick_y = and( brick_inv, brick_inh(Py) ) ;
20
21			brick_inx = .5 - Nx*Nx;
22			brick_inv = mod(Pz,A2) - A1 ;
23			brick_inh(h) = mod(h+floor(Pz/A2)*A4,A3) - A1;
24
25			brick_swx = if(brick_inx, 1, 0);