Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1682 1633 (N24W63 L=251)  2139    360        2 (1588/1581-1776/1695) -37.6 W57-W74 N18-N29
      2 1497 1483 (N19W40 L=228)   583    159        0 (1429/1456-1557/1512)  -5.7 W34-W45 N17-N20
      3 1246 1475 (N24W23 L=211)  1682    343        2 (1093/1428-1419/1506) -24.2 W13-W33 N17-N27
      4 1814 1470 (N11W69 L=257)   558     48        1 (1792/1451-1835/1490) -36.9 W66-W72 N09-N12
      5 1722 1303 (N04W51 L=239)   495     85        0 (1689/1270-1758/1335) -51.3 W49-W53 N01-N06
      6 1197 1293 (N14W15 L=203)   250     81        0 (1165/1273-1248/1324) -36.9 W13-W18 N12-N16
      7  272 1204 (N26E48 L=139)  1556    378        2 ( 177/1097- 368/1304) -45.0 E58-E40 N18-N34
      8  923 1215 (N15E02 L=185)   583    135        2 ( 860/1159- 982/1263) -54.5 E05-W00 N10-N18
      9 1879 1033 (S15W60 L=247)  3524    472       12 (1829/ 920-1936/1174) -90.0 W55-W67 S21-S05
     10 1924 1127 (S10W69 L=256)   966    128        4 (1902/1090-1949/1167)  68.2 W65-W73 S12-S07
     11 1817 1018 (S14W53 L=241)  1093    169        2 (1783/ 955-1843/1105)  63.4 W50-W56 S18-S09
     12  241 1018 (N15E53 L=134)   359    106        0 ( 215/ 988- 277/1056) -53.1 E55-E49 N13-N17
     13 1685  971 (S14W41 L=228)   624    162        1 (1643/ 908-1711/1027)  66.8 W38-W43 S17-S10
     14  200  946 (N12E59 L=129)   569    122        1 ( 184/ 881- 219/1015)  82.9 E59-E56 N07-N15
     15 1546  946 (S13W30 L=217)   231     50        2 (1525/ 922-1568/ 975)  33.7 W28-W32 S14-S11
     16 1919  906 (S23W63 L=251)   898    161        1 (1885/ 867-1945/ 965)  32.0 W58-W67 S25-S20
     17  418  777 (S01E43 L=144)   700    150        1 ( 397/ 702- 441/ 850)  66.8 E44-E40 S05-N02
     18 1349  694 (S24W13 L=201)   257    105        0 (1292/ 674-1396/ 708) -23.2 W09-W16 S25-S22
     19  259  662 (S06E61 L=126)   611     96        1 ( 224/ 619- 291/ 707) -63.4 E64-E58 S08-S02
     20  216  623 (S07E69 L=118)   995    184        1 ( 191/ 574- 248/ 659)  21.8 E75-E63 S10-S05
     21 1350  557 (S33W12 L=199)  1244    313        0 (1183/ 484-1442/ 656)  11.9 W00-W19 S36-S28
     22  778  523 (S23E26 L=161)   402    119        0 ( 729/ 485- 826/ 563)  18.4 E30-E21 S24-S21
     23  874  441 (S30E23 L=164)  1321    378        4 ( 777/ 327- 994/ 557)  25.6 E34-E11 S36-S24
     24  396  519 (S16E54 L=133)   351     68        1 ( 370/ 498- 423/ 537) -33.7 E56-E51 S17-S14
     25  356  477 (S18E60 L=127)  1197    131        2 ( 306/ 426- 393/ 525) -66.8 E63-E57 S21-S14
  

    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