Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1496 1536 (N20W45 L=239)   334     80        1 (1452/1523-1541/1551) -38.7 W42-W48 N17-N21
      2 1591 1457 (N13W48 L=242)   632    128        0 (1533/1428-1647/1495)   0.0 W42-W54 N11-N13
      3 1828 1462 (N05W72 L=266)   576     49        1 (1803/1442-1852/1478) -23.2 W68-W76 N03-N06
      4  979 1371 (N25W07 L=201)   430    180        0 ( 918/1346-1056/1419) -49.4 W03-W11 N21-N28
      5 1374 1246 (N08W25 L=219)   490    118        1 (1338/1214-1440/1276)   0.0 W22-W30 N05-N08
      6 1877 1190 (S10W63 L=257)  1156    125        1 (1850/1137-1909/1259) -81.9 W60-W67 S13-S06
      7  805 1192 (N19E08 L=186)   205     29        1 ( 787/1172- 823/1216)  45.0 E09-E06 N17-N20
      8  670 1156 (N20E17 L=177)   300    110        0 ( 620/1131- 722/1178)  -8.1 E20-E13 N19-N21
      9  365 1078 (N23E41 L=153)   410    111        1 ( 323/1035- 404/1123) -54.5 E43-E37 N19-N26
     10  564 1076 (N18E26 L=168)   351    103        1 ( 547/1020- 589/1122)  51.3 E27-E23 N15-N20
     11 1525 1070 (S06W30 L=223)   345     92        0 (1476/1052-1577/1094) -39.8 W26-W32 S08-S03
     12 1599  755 (S26W28 L=222)  3385    699        7 (1412/ 481-1739/1027)  36.0 W10-W44 S39-S14
     13 1016  918 (S01E03 L=191)   892    280        4 ( 965/ 780-1055/1018)  72.9 E05-E01 S09-N04
     14 1234  916 (S07W09 L=203)   829    262        3 (1150/ 869-1320/ 975) -41.2 W04-W14 S09-S01
     15  279  861 (N13E52 L=141)   652    108        3 ( 232/ 839- 330/ 894) -26.6 E57-E47 N10-N14
     16  122  828 (N13E74 L=119)   861     66        1 ( 108/ 793- 142/ 864)  76.0 E77-E70 N11-N15
     17  893  759 (S07E14 L=180)   393    124        0 ( 872/ 707- 922/ 823)  74.1 E14-E11 S10-S03
     18 1187  764 (S14W02 L=196)   573    143        1 (1149/ 708-1244/ 797)  26.6 W00-W06 S16-S12
     19 1264  745 (S17W06 L=200)   207     67        1 (1247/ 715-1278/ 777)  76.0 W04-W07 S18-S14
     20  451  638 (S03E45 L=149)  1809    229        5 ( 377/ 540- 526/ 739) -85.2 E48-E40 S09-N03
     21 1072  646 (S18E07 L=187)   276     67        2 (1052/ 610-1095/ 677)  78.7 E08-E05 S20-S15
     22 1741  529 (S48W44 L=237)   515     42        1 (1723/ 499-1753/ 560) -68.2 W40-W47 S50-S45
     23  877  531 (S19E22 L=172)   260     65        0 ( 848/ 510- 900/ 557) -45.0 E23-E20 S20-S17
     24  442  444 (S15E56 L=138)  1994    252        2 ( 357/ 364- 519/ 541)  15.4 E73-E44 S18-S10
     25  696  375 (S25E41 L=153)  2715    529        1 ( 508/ 252- 913/ 460)   3.7 E69-E23 S29-S22
  

    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