Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1163 1553 (N38W15 L=298)   852    243        0 (1053/1486-1252/1609)  18.4 W05-W23 N33-N41
      2  390 1571 (N43E57 L=226)   428     78        0 ( 351/1557- 431/1588)  12.5 E62-E51 N42-N44
      3  896 1526 (N38E06 L=277)   226     29        0 ( 880/1506- 913/1546)  56.3 E07-E04 N36-N39
      4 1719 1455 (N25W59 L=343)   391     56        1 (1686/1442-1754/1467) -15.9 W56-W63 N23-N25
      5  868 1255 (N20E09 L=275)   278     85        0 ( 825/1229- 907/1281) -31.0 E11-E06 N18-N21
      6 1375 1196 (N13W23 L=307)   509    176        1 (1294/1165-1445/1222)   0.0 W17-W28 N11-N14
      7 1472 1128 (N08W29 L=312)   286     83        0 (1451/1086-1490/1167) -78.7 W27-W30 N05-N10
      8  342 1067 (N10E47 L=237)   687    195        1 ( 284/ 992- 396/1138) -42.0 E52-E42 N05-N14
      9 1099  955 (N00W04 L=287)  1164    412        3 (1042/ 765-1137/1126) -90.0 W01-W05 S11-N11
     10  745 1064 (N09E17 L=266)   221     52        1 ( 730/1030- 765/1091)  63.4 E18-E15 N06-N10
     11 1835 1014 (S03W59 L=342)   790    152        1 (1778/ 970-1870/1075)  20.0 W52-W63 S05-N00
     12 1841  864 (S13W60 L=343)   613    102        1 (1820/ 817-1876/ 897)  33.7 W57-W64 S15-S10
     13  218  739 (S10E64 L=219)  2021    304        2 ( 189/ 617- 241/ 870)  62.1 E74-E59 S18-S01
     14  592  648 (S16E31 L=252)   306     51        2 ( 566/ 628- 618/ 671)  26.6 E33-E29 S17-S14
     15  555  602 (S19E35 L=248)   360     72        1 ( 529/ 566- 588/ 636) -53.1 E36-E32 S21-S16
     16  892  521 (S26E13 L=271)   454    151        0 ( 851/ 459- 946/ 567)  41.2 E16-E08 S30-S23
     17 1481  498 (S33W30 L=314)   482     60        1 (1454/ 470-1513/ 526)  56.3 W28-W33 S34-S30
     18  498  478 (S28E44 L=239)   311     61        0 ( 484/ 443- 511/ 509)  68.2 E45-E42 S30-S25
     19 1433  357 (S44W30 L=313)  3088    307        7 (1309/ 294-1551/ 426)  15.3 W18-W42 S49-S39
     20 1215  358 (S41W10 L=293)   382     31        0 (1195/ 330-1234/ 382)  76.0 W08-W11 S43-S39
     21 1066  309 (S44E03 L=280)   294     31        1 (1049/ 288-1082/ 332)  63.4 E04-E01 S46-S42
     22  827  253 (S48E26 L=257)  3289    395        3 ( 660/ 201- 999/ 301)   9.2 E51-E08 S53-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