Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1443 1771 (N41W63 L=259)   454     32        1 (1425/1744-1462/1793)  20.6 W58-W67 N39-N42
      2 1302 1752 (N45W47 L=243)   391     60        0 (1284/1724-1330/1771)   7.1 W42-W50 N43-N46
      3 1103 1710 (N48W27 L=223)   394     38        1 (1074/1682-1124/1737)  53.1 W24-W30 N45-N49
      4  818 1598 (N47E01 L=194)  2009    412        4 ( 688/1516-1016/1679)   5.5 E13-W18 N43-N49
      5 1666 1439 (N16W54 L=250)   438    115        0 (1615/1395-1704/1477) -60.3 W51-W56 N12-N19
      6  626 1376 (N36E20 L=175)   340     88        0 ( 581/1345- 667/1398) -33.7 E24-E17 N32-N37
      7  236 1339 (N39E62 L=134)   517     66        1 ( 210/1307- 261/1362)  14.0 E66-E58 N36-N40
      8 1052 1204 (N17W05 L=201)  1330    339        3 ( 959/1079-1142/1330) -75.3 W01-W08 N07-N26
      9  240 1001 (N18E57 L=139)   467    102        0 ( 220/ 956- 263/1059) -60.3 E58-E54 N14-N21
     10 1714  936 (S13W43 L=239)   272     59        0 (1696/ 907-1730/ 967)  45.0 W41-W44 S14-S11
     11 1755  785 (S24W46 L=241)  1313    229        1 (1699/ 730-1827/ 849) -51.3 W40-W54 S28-S18
     12  887  789 (S04E13 L=183)   408    115        0 ( 869/ 736- 904/ 845)  63.4 E13-E10 S07-S01
     13  433  815 (N05E42 L=154)   240     51        1 ( 409/ 793- 456/ 839) -56.3 E43-E40 N02-N06
     14  157  738 (N02E76 L=120)  2568    194        3 ( 121/ 661- 203/ 821) -45.0 E82-E70 S03-N07
     15 1158  669 (S17W01 L=197)   442    167        0 (1106/ 602-1187/ 738)  49.4 E03-W03 S19-S12
     16  321  670 (S03E56 L=140)   328     47        1 ( 302/ 646- 346/ 688) -71.6 E57-E52 S04-S01
     17 1361  510 (S32W11 L=207)   247     71        0 (1328/ 486-1389/ 541)  21.8 W08-W13 S33-S30
     18  731  435 (S24E32 L=163)  1225    236        0 ( 696/ 330- 770/ 536)  49.4 E38-E26 S31-S17
     19  431  439 (S19E57 L=139)  3232    257       10 ( 361/ 330- 506/ 528)  68.2 E64-E51 S27-S12
     20 1688  481 (S45W44 L=239)   971    137        0 (1625/ 439-1739/ 514)   8.1 W36-W51 S46-S43
     21 1177  414 (S34E03 L=192)   376    100        0 (1153/ 356-1203/ 459)  54.5 E06-W00 S38-S31
     22 1556  404 (S47W29 L=225)   418     57        1 (1533/ 387-1586/ 427) -39.8 W26-W32 S49-S44
     23  883  271 (S39E30 L=165)   322     45        0 ( 856/ 255- 907/ 286) -33.7 E32-E27 S40-S37
     24 1152  205 (S53E14 L=182)  1106    153        0 (1087/ 175-1233/ 235)  -4.1 E20-E05 S55-S50
  

    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