Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1583 1679 (N25W66 L= 62)   534     92        0 (1533/1669-1628/1691) -21.8 W61-W72 N22-N26
      2 1521 1607 (N24W54 L= 50)   615    131        2 (1479/1566-1572/1638)   0.0 W47-W59 N22-N25
      3 1384 1564 (N26W41 L= 37)   457     76        3 (1353/1524-1409/1603)  68.2 W38-W43 N23-N28
      4 1347 1417 (N19W31 L= 27)   249     72        1 (1328/1388-1379/1443)   9.5 W28-W34 N18-N20
      5 1130 1395 (N24W17 L= 13)   254     76        0 (1088/1379-1172/1412) -38.7 W14-W19 N22-N26
      6  985 1294 (N23W05 L=  1)   679    258        0 ( 870/1234-1064/1328) -41.6 E01-W08 N17-N25
      7  272 1202 (N35E51 L=304)   824    138        1 ( 221/1159- 336/1247) -21.8 E59-E44 N31-N38
      8  707 1192 (N24E14 L=342)   268    117        0 ( 685/1138- 736/1241) -81.9 E15-E13 N20-N27
      9 1907 1070 (S18W66 L= 62)  1528    135        1 (1846/1031-1955/1103) -25.3 W57-W78 S22-S13
     10 1630 1024 (S10W36 L= 32)   592    139        0 (1591/ 966-1682/1081)  24.0 W32-W41 S13-S08
     11 1852 1004 (S19W56 L= 52)   794    136        4 (1816/ 949-1896/1051)  16.7 W51-W63 S22-S17
     12  493  827 (N08E37 L=319)   710    168        1 ( 443/ 771- 551/ 895) -60.9 E39-E34 N04-N13
     13 1239  762 (S14W05 L=  1)   819    274        0 (1186/ 656-1293/ 889)  45.0 W00-W11 S18-S07
     14 1561  806 (S21W26 L= 22)   273     53        1 (1543/ 777-1579/ 838) -90.0 W25-W27 S23-S18
     15 1259  516 (S30E00 L=356)   490     78        2 (1229/ 482-1292/ 550)  26.6 E02-W02 S31-S27
     16  985  520 (S21E17 L=339)   230     85        0 ( 956/ 503-1025/ 549) -59.0 E17-E14 S23-S18
     17  824  429 (S23E30 L=326)   289    106        0 ( 787/ 401- 847/ 470)  26.6 E33-E27 S24-S20
     18  593  270 (S29E59 L=297)   728     93        0 ( 563/ 232- 619/ 318)  21.8 E68-E53 S31-S25
     19  797  229 (S37E46 L=310)   543     89        1 ( 773/ 190- 827/ 271)  60.9 E49-E43 S41-S32
     20  973  223 (S43E34 L=322)   337     42        0 ( 956/ 204- 989/ 250)  26.6 E36-E30 S44-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