Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1413 1717 (N48W45 L=186)   556     64        1 (1374/1696-1450/1736) -14.0 W40-W49 N46-N49
      2  719 1423 (N31E20 L=121)   635    164        1 ( 676/1358- 750/1489) -60.9 E23-E17 N26-N35
      3  261 1353 (N26E62 L= 80)  1424    200        4 ( 221/1274- 296/1430) -78.7 E65-E57 N21-N31
      4 1089 1319 (N22W06 L=147)   925    292        2 (1001/1245-1166/1361)   5.7 W00-W10 N17-N25
      5  279 1292 (N23E57 L= 84)   400     44        2 ( 255/1272- 307/1309)   9.5 E59-E53 N21-N23
      6  650 1293 (N22E24 L=117)   213     59        0 ( 616/1274- 681/1309)  11.3 E26-E21 N21-N23
      7 1402 1107 (N07W24 L=165)   253     62        2 (1371/1082-1433/1130) -14.0 W22-W26 N05-N08
      8 1606 1009 (S00W38 L=179)   253     86        1 (1575/ 982-1647/1040) -21.8 W35-W41 S01-N02
      9 1889  899 (S10W68 L=209)  4434    260       11 (1837/ 800-1953/ 997)  45.0 W61-W85 S15-S04
     10 1822  919 (S08W58 L=199)   415     45        0 (1807/ 890-1838/ 951) -76.0 W56-W60 S09-S05
     11 1714  894 (S08W47 L=188)   397     77        0 (1695/ 858-1732/ 937) -68.2 W45-W48 S10-S05
     12 1326  861 (S07W18 L=159)   418     92        1 (1303/ 815-1357/ 899) -90.0 W16-W20 S09-S04
     13 1380  818 (S10W22 L=163)   391     94        2 (1339/ 783-1418/ 856)  45.0 W18-W24 S12-S07
     14 1479  799 (S12W28 L=170)   415     91        1 (1438/ 763-1512/ 833)  45.0 W25-W30 S14-S09
     15  735  688 (S15E20 L=121)   697    262        1 ( 684/ 568- 796/ 795)  56.3 E25-E15 S23-S08
     16  349  750 (S11E49 L= 92)   459     73        3 ( 322/ 721- 385/ 777)   9.5 E51-E45 S12-S09
     17 1298  736 (S15W16 L=157)   386    155        0 (1221/ 714-1364/ 754) -18.4 W11-W20 S16-S13
     18 1666  643 (S24W46 L=187)  1644    297        1 (1561/ 526-1748/ 713)  38.2 W38-W53 S31-S19
     19 1328  643 (S21W18 L=160)   267     71        1 (1299/ 623-1364/ 665)  26.6 W16-W20 S22-S19
     20 1412  626 (S23W24 L=166)   492     95        1 (1383/ 582-1442/ 657) -63.4 W22-W26 S26-S20
     21  454  557 (S24E45 L= 96)   786    108        2 ( 431/ 511- 491/ 598)  49.4 E48-E41 S27-S20
     22  601  510 (S27E34 L=108)   382    123        1 ( 575/ 453- 623/ 564)  82.9 E34-E32 S31-S23
     23  659  533 (S26E28 L=113)   267     72        1 ( 634/ 498- 682/ 563) -90.0 E29-E26 S28-S23
     24 1585  463 (S37W44 L=185)   603    137        1 (1519/ 443-1644/ 505)  15.3 W37-W49 S38-S33
     25  391  443 (S33E59 L= 82)  1337    170        1 ( 310/ 427- 472/ 459)   4.4 E74-E48 S33-S31
     26  736  280 (S47E32 L=109)   506     60        1 ( 706/ 260- 763/ 302)  26.6 E36-E28 S48-S44
  

    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