Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1373 1763 (N46W32 L= 76)   436     42        1 (1352/1738-1399/1786)  33.7 W28-W34 N44-N48
      2 1435 1677 (N39W34 L= 77)   366     49        0 (1411/1656-1457/1698)  21.8 W30-W35 N37-N40
      3 1167 1599 (N33W10 L= 54)   525    163        0 (1083/1578-1238/1617)  -5.2 W04-W15 N31-N34
      4  339 1276 (N13E46 L=357)   869    151        1 ( 319/1204- 363/1351) -83.7 E48-E43 N08-N17
      5 1834 1259 (N12W59 L=102)  1085    219        5 (1789/1201-1894/1298)  -4.8 W53-W67 N08-N14
      6  186 1224 (N11E61 L=342)  2666    206        3 ( 137/1113- 247/1290) -47.7 E69-E54 N04-N15
      7 1654 1135 (N04W41 L= 84)   316     82        0 (1636/1098-1673/1174)  59.0 W39-W42 N01-N06
      8  535 1082 (N01E30 L= 13)   659    169        1 ( 467/1043- 617/1109)   0.0 E34-E24 S01-N02
      9  858  943 (S08E10 L= 34)  1148    382        2 ( 818/ 739- 886/1089) -87.1 E12-E08 S20-N00
     10  429  808 (S15E39 L=  4)  1132    358        2 ( 383/ 699- 503/ 955) -75.1 E42-E35 S21-S06
     11 1818  906 (S09W56 L= 99)   304     53        0 (1796/ 878-1839/ 936)  63.4 W53-W57 S11-S07
     12  520  894 (S10E32 L= 12)   704    205        2 ( 455/ 862- 617/ 922)  10.3 E36-E25 S11-S08
     13 1631  903 (S10W39 L= 83)   469     90        1 (1578/ 872-1675/ 921)   0.0 W35-W42 S11-S08
     14 1847  851 (S12W60 L=104)   550    102        2 (1819/ 809-1877/ 882) -76.0 W56-W64 S14-S10
     15 1565  799 (S16W35 L= 79)   280     77        0 (1547/ 761-1585/ 836)  63.4 W34-W36 S18-S14
     16 1304  685 (S24W18 L= 62)   834    326        0 (1171/ 657-1445/ 759)  12.5 W09-W27 S25-S19
     17  302  647 (S24E55 L=348)  1064    148        1 ( 245/ 593- 340/ 721)  28.1 E64-E49 S27-S19
     18  834  691 (S23E13 L= 31)   207     55        0 ( 807/ 672- 855/ 714) -33.7 E14-E11 S24-S21
     19  784  599 (S29E17 L= 27)   370     83        0 ( 747/ 574- 824/ 628)  26.6 E19-E13 S30-S27
     20 1747  504 (S34W64 L=107)   738     90        1 (1710/ 479-1789/ 530)  -4.1 W57-W71 S35-S32
     21  450  412 (S41E52 L=351)  2477    232        2 ( 331/ 370- 560/ 465)   6.0 E76-E38 S43-S37
     22 1461  387 (S44W38 L= 82)  2081    319        2 (1321/ 321-1602/ 457)  21.4 W26-W49 S49-S38
  

    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