Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1  645 1596 (N48E25 L=280)   447     53        2 ( 615/1576- 673/1615)  11.3 E28-E22 N45-N49
      2 1753 1547 (N26W74 L= 19)   693     73        0 (1719/1520-1783/1570) -33.7 W70-W77 N23-N27
      3 1145 1477 (N32W15 L=320)  1234    330        3 ( 994/1422-1276/1520) -24.0 W04-W23 N27-N36
      4 1691 1462 (N22W58 L=  3)   456     98        0 (1643/1437-1732/1486) -29.7 W54-W61 N20-N24
      5  583 1286 (N26E27 L=278)   276    109        1 ( 534/1275- 641/1303)  -6.3 E31-E22 N25-N27
      6  691 1170 (N18E20 L=285)   292     88        0 ( 647/1141- 722/1204)  21.8 E22-E17 N16-N20
      7  372 1125 (N18E44 L=261)   710    109        3 ( 330/1087- 413/1175)  51.3 E48-E40 N15-N20
      8 1177 1080 (N07W10 L=315)   205     75        0 (1163/1047-1200/1115) -76.0 W09-W11 N05-N09
      9 1447 1028 (N01W26 L=331)   257    120        1 (1418/ 981-1492/1072) -68.2 W24-W28 S02-N03
     10 1904  966 (S11W69 L= 14)  2108    131        3 (1875/ 905-1931/1033) -82.9 W64-W75 S15-S07
     11 1617  878 (S11W37 L=342)   570    120        3 (1581/ 837-1646/ 941)  51.3 W34-W39 S13-S07
     12 1726  743 (S22W47 L=352)  2780    479        5 (1642/ 565-1824/ 929)  58.2 W41-W57 S33-S11
     13 1726  863 (S14W47 L=352)   501     83        1 (1704/ 825-1746/ 904) -78.7 W44-W48 S16-S11
     14 1368  846 (S09W19 L=324)   358    102        3 (1340/ 806-1394/ 886)  68.2 W17-W20 S11-S06
     15  168  779 (S03E72 L=233)  4132    193        9 ( 128/ 698- 208/ 879)  84.3 E87-E66 S08-N02
     16 1505  844 (S11W29 L=334)   313    117        1 (1465/ 796-1536/ 868) -59.0 W25-W30 S14-S09
     17 1811  807 (S19W56 L=  1)  1195    144        3 (1774/ 762-1864/ 866) -54.5 W51-W63 S22-S15
     18 1653  774 (S18W40 L=345)   342     77        1 (1622/ 742-1687/ 800)  21.8 W37-W43 S19-S17
     19 1342  752 (S15W17 L=322)   218     58        2 (1323/ 728-1367/ 775)  18.4 W15-W18 S16-S13
     20  821  691 (S13E17 L=288)   304     78        0 ( 783/ 670- 859/ 709) -36.9 E18-E14 S14-S11
     21  784  526 (S23E22 L=283)  1442    421        4 ( 717/ 438- 902/ 671) -90.0 E25-E14 S29-S13
     22  407  528 (S20E53 L=252)   765    139        5 ( 348/ 503- 472/ 559) -15.3 E59-E46 S22-S18
     23  589  438 (S28E40 L=265)   694    145        2 ( 566/ 371- 617/ 498)  42.0 E46-E35 S32-S23
     24 1577  383 (S47W42 L=347)  1418    144        3 (1516/ 346-1644/ 428)   0.0 W33-W49 S51-S44
     25 1030  312 (S43E10 L=295)   572     74        1 ( 998/ 286-1068/ 335)  15.9 E13-E06 S45-S40
  

    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