Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1386 1796 (N44W61 L=243)   606     63        1 (1353/1773-1420/1817)   0.0 W54-W67 N43-N45
      2  996 1668 (N48W16 L=198)  2511    503        8 ( 835/1565-1230/1782)   5.2 W00-W44 N44-N50
      3  794 1444 (N37E06 L=176)   302     78        1 ( 752/1429- 837/1459) -26.6 E09-E03 N35-N38
      4 1007 1399 (N29W07 L=189)   548    138        0 ( 957/1364-1073/1439)  12.5 W03-W12 N27-N30
      5 1293 1235 (N13W20 L=203)   942    274        1 (1206/1151-1375/1339) -70.3 W17-W23 N07-N21
      6  217 1091 (N24E59 L=123)  2629    502        4 ( 173/ 885- 278/1319)  79.1 E65-E53 N11-N37
      7  803 1065 (N13E12 L=170)   240     90        1 ( 782/1031- 824/1098) -90.0 E13-E11 N11-N15
      8 1108  890 (S02W02 L=184)   374    105        0 (1086/ 839-1136/ 942)  45.0 W00-W04 S05-N00
      9 1869  853 (S24W59 L=242)  1370    152        3 (1839/ 787-1905/ 922) -83.7 W55-W66 S28-S18
     10  179  778 (N05E69 L=113)  3333    212        6 ( 131/ 690- 227/ 874) -90.0 E77-E61 N00-N10
     11  612  818 (N02E29 L=153)   226    104        0 ( 597/ 763- 622/ 867)  59.0 E30-E27 N00-N05
     12 1363  740 (S17W15 L=197)   481    167        0 (1301/ 675-1404/ 802)  33.7 W09-W18 S19-S13
     13  284  710 (N00E58 L=124)   961    116        2 ( 248/ 677- 335/ 758) -26.6 E61-E53 S02-N03
     14  496  698 (S03E40 L=142)   350     96        0 ( 471/ 653- 520/ 736) -80.5 E41-E38 S06-N00
     15  919  485 (S24E18 L=164)  1271    330        2 ( 859/ 352- 974/ 648)  51.7 E25-E10 S32-S13
     16 1543  584 (S32W26 L=208)   438    107        0 (1502/ 552-1584/ 620)  15.9 W22-W29 S32-S30
     17  572  460 (S19E43 L=139)  1759    309        4 ( 493/ 389- 660/ 535) -71.6 E48-E37 S25-S13
     18  393  490 (S15E57 L=125)   956     85        3 ( 358/ 447- 420/ 530) -90.0 E60-E54 S18-S12
     19  373  421 (S20E66 L=117)  4766    232        6 ( 290/ 343- 454/ 520) -85.9 E73-E58 S26-S12
     20 1658  449 (S47W40 L=222)   431     56        0 (1635/ 436-1687/ 469) -24.0 W36-W45 S49-S44
     21  580  362 (S26E48 L=134)   424     71        1 ( 560/ 327- 607/ 388)  39.8 E51-E44 S29-S24
     22 1043  306 (S40E17 L=165)   499     63        0 (1008/ 287-1079/ 325) -31.0 E19-E14 S41-S37
     23 1229  223 (S54E06 L=176)  1798    253        4 (1116/ 175-1347/ 270)   4.6 E19-W06 S56-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