Re: mpb : how to duplicate a geometry object

Hi, Julien,
In your case, the codes should be something like this:
==============================
(set! geometry (list (make block (center (vector3 0 0 0)) (size size-x size-y infinity) (material mat))))
(set! geometry 
                 (append geometry 
                    (geometric-object-duplicates (vector3 1 0 0) 1 10          
				(make cylinder (center -0.2 0 0) (radius 0.06) (height infinity) (material air) )) ))

 ==============================
      ran





  ------------------ Original ------------------
From:  "Julien Arlandis"<[email protected]>;
Date:  Tue, Sep 15, 2009 02:48 PM
To:  "mpb-discuss"<[email protected]>; 

Subject:  Re: [MPB-discuss] mpb : how to duplicate a geometry object

 
Hello,

I write :

(define air (make dielectric (epsilon 12)))

(define whole1 (make cylinder (center -0.2 0 0) (radius 0.06) (height 
infinity) (material air) ))

(define whole2 (make cylinder (center 0.3 0 0) (radius 0.04) (height 
infinity) (material air) ))

(set! geometry (list whole1 whole2))

=> 2 wholes

If I add :

(geometric-object-duplicates (vector3 1 0 0) 1 10 whole1))

=> no change...

_______________________________________________
mpb-discuss mailing list
[email protected]
http://ab-initio.mit.edu/cgi-bin/mailman/listinfo/mpb-discuss