Srf : flatSrf( linear, linear, 2, 2 );
Ball : sphere( pt( 0, 0, .25 ), .25 );

setColor( Srf, color( 120, 50, 15 ));
setColor( Ball, "Bronze" );
setSq( Srf, "Wood1" );
setSq( Ball, "Mirror" );
setTexture( Srf, "wood_grain1.rle" );

dumpGeomFile( array( Srf, Ball ), "/tmp/geom.a1" );

# csh commands
# aset ray.rleformat on
# ray /tmp/mat.a1 /tmp/geom.a1 > ray.rle.Z&
# getx11 ray.rle.Z