Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1  895 1748 (N46E09 L= 75)   301     32        0 ( 877/1723- 914/1769)  63.4 E10-E07 N43-N47
      2  921 1675 (N39E06 L= 78)   240     61        0 ( 904/1656- 947/1702) -63.4 E07-E04 N37-N41
      3 1551 1557 (N30W40 L=124)  2367    418        3 (1377/1476-1724/1657) -22.9 W28-W54 N24-N37
      4  608 1556 (N32E29 L= 56)   516     93        2 ( 557/1526- 653/1579) -14.0 E33-E25 N29-N33
      5 1301 1472 (N24W19 L=103)   273    111        1 (1244/1453-1344/1485)   0.0 W15-W22 N22-N24
      6 1511 1338 (N15W32 L=116)   574    166        1 (1483/1245-1532/1408) -90.0 W30-W33 N09-N19
      7 1718 1304 (N13W48 L=132)   826    241        1 (1677/1209-1761/1397) -71.6 W44-W51 N07-N19
      8 1888 1280 (N12W67 L=151)   526     67        2 (1871/1250-1904/1313)  53.1 W64-W69 N10-N14
      9 1814 1238 (N09W56 L=140)   699     66        1 (1792/1195-1831/1278) -90.0 W54-W58 N06-N11
     10 1868 1232 (N09W62 L=147)   543     68        2 (1845/1202-1896/1262) -31.0 W60-W65 N07-N10
     11  293  787 (S14E52 L= 32)  3063    624        9 ( 200/ 513- 342/1061)  79.7 E62-E48 S31-N02
     12 1040  922 (S09W01 L= 85)   345    114        1 (1009/ 875-1070/ 959) -63.4 E01-W02 S11-S06
     13  159  805 (S12E67 L= 17)  3861    316        9 (  88/ 695- 246/ 945) -66.4 E77-E58 S19-S03
     14  780  769 (S18E16 L= 68)   940    349        3 ( 699/ 656- 827/ 908) -86.4 E20-E12 S24-S08
     15 1017  857 (S13E01 L= 83)   290    109        1 ( 985/ 814-1058/ 902) -68.2 E02-W01 S15-S10
     16  448  873 (S10E37 L= 47)   217     47        0 ( 423/ 854- 470/ 894)  14.0 E39-E35 S11-S08
     17 1818  851 (S14W57 L=141)   346     95        1 (1785/ 811-1852/ 885)  38.7 W53-W59 S16-S11
     18  232  834 (S11E57 L= 27)   342     80        0 ( 215/ 791- 247/ 871) -90.0 E58-E55 S13-S08
     19  946  805 (S16E05 L= 79)   219     96        0 ( 931/ 769- 966/ 844) -90.0 E06-E03 S17-S13
     20  466  770 (S16E37 L= 47)   370     90        2 ( 448/ 728- 488/ 816)  78.7 E38-E35 S18-S13
     21 1843  735 (S21W63 L=147)   546     81        3 (1816/ 705-1883/ 763)   7.1 W59-W68 S22-S18
     22  594  676 (S23E29 L= 55)   819    222        2 ( 512/ 643- 700/ 745) -26.6 E34-E22 S25-S18
     23 1697  597 (S30W51 L=135)   343     84        0 (1682/ 572-1727/ 633) -63.4 W48-W54 S31-S27
     24 1459  570 (S31W30 L=114)   694    216        1 (1370/ 527-1554/ 625)  15.9 W23-W37 S34-S27
     25 1040  419 (S42E01 L= 84)  1820    478        3 ( 831/ 313-1222/ 531)  22.1 E19-W13 S49-S33
  

    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