Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1626 1594 (N22W56 L=255)  1506    275        2 (1525/1555-1725/1648) -28.1 W49-W65 N18-N27
      2 1719 1436 (N11W57 L=255)   717    141        0 (1664/1373-1759/1470) -58.0 W52-W58 N06-N14
      3 1178 1426 (N22W18 L=217)  2414    584        6 ( 931/1388-1479/1449) -15.9 W02-W37 N16-N27
      4 1587 1322 (N08W41 L=240)   244     31        0 (1565/1298-1609/1340) -56.3 W39-W42 N05-N08
      5 1270 1264 (N11W19 L=218)   382    146        1 (1206/1231-1324/1287) -26.6 W14-W21 N08-N12
      6 1589 1256 (N04W39 L=238)   349     47        2 (1561/1225-1615/1280) -76.0 W37-W41 N01-N05
      7  157 1207 (N29E60 L=138)   595    172        0 ( 126/1191- 190/1230) -23.2 E64-E56 N27-N30
      8  749 1136 (N13E14 L=185)   807    188        1 ( 679/1040- 815/1211) -63.4 E17-E11 N06-N18
      9 1842 1107 (S10W58 L=257)   855    190        2 (1795/1069-1895/1138)  -4.8 W52-W64 S11-S08
     10  218 1083 (N20E54 L=145)   444     93        3 ( 188/1046- 248/1107) -45.0 E57-E51 N17-N21
     11 1717 1059 (S10W45 L=244)   409    105        2 (1686/1007-1746/1103)  51.3 W41-W47 S12-S07
     12 1795 1024 (S14W51 L=250)  1373    266        7 (1748/ 967-1861/1071)  20.0 W46-W58 S16-S09
     13 1553  950 (S13W31 L=229)   327    129        1 (1515/ 889-1576/ 987)  80.5 W28-W32 S16-S10
     14 1835  921 (S21W54 L=252)   968    175        1 (1804/ 843-1868/ 981)  76.0 W50-W57 S24-S16
     15  301  904 (N08E50 L=149)   496    203        0 ( 240/ 890- 371/ 928)  -9.5 E55-E43 N06-N10
     16 1376  878 (S13W18 L=217)   215     54        1 (1354/ 858-1407/ 901)   0.0 W16-W19 S14-S11
     17  308  620 (S08E58 L=141)   736    158        1 ( 290/ 555- 323/ 682)  58.0 E61-E55 S12-S04
     18  258  618 (S08E64 L=135)   537    114        0 ( 247/ 571- 275/ 675)  63.4 E66-E61 S10-S04
     19 1220  509 (S33W02 L=200)   888    204        0 (1116/ 448-1283/ 590)  21.0 E06-W07 S35-S28
     20  645  495 (S22E36 L=163)   375    146        2 ( 601/ 457- 677/ 555)  32.0 E40-E32 S23-S18
     21  760  409 (S30E32 L=167)  1169    249        0 ( 698/ 329- 826/ 497)  29.4 E40-E24 S34-S25
     22  292  458 (S18E69 L=129)   937     81        0 ( 256/ 419- 323/ 491) -51.3 E72-E66 S20-S15
  

    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