Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1625 1708 (N25W71 L=215)   671     81        0 (1591/1690-1662/1724) -29.7 W67-W76 N22-N26
      2 1643 1655 (N21W67 L=210)   485     62        2 (1626/1628-1658/1685)  38.7 W62-W70 N19-N23
      3 1528 1644 (N25W54 L=198)   677     81        0 (1480/1625-1572/1660) -33.7 W51-W58 N22-N26
      4 1457 1515 (N20W41 L=184)  1111    255        3 (1349/1483-1582/1548) -20.6 W33-W50 N16-N23
      5 1289 1367 (N16W24 L=168)   834    212        3 (1262/1270-1315/1474)  57.5 W21-W29 N10-N21
      6 1723 1286 (N00W51 L=194)  1212    196        1 (1658/1195-1762/1362) -90.0 W48-W53 S05-N05
      7  754 1310 (N27E09 L=135)   449    109        2 ( 724/1262- 798/1347)  31.0 E11-E05 N24-N28
      8 1832 1294 (S03W62 L=205)  1000    121        4 (1791/1242-1877/1339) -50.2 W57-W68 S06-N00
      9 1811 1082 (S14W53 L=196)  7355    778       18 (1712/ 789-1917/1281)  62.6 W41-W69 S29-S02
     10  848 1171 (N17E06 L=137)   195     27        0 ( 825/1157- 869/1189)   0.0 E07-E04 N15-N17
     11  334 1059 (N22E44 L=100)  1108    223        2 ( 298/ 984- 395/1167) -71.6 E46-E39 N16-N28
     12  188 1058 (N25E59 L= 84)  2202    332        7 (  84/ 930- 277/1161) -28.9 E81-E50 N15-N32
     13  626 1080 (N17E22 L=122)   252     63        0 ( 606/1053- 644/1113)  56.3 E23-E19 N15-N18
     14 1637  961 (S15W35 L=178)  1262    317       11 (1577/ 839-1704/1080)  58.4 W29-W41 S21-S08
     15 1111  783 (S11E01 L=142)  3401    820        7 ( 859/ 530-1262/1061)  31.5 E22-W11 S19-N03
     16  617  986 (N12E24 L=119)   390     89        3 ( 572/ 959- 644/1024)  11.3 E27-E22 N10-N13
     17  380  638 (S03E51 L= 92)  1862    420        6 ( 259/ 535- 521/ 805) -56.3 E57-E43 S11-N08
     18 1375  651 (S26W11 L=155)  1412    374        1 (1213/ 575-1518/ 741)   5.2 W00-W22 S27-S23
     19 1876  705 (S40W61 L=205)  1072     93        0 (1851/ 674-1915/ 729)  -3.8 W56-W72 S42-S37
     20  486  633 (S05E43 L=101)   273     67        1 ( 464/ 609- 516/ 662) -63.4 E44-E41 S07-S03
     21  591  609 (S09E36 L=107)   351     69        1 ( 571/ 575- 616/ 642)  76.0 E37-E35 S10-S06
     22  282  562 (S05E65 L= 79)  1427    123        3 ( 230/ 507- 328/ 605) -66.8 E69-E59 S09-S02
     23 1091  489 (S28E11 L=133)   247     71        1 (1058/ 464-1127/ 518)   0.0 E12-E07 S29-S27
     24  836  421 (S26E29 L=115)   255    120        0 ( 783/ 390- 884/ 438) -51.3 E31-E26 S29-S23
     25 1170  129 (S62E31 L=112)   533     50        2 (1142/ 112-1197/ 153)  58.0 E34-E27 S66-S58
  

    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