Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1  648 1758 (N33E47 L= 94)   825    129        1 ( 630/1696- 662/1822) -45.0 E52-E41 N28-N38
      2 1464 1689 (N47W19 L=160)   380     73        0 (1435/1656-1496/1706)  56.3 W16-W22 N43-N49
      3 1024 1678 (N34E15 L=126)   249     45        0 ( 995/1663-1056/1693)  36.9 E16-E12 N32-N35
      4  488 1620 (N21E51 L= 90)   453     92        1 ( 451/1589- 534/1649)  51.3 E53-E48 N18-N23
      5  776 1524 (N19E25 L=115)  1666    424        8 ( 663/1394- 901/1647) -30.6 E36-E14 N12-N25
      6  534 1512 (N14E42 L= 99)   788    242        3 ( 512/1408- 560/1624) -60.3 E46-E37 N07-N21
      7 1286 1485 (N26W07 L=148)   441     77        1 (1269/1448-1306/1535) -71.6 W05-W09 N23-N29
      8 1456 1440 (N27W19 L=160)   321    120        0 (1431/1380-1485/1490) -54.5 W17-W22 N23-N30
      9  908 1457 (N17E15 L=125)   249     54        0 ( 882/1436- 933/1474) -33.7 E16-E13 N15-N17
     10  492 1307 (N01E38 L=102)   243     37        2 ( 477/1280- 510/1332) -63.4 E39-E36 N00-N02
     11 1853 1059 (N14W57 L=197)  2269    322        5 (1808/ 942-1900/1186) -49.8 W51-W64 N07-N20
     12 1027 1072 (S04E01 L=140)   303     76        1 ( 992/1048-1067/1111) -56.3 E02-W01 S05-S01
     13  658 1031 (S13E22 L=118)   354    139        0 ( 611/ 970- 702/1056)  56.3 E24-E19 S16-S10
     14  742 1004 (S13E16 L=124)   292     52        2 ( 720/ 972- 759/1036) -45.0 E17-E14 S14-S10
     15  651  912 (S20E21 L=120)   305     78        1 ( 622/ 880- 678/ 951) -45.0 E22-E18 S21-S17
     16  444  854 (S26E36 L=105)   694    156        3 ( 375/ 801- 495/ 904) -21.8 E41-E31 S28-S24
     17 1125  830 (S16W10 L=150)   255     67        0 (1083/ 812-1158/ 848)  36.9 W07-W11 S17-S14
     18  398  725 (S35E40 L=100)   458    109        0 ( 365/ 682- 444/ 758) -26.6 E43-E35 S37-S33
     19 1688  554 (S18W59 L=199)  1716    408        3 (1572/ 465-1748/ 672)  78.7 W53-W66 S26-S11
     20 1183  581 (S29W20 L=161)  1118    329        1 (1029/ 523-1319/ 616)   5.2 W09-W31 S32-S27
     21  589  532 (S45E23 L=117)  1229    194        4 ( 503/ 506- 689/ 562)  19.4 E31-E14 S47-S41
     22 1260  439 (S36W32 L=172)   697    126        1 (1214/ 393-1318/ 475)  69.4 W28-W34 S40-S32
     23  867  345 (S53W06 L=146)   324     54        1 ( 847/ 323- 888/ 375)  78.7 W04-W08 S55-S50
     24  670  261 (S67E17 L=124)   750    130        1 ( 610/ 234- 736/ 288)   0.0 E26-E05 S68-S65
  

    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