Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1  723 1741 (N33E39 L=125)   426     58        2 ( 695/1720- 762/1761)  21.8 E41-E35 N31-N34
      2  451 1651 (N23E56 L=108)  2212    287        5 ( 398/1573- 537/1753) -25.7 E71-E44 N18-N31
      3  947 1592 (N26E16 L=148)   522     98        1 ( 925/1543- 978/1638) -63.4 E17-E14 N23-N29
      4  301 1578 (N17E69 L= 95)   590     91        1 ( 278/1528- 328/1605) -71.6 E73-E66 N13-N19
      5 1127 1557 (N28E04 L=160)   215     75        0 (1106/1514-1145/1595) -51.3 E06-E01 N24-N30
      6  495 1563 (N17E47 L=117)   523     60        2 ( 470/1538- 532/1594) -26.6 E49-E43 N15-N19
      7  412 1537 (N15E53 L=111)   804    115        4 ( 388/1482- 442/1589) -66.8 E56-E49 N11-N18
      8 1816 1255 (N24W52 L=216)  2257    304        5 (1780/1124-1860/1348) -77.0 W48-W58 N16-N29
      9  274 1272 (S03E56 L=108)  1132    147        1 ( 251/1193- 310/1337) -49.4 E60-E52 S07-N00
     10 1567 1227 (N16W30 L=194)   685    198        1 (1542/1126-1606/1307)  80.5 W28-W32 N09-N21
     11 1641 1113 (N11W37 L=201)   437     93        0 (1627/1055-1655/1163) -71.6 W35-W38 N07-N13
     12  476 1082 (S12E35 L=129)   349     75        3 ( 451/1050- 506/1117) -76.0 E37-E33 S13-S09
     13  343 1093 (S13E46 L=118)   306     69        0 ( 315/1064- 374/1113)  31.0 E48-E43 S14-S11
     14  741  939 (S16E15 L=149)   266     83        0 ( 700/ 909- 776/ 961)  45.0 E17-E13 S18-S14
     15  209  897 (S26E59 L=105)   406     75        0 ( 175/ 866- 240/ 923) -20.6 E63-E55 S27-S24
     16  188  729 (S36E68 L= 96)   581     57        0 ( 164/ 707- 224/ 743)  -5.2 E72-E61 S37-S35
     17  858  687 (S29E04 L=160)  1214    411        1 ( 651/ 639-1017/ 723)   4.6 E18-W07 S32-S27
     18 1490  637 (S19W38 L=202)   432    144        1 (1441/ 592-1516/ 699)  81.9 W36-W40 S22-S15
     19 1711  651 (S13W55 L=219)   390     47        1 (1684/ 631-1734/ 677)  56.3 W53-W58 S14-S11
     20 1728  572 (S17W62 L=226)  1512    264        0 (1622/ 502-1810/ 661)  54.5 W55-W66 S23-S09
     21  366  588 (S45E47 L=117)  1335    231        2 ( 270/ 552- 457/ 644)  11.3 E60-E35 S47-S39
     22  988  555 (S35W08 L=172)   241     63        0 ( 963/ 525-1016/ 577)  63.4 W06-W09 S37-S33
     23 1563  469 (S27W53 L=217)   397     68        0 (1530/ 454-1598/ 488)   0.0 W48-W56 S27-S25
     24  648  424 (S52E18 L=146)   353     51        1 ( 617/ 407- 677/ 450)  29.7 E21-E14 S54-S49
     25  509  283 (S69E52 L=112)   751    121        0 ( 462/ 269- 575/ 306)   0.0 E67-E35 S69-S66
  

    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