Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1  549 1587 (N48E36 L=280)   511     77        2 ( 510/1568- 596/1606) -11.3 E40-E30 N46-N49
      2 1678 1526 (N27W61 L= 17)   696    121        0 (1619/1500-1730/1554) -29.1 W55-W66 N24-N29
      3 1012 1448 (N32W04 L=321)   851    251        4 ( 896/1392-1123/1488) -29.7 E03-W11 N27-N36
      4  254 1257 (N26E59 L=258)   927    149        2 ( 181/1223- 313/1289)  10.0 E68-E51 N23-N27
      5  539 1209 (N21E31 L=285)   220     36        1 ( 522/1180- 554/1234) -76.0 E31-E29 N19-N23
      6  663  994 (N07E23 L=293)   313    159        1 ( 627/ 924- 697/1055) -71.6 E24-E21 N02-N11
      7 1330  954 (S02W18 L=334)   358    161        3 (1249/ 920-1371/1000) -29.7 W13-W20 S04-N01
      8 1834  919 (S12W58 L= 14)   895    110        2 (1808/ 874-1861/ 976) -60.3 W55-W62 S15-S08
      9 1354  873 (S07W19 L=335)   210     52        2 (1332/ 850-1379/ 894) -56.3 W17-W20 S08-S05
     10 1706  861 (S13W45 L=  1)   757    199        2 (1640/ 802-1765/ 891)  15.3 W39-W50 S16-S11
     11 1220  799 (S10W10 L=326)   698    260        6 (1153/ 745-1337/ 848)  14.0 W05-W17 S13-S08
     12  722  819 (S04E21 L=295)   199      3        0 ( 703/ 801- 743/ 838) -18.4 E22-E19 S04-S02
     13 1127  787 (S10W04 L=320)   209     62        1 (1107/ 760-1140/ 820)  63.4 W02-W04 S11-S07
     14 1748  754 (S21W50 L=  6)   398     51        2 (1724/ 736-1775/ 780)   0.0 W47-W52 S22-S19
     15 1519  737 (S18W29 L=345)   284     97        1 (1492/ 700-1554/ 776)  45.0 W27-W32 S20-S15
     16 1562  632 (S26W33 L=349)  1154    224        0 (1509/ 541-1616/ 717)  55.0 W29-W37 S32-S20
     17  599  578 (S18E34 L=282)  1324    327        3 ( 564/ 439- 673/ 684)  62.1 E38-E26 S28-S11
     18  352  514 (S21E60 L=257)   689    128        3 ( 309/ 478- 408/ 550) -24.0 E63-E54 S24-S18
     19  723  473 (S26E28 L=288)   299     92        0 ( 704/ 430- 751/ 508)  45.0 E30-E24 S29-S24
     20 1477  443 (S39W28 L=344)   359     60        2 (1444/ 422-1508/ 462) -23.2 W24-W31 S41-S36
     21 1460  355 (S47W29 L=345)  1191    119        4 (1407/ 318-1517/ 392)  10.3 W23-W34 S50-S44
     22  913  312 (S41E20 L=297)   689     97        1 ( 872/ 274- 969/ 360)  26.6 E23-E13 S44-S37
  

    OPENR, u, binfile, /COMP, /GET_LUN
    head = FLTARR(6) ;[xsize,ysize,radius,hh,mm,ss]
    READU, u, head
    data = INTARR(FIX(head[0]),FIX(head[1]))
    READU, u, data
    FREE_LUN, u
    

• each filament has the value of Fil_ID
• all values are in pixel

  c = WHERE(data EQ Fil_ID, area)
  f = '(2(A,I6))'
  PRINT, FORM=f, "Area of Fil_ID", Fil_ID," =", area 

  data = ROTATE(data,7)
  Solar_y = 2048-Solar_y