1 jones 1.1 C Aperture Limits:
 2           
 3           	real*8 r_Q1,r_Q2,r_Q3
 4           
 5           	parameter	(r_Q1		= 20.50)	!20.50 cm radius
 6           	parameter	(r_Q2		= 30.22)	!30.22 cm radius
 7           	parameter	(r_Q3		= 30.22)	!30.22 cm radius
 8           *
 9           * G. & I. Niculescu
10           *
11           * implement the proper shape of the dipole aperture
12           *
13           	real*8 x_d1,y_d1
14           	real*8 x_d2,y_d2
15           	real*8 x_d3,y_d3
16           	real*8 x_d4,y_d4
17           	real*8 x_d5,y_d5,r_d5
18           	real*8 a_d6,b_d6
19           *
20           	parameter    (x_d1 = 34.29)	
21           	parameter    (y_d1 = 12.07)
22 jones 1.1 	parameter    (x_d2 = 27.94)	
23           	parameter    (y_d2 = 18.42)
24           	parameter    (x_d3 = 13.97)	
25           	parameter    (y_d3 = 18.95)
26           	parameter    (x_d4 = 1.956)	
27           	parameter    (y_d4 = 20.32)
28           	parameter    (x_d5 = 27.94)	
29           	parameter    (y_d5 = 12.065)
30           	parameter    (r_d5 =  6.35)
31           	parameter    (a_d6 = -0.114)
32           	parameter    (b_d6 = 20.54)