! Document name: bifdoor_panel_D2

!name:bifdoor_panel_D2  29.06.1989.
!internal macro:pattern_

pars width, height,spacing

rect a,b
model wire
addx 2"
addy 4"
rect a-4",3*(b-12")/7
addx 1"
addy 1"
rect a-6",3*(b-12")/7-2"
pattern_ a-6",3*(b-12")/7-2",c
del 2
addy 3*(b-12")/7+3"
rect a-4",4*(b-12")/7+2"
addx 1"
addy 1"
rect a-6",4*(b-12")/7
pattern_ a-6",4*(b-12")/7,c
del top
end