#define BETA    30.0
#define NUM_AZ  100
/* COBRA site in Nago-dake */
#define LONRC   (128.+3./60.+57./3600.)  /* 128.06583 */
#define LATRC   (26.+34./60.+57./3600.)  /*  26.58250 */
/* CRL Okinawa Denpa Observetry */ 
#define LONB    (127.+48.4/60.)
#define LATB    (26.+16.9/60.)
/* Yoron-Island */
#define LONB    (128.44)
#define LATB    ( 27.03)
/* Iheya-Island */
#define LONB    (127.96)
#define LATB    ( 27.03)
/* Ie-Island */
#define LONB    (127.77)
#define LATB    ( 26.72)
/* Zanpa-Misaki */
#define LONB    (127.72)
#define LATB    ( 26.42)

spoo(satoh):cobra/gsimap/work> dual_area zdual_area
XC=-25.82  YC=-33.33  BL= 42.16  BL_AZ=217.76  Beta=30.0
RADAR SITE: 128.0658E 26.5825N
BIST SITE:  127.8067E 26.2817N

spoo(satoh):cobra/gsimap/work> dual_area zdual_yoron
XC= 37.27  YC= 49.58  BL= 62.03  BL_AZ= 36.93  Beta=30.0
RADAR SITE: 128.0658E 26.5825N
BIST SITE:  128.4400E 27.0300N

spoo(satoh):cobra/gsimap/work> dual_area zdual_iheya
XC=-10.54  YC= 49.58  BL= 50.69  BL_AZ=348.00  Beta=30.0
RADAR SITE: 128.0658E 26.5825N
BIST SITE:  127.9600E 27.0300N

spoo(satoh):cobra/gsimap/work> dual_area zdual_ie
XC=-29.47  YC= 15.23  BL= 33.18  BL_AZ=297.34  Beta=30.0
RADAR SITE: 128.0658E 26.5825N
BIST SITE:  127.7700E 26.7200N

spoo(satoh):cobra/gsimap/work> gcc -lm dual_area.c -o dual_area
spoo(satoh):cobra/gsimap/work> dual_area zdual_zanpa
XC=-34.45  YC=-18.00  BL= 38.87  BL_AZ=242.41  Beta=30.0
RADAR SITE: 128.0658E 26.5825N
BIST SITE:  127.7200E 26.4200N