Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1562 1662 (N24W59 L=199)   721     95        2 (1515/1638-1606/1680) -33.7 W55-W63 N22-N26
      2 1512 1630 (N24W52 L=192)   590     86        1 (1469/1599-1555/1655) -51.3 W49-W55 N21-N26
      3 1509 1539 (N20W46 L=185)  1072    245        2 (1392/1507-1621/1587) -14.7 W36-W55 N16-N22
      4 1339 1406 (N17W29 L=168)   736    192        1 (1312/1319-1359/1498)  55.0 W26-W33 N11-N21
      5 1814 1147 (S10W54 L=194)  5167    496       11 (1703/ 975-1902/1378) -78.7 W47-W63 S20-N05
      6  806 1335 (N27E05 L=135)   396     65        1 ( 776/1312- 842/1365)  21.8 E07-E02 N25-N28
      7 1868 1232 (S07W64 L=203)  3126    295        6 (1819/1109-1936/1359) -86.2 W59-W73 S15-N00
      8 1673 1129 (S07W42 L=181)   780    215        1 (1642/1040-1709/1216)  41.6 W37-W46 S11-S02
      9  899 1185 (N16E03 L=136)   269     46        0 ( 873/1153- 923/1213)  45.0 E04-E01 N14-N17
     10  374 1079 (N22E40 L=100)  1019    229        2 ( 343/1002- 444/1181) -67.4 E42-E35 N16-N28
     11  599 1140 (N21E22 L=117)   261     77        2 ( 576/1098- 622/1174) -68.2 E23-E21 N17-N22
     12  223 1045 (N23E55 L= 84)  2462    419        3 (  96/ 858- 317/1166) -35.5 E77-E47 N11-N32
     13 1264 1000 (S03W13 L=152)   976    223        2 (1185/ 900-1316/1080) -84.8 W09-W15 S09-N02
     14 1700 1009 (S14W41 L=181)   379     76        1 (1674/ 968-1725/1040) -76.0 W38-W43 S16-S12
     15 1789  936 (S21W48 L=187)  2182    202        2 (1729/ 809-1846/1034) -76.0 W42-W53 S30-S14
     16 1667  897 (S20W36 L=176)   267     66        0 (1639/ 876-1686/ 926)  26.6 W33-W37 S20-S18
     17 1088  671 (S17E05 L=134)  1585    465        1 ( 940/ 561-1259/ 833)  16.3 E16-W08 S19-S12
     18  318  733 (N04E53 L= 87)   597     82        1 ( 290/ 694- 352/ 771) -59.0 E54-E50 N01-N06
     19 1423  674 (S26W15 L=154)  1430    362        3 (1263/ 601-1566/ 765)   2.5 W03-W26 S27-S23
     20  531  642 (S06E39 L=100)   298     63        2 ( 510/ 609- 557/ 678)  63.4 E40-E37 S07-S03
     21  639  633 (S08E32 L=107)   289     66        1 ( 623/ 601- 664/ 675)  63.4 E33-E31 S10-S06
     22  436  618 (S05E47 L= 93)   420     75        1 ( 411/ 592- 472/ 652) -68.2 E48-E44 S07-S02
     23  317  572 (S06E60 L= 79)  1116    128        2 ( 287/ 508- 361/ 626)  54.5 E63-E55 S09-S02
     24  654  489 (S17E37 L=102)   315     72        0 ( 611/ 473- 689/ 507) -11.3 E39-E34 S18-S15
  

    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