Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1463 1739 (N45W41 L= 74)   378     39        0 (1442/1715-1486/1761)  26.6 W36-W44 N43-N47
      2 1537 1656 (N38W43 L= 76)   516     38        1 (1505/1634-1563/1684)  29.7 W38-W46 N36-N40
      3 1307 1592 (N33W21 L= 54)   390     96        1 (1260/1574-1356/1607)  -8.1 W17-W24 N31-N33
      4 1804 1453 (N25W63 L= 96)  2081    164        1 (1757/1390-1855/1525) -71.6 W58-W69 N20-N29
      5  229 1419 (N23E64 L=329)   676     76        2 ( 199/1385- 256/1458)  78.7 E68-E60 N20-N25
      6  486 1270 (N12E35 L=358)   672    129        1 ( 466/1214- 516/1338) -69.4 E36-E32 N08-N16
      7  235 1272 (N13E57 L=336)   563    101        3 ( 212/1221- 265/1307)  53.1 E60-E54 N10-N15
      8  310 1217 (N09E49 L=344)   377     97        0 ( 290/1175- 330/1267)  71.6 E50-E47 N06-N12
      9  383 1222 (N09E42 L=351)   254     24        0 ( 366/1201- 396/1245) -63.4 E43-E41 N08-N10
     10  694 1081 (N00E20 L= 13)   923    270        0 ( 574/1025- 808/1119)   7.6 E27-E12 S02-N02
     11 1034  934 (S09W01 L= 34)  1131    433        1 ( 985/ 717-1066/1098) -90.0 E02-W02 S21-N01
     12 1783  976 (S05W52 L= 85)   434     38        2 (1759/ 951-1804/1007)  56.3 W50-W54 S06-S03
     13  527  795 (S17E33 L=  0)  2558    668        6 ( 328/ 610- 761/ 956)  25.9 E53-E16 S27-S07
     14 1737  822 (S14W50 L= 83)  2472    288        4 (1675/ 697-1797/ 926)  63.4 W44-W56 S22-S08
     15 1904  836 (S13W69 L=102)   983     93        2 (1881/ 800-1933/ 881) -24.0 W65-W76 S14-S10
     16 1176  841 (S14W09 L= 42)   255     55        1 (1153/ 814-1197/ 870)  56.3 W07-W10 S15-S12
     17 1565  764 (S18W36 L= 69)   772    239        0 (1512/ 671-1595/ 864)  80.5 W33-W38 S24-S12
     18 1827  844 (S13W59 L= 92)   647     93        0 (1778/ 828-1869/ 863)  11.3 W53-W63 S13-S11
     19  600  743 (S20E28 L=  5)   378    153        0 ( 560/ 719- 670/ 790) -29.7 E30-E23 S21-S16
     20 1426  665 (S25W27 L= 60)   400    104        1 (1380/ 651-1490/ 689)  -6.3 W23-W32 S25-S23
     21  917  597 (S30E07 L= 26)   615    148        0 ( 851/ 560- 980/ 643)  26.6 E12-E02 S32-S26
     22  503  427 (S41E46 L=347)  4307    346        7 ( 333/ 375- 668/ 489)   5.5 E79-E27 S43-S36
     23 1532  363 (S46W49 L= 82)  3213    349        8 (1406/ 290-1684/ 450)  30.6 W38-W63 S52-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