Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1356 1801 (N46W44 L= 19)   361     47        1 (1333/1782-1382/1816)   8.1 W41-W48 N44-N47
      2 1226 1550 (N29W20 L=355)   438    121        0 (1175/1517-1285/1571)   7.1 W16-W24 N27-N30
      3  773 1524 (N33E11 L=324)   356     89        2 ( 722/1506- 817/1541) -23.2 E14-E07 N31-N34
      4 1783 1359 (N11W58 L= 33)  1186    234        2 (1719/1272-1829/1472) -85.2 W55-W61 N05-N17
      5  348 1317 (N25E44 L=291)   304     57        0 ( 316/1303- 377/1338)  11.3 E46-E41 N24-N26
      6 1317 1287 (N11W21 L=356)   366     73        0 (1284/1259-1349/1317) -53.1 W18-W22 N09-N13
      7  786 1272 (N17E12 L=323)   481    114        1 ( 737/1227- 825/1313)  45.0 E14-E08 N14-N18
      8 1827 1114 (S04W56 L= 31)  2556    337        6 (1718/ 977-1894/1236) -47.0 W48-W63 S12-N04
      9 1701 1008 (S09W44 L= 19)   261     36        0 (1679/ 992-1726/1025)  14.0 W41-W45 S09-S07
     10  196  980 (N06E59 L=276)  2096    254        4 ( 103/ 937- 311/1023)  -2.3 E72-E47 N02-N09
     11 1566  963 (S10W33 L=  8)   286     59        1 (1539/ 937-1600/ 992) -36.9 W31-W35 S11-S08
     12 1300  923 (S10W15 L=350)   235     95        0 (1258/ 890-1329/ 945) -36.9 W12-W16 S11-S07
     13 1871  834 (S21W62 L= 37)  3225    230        9 (1815/ 739-1916/ 945)  76.0 W55-W68 S26-S14
     14 1644  896 (S15W39 L= 14)   255     70        1 (1624/ 863-1671/ 919)  45.0 W36-W40 S16-S13
     15 1173  642 (S25W05 L=340)  3666    991        4 ( 724/ 518-1557/ 831)   9.0 E26-W31 S30-S17
     16  542  559 (S23E39 L=296)  1841    365       10 ( 484/ 463- 591/ 722)  50.9 E46-E32 S28-S12
     17  276  653 (S14E59 L=276)   459     81        1 ( 247/ 625- 319/ 681)   6.3 E62-E53 S15-S12
     18 1836  607 (S36W66 L= 41)  1695    110        2 (1785/ 568-1883/ 644)  11.3 W58-W74 S38-S33
     19 1613  514 (S40W40 L= 15)   503     70        2 (1578/ 489-1647/ 549)   8.1 W36-W43 S41-S37
     20 1328  423 (S42W15 L=350)   624    171        1 (1255/ 394-1401/ 456)  -8.7 W08-W21 S44-S40
     21  570  343 (S37E48 L=287)  1173    215        2 ( 508/ 259- 616/ 432)  22.2 E65-E38 S42-S31
     22  775  215 (S51E41 L=294)  1228    153        2 ( 722/ 185- 844/ 253)   3.4 E49-E32 S53-S47
  

    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