Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1545 1614 (N33W43 L=167)   995    125        2 (1494/1558-1593/1650) -56.3 W39-W46 N29-N35
      2  732 1557 (N32E18 L=105)   901    251        0 ( 655/1457- 796/1632) -49.8 E25-E13 N24-N37
      3 1012 1540 (N29W01 L=125)   836    270        2 ( 906/1484-1151/1588) -18.4 E05-W10 N25-N33
      4  886 1338 (N17E07 L=116)   300    144        0 ( 843/1278- 915/1382) -60.3 E09-E05 N12-N19
      5 1270 1330 (N15W16 L=140)   230     58        1 (1241/1316-1303/1345)  14.0 W14-W18 N14-N15
      6  868 1220 (N10E09 L=115)   326    119        0 ( 851/1162- 886/1280)  81.9 E09-E07 N06-N13
      7 1820 1106 (N01W55 L=179)  1611    353        3 (1708/1013-1906/1156)   5.4 W44-W65 S04-N03
      8 1779  994 (S06W51 L=175)   960    141        3 (1727/ 940-1832/1051) -41.2 W46-W56 S09-S02
      9  413  960 (S04E39 L= 84)   401    102        1 ( 387/ 915- 435/1001) -59.0 E40-E37 S06-S01
     10 1746  880 (S13W49 L=172)   784    106        3 (1714/ 831-1775/ 928) -56.3 W45-W51 S15-S09
     11  468  857 (S10E36 L= 88)  1267    275        5 ( 380/ 811- 593/ 924) -21.8 E42-E27 S12-S05
     12 1657  848 (S15W41 L=165)  1158    259        1 (1579/ 752-1704/ 910) -48.4 W35-W45 S20-S10
     13  160  868 (S07E65 L= 59)   664     73        1 ( 127/ 843- 185/ 888)   6.3 E70-E61 S08-S05
     14 1536  802 (S17W32 L=156)   530    138        2 (1486/ 742-1575/ 859)  54.5 W29-W35 S20-S13
     15  246  789 (S13E57 L= 67)   502     98        1 ( 212/ 747- 271/ 828) -51.3 E59-E54 S15-S10
     16  145  774 (S13E71 L= 53)   750     64        2 ( 120/ 737- 164/ 804) -90.0 E74-E67 S14-S10
     17 1788  739 (S21W55 L=179)   387     53        1 (1765/ 712-1809/ 764)  45.0 W52-W57 S23-S19
     18  265  633 (S22E60 L= 63)  1331    194        3 ( 197/ 588- 314/ 708)  13.4 E73-E52 S25-S17
     19 1024  638 (S26E02 L=122)   371    118        1 ( 987/ 595-1050/ 698)  56.3 E04-W00 S28-S22
     20 1687  637 (S28W48 L=172)   326     66        0 (1658/ 612-1716/ 668)  45.0 W45-W50 S29-S25
     21  642  423 (S39E33 L= 90)   854    145        2 ( 594/ 361- 689/ 491)  36.9 E40-E27 S42-S33
     22  567  348 (S44E45 L= 79)   395     45        1 ( 535/ 327- 595/ 366) -21.8 E47-E42 S45-S42
     23  827  247 (S54E25 L= 98)   395     70        1 ( 798/ 224- 861/ 271) -45.0 E28-E22 S56-S51
     24  948  206 (S59E15 L=109)   339     62        2 ( 935/ 181- 969/ 239)  56.3 E17-E12 S61-S55
     25 1019  206 (S60E07 L=117)   669     79        1 ( 978/ 181-1067/ 227)   5.2 E11-W00 S62-S57
  

    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