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
