Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1502 1539 (N19W46 L=239)   324     81        1 (1458/1526-1549/1553) -33.7 W42-W48 N17-N21
      2 1606 1466 (N13W49 L=243)   670    138        0 (1544/1433-1665/1507)   0.0 W43-W56 N11-N13
      3  986 1374 (N25W07 L=201)   443    163        1 ( 922/1349-1063/1422) -48.8 W04-W11 N21-N29
      4 1385 1253 (N08W26 L=220)   807    184        4 (1345/1193-1458/1319)   6.3 W22-W31 N04-N11
      5 1880 1195 (S10W64 L=257)  1171    124        2 (1853/1140-1912/1260) -90.0 W61-W67 S13-S05
      6  813 1201 (N19E07 L=186)   219     60        1 ( 793/1175- 845/1227)  33.7 E08-E05 N18-N20
      7  684 1164 (N21E16 L=177)   335    114        1 ( 623/1134- 731/1197)  -8.1 E20-E13 N19-N22
      8  382 1061 (N22E40 L=154)   588    183        1 ( 339/ 994- 433/1129) -60.9 E42-E36 N17-N26
      9  571 1076 (N18E25 L=168)   352    118        1 ( 555/1012- 602/1121)  51.3 E27-E22 N15-N20
     10 1531 1075 (S06W30 L=223)   333     97        0 (1487/1059-1586/1100) -39.8 W27-W33 S08-S03
     11 1605  743 (S27W29 L=222)  3387    670        6 (1414/ 480-1745/1031)  34.1 W10-W44 S39-S14
     12 1016  963 (N01E02 L=191)   637    122        2 ( 973/ 895-1058/1020) -71.6 E03-W00 S02-N04
     13 1241  920 (S06W09 L=203)   812    283        1 (1158/ 873-1328/ 990) -41.2 W05-W14 S09-N00
     14 1251  944 (S05W10 L=204)   214     41        1 (1232/ 916-1273/ 971)  33.7 W08-W12 S06-S03
     15  266  865 (N13E54 L=140)   326     57        1 ( 234/ 849- 295/ 896) -18.4 E57-E51 N11-N14
     16  120  835 (N14E75 L=119)  1232     91        3 (  89/ 798- 142/ 880) -35.5 E81-E70 N11-N16
     17  902  760 (S07E13 L=180)   389    122        0 ( 879/ 709- 934/ 829)  74.1 E14-E11 S10-S03
     18 1194  767 (S14W03 L=196)   577    153        1 (1156/ 710-1252/ 800)  26.6 W00-W06 S16-S12
     19 1271  747 (S17W07 L=200)   255     49        0 (1254/ 717-1285/ 780)  56.3 W05-W08 S18-S14
     20  454  642 (S03E45 L=149)  1774    260        2 ( 377/ 529- 524/ 739) -90.0 E47-E40 S10-N03
     21 1078  656 (S17E06 L=187)   258     83        0 (1060/ 625-1094/ 699)  45.0 E07-E04 S19-S14
     22  637  551 (S12E36 L=158)   363     53        1 ( 609/ 522- 670/ 576) -90.0 E37-E33 S14-S10
     23 1742  532 (S48W44 L=237)   417     55        1 (1726/ 498-1755/ 558)  78.7 W40-W46 S50-S45
     24  885  532 (S20E21 L=172)   222     69        0 ( 857/ 513- 905/ 557) -45.0 E22-E19 S20-S17
     25  444  443 (S15E56 L=138)  1945    282        4 ( 363/ 354- 527/ 542)  14.9 E73-E43 S19-S10
     26  709  380 (S25E39 L=154)  2623    521        2 ( 518/ 258- 929/ 462)   2.7 E66-E22 S28-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