Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1236 1784 (N51W43 L=173)  1207    169        2 (1168/1740-1321/1812)   0.0 W33-W55 N48-N53
      2 1473 1650 (N35W51 L=181)   571     80        3 (1433/1627-1520/1674) -38.7 W47-W55 N32-N37
      3 1376 1444 (N25W32 L=162)   243     68        1 (1342/1431-1404/1460)  11.3 W29-W34 N23-N25
      4 1774 1363 (N11W62 L=192)  1590    232        6 (1684/1300-1826/1436)  10.8 W50-W72 N08-N14
      5 1544 1254 (N10W37 L=167)   814    200        0 (1452/1219-1617/1293) -18.4 W31-W43 N08-N14
      6  220 1164 (N25E60 L= 69)   806    154        3 ( 194/1105- 247/1245)  83.7 E63-E57 N21-N30
      7 1905 1065 (S10W68 L=198)  4548    304       10 (1844/ 978-1952/1158)  22.8 W59-W85 S14-S05
      8  499 1048 (N15E33 L= 96)   539    200        0 ( 461/ 979- 564/1127) -59.0 E36-E29 N10-N20
      9 1533 1091 (N01W33 L=163)   234     69        1 (1499/1075-1569/1105)   0.0 W30-W35 N00-N02
     10 1732 1033 (S07W47 L=177)   512    101        2 (1682/1004-1761/1063)   0.0 W42-W50 S08-S04
     11 1723  912 (S14W45 L=175)   550    130        1 (1701/ 848-1748/ 969)  60.3 W42-W47 S17-S10
     12 1607  924 (S10W35 L=165)   804    145        5 (1549/ 885-1659/ 963)   0.0 W30-W39 S13-S08
     13 1622  784 (S19W35 L=165)   340     72        2 (1589/ 757-1652/ 815)   0.0 W32-W37 S20-S17
     14  989  720 (S11E07 L=123)   563    118        1 ( 965/ 665-1028/ 784)  54.5 E09-E03 S14-S07
     15  626  705 (S07E30 L=100)   337    123        1 ( 569/ 665- 677/ 749) -45.0 E33-E27 S09-S03
     16  591  664 (S09E34 L= 96)  1366    339        6 ( 460/ 591- 725/ 745) -38.7 E41-E25 S15-S02
     17  908  703 (S11E12 L=117)   282     49        1 ( 887/ 670- 934/ 730) -90.0 E13-E10 S12-S08
     18  284  511 (S17E71 L= 59)   739     90        0 ( 265/ 465- 300/ 559)  48.8 E76-E67 S20-S12
     19  775  477 (S24E27 L=103)   443    114        1 ( 753/ 423- 800/ 521)  49.4 E29-E23 S27-S20
     20  511  388 (S27E52 L= 77)  1157    101        2 ( 468/ 345- 555/ 438) -90.0 E56-E47 S30-S22
     21  921  395 (S32E20 L=110)   888    181        3 ( 850/ 364-1017/ 430)   4.1 E25-E11 S33-S29
     22 1333  346 (S45W10 L=140)   339     44        1 (1314/ 319-1353/ 367)  63.4 W08-W12 S47-S43
     23 1228  261 (S51E01 L=129)   389     36        0 (1208/ 238-1247/ 282)  63.4 E02-W01 S53-S48
     24 1170  237 (S52E07 L=123)   393     59        1 (1147/ 223-1203/ 258)  -9.5 E09-E03 S53-S48
  

    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