Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1  988 1831 (N61W30 L=199)   519     90        1 ( 945/1798-1030/1860)   0.0 W23-W38 N59-N62
      2 1288 1799 (N48W52 L=222)   463     68        2 (1263/1763-1312/1826)  14.0 W46-W58 N45-N49
      3 1012 1683 (N48W19 L=188)  1229    187        4 ( 922/1628-1092/1721)  -3.4 W09-W26 N44-N50
      4  405 1589 (N56E49 L=120)   702     94        1 ( 370/1555- 449/1607)  -4.1 E57-E42 N53-N57
      5  943 1501 (N37W06 L=175)   225     68        0 ( 906/1487- 982/1514) -31.0 W03-W08 N35-N38
      6 1183 1454 (N29W20 L=190)   493    132        1 (1150/1395-1214/1500)  50.2 W17-W24 N24-N31
      7 1749 1395 (N11W60 L=230)   513     44        2 (1720/1368-1773/1415) -63.4 W57-W63 N08-N12
      8  389 1343 (N38E42 L=128)  1097    156        2 ( 335/1278- 443/1404)  24.4 E47-E36 N33-N41
      9 1514 1301 (N12W37 L=206)  1403    293        1 (1422/1211-1632/1386) -60.3 W32-W42 N04-N18
     10  566 1355 (N36E25 L=145)   229     63        0 ( 542/1329- 603/1373)  11.3 E27-E21 N34-N36
     11  310 1058 (N21E49 L=121)  1310    251        2 ( 275/ 939- 353/1173) -71.6 E52-E45 N13-N28
     12 1299  948 (S03W14 L=184)   454    192        0 (1277/ 859-1329/1030)  53.1 W11-W17 S07-N01
     13  804  882 (N03E16 L=154)   201     66        1 ( 793/ 842- 818/ 919)  78.7 E16-E14 N00-N05
     14 1546  827 (S16W28 L=198)   477    109        1 (1502/ 776-1581/ 877)  33.7 W24-W31 S17-S13
     15  262  763 (N04E59 L=111)  1478    205        2 ( 236/ 679- 291/ 876)  65.6 E62-E54 S01-N10
     16  305  794 (N05E53 L=116)   436     23        0 ( 283/ 767- 324/ 820) -90.0 E55-E51 N03-N06
     17 1637  735 (S24W34 L=204)   352     43        0 (1612/ 705-1661/ 760)  45.0 W32-W36 S25-S22
     18 1099  542 (S23E06 L=164)  1162    280        1 (1036/ 428-1161/ 664)  49.4 E12-W00 S30-S16
     19  691  517 (S17E32 L=138)   433     80        1 ( 651/ 494- 718/ 548) -26.6 E34-E29 S18-S15
     20  481  442 (S19E52 L=118)  3456    298        8 ( 384/ 347- 570/ 536) -74.1 E60-E43 S26-S11
     21  692  341 (S30E41 L=129)  2028    394        2 ( 591/ 224- 819/ 504)  26.6 E61-E25 S38-S19
     22 1179  351 (S39E06 L=164)   454     89        1 (1138/ 335-1227/ 375)  -8.1 E08-E01 S41-S36
     23 1313  248 (S54W02 L=172)  1545    231        2 (1195/ 211-1407/ 296)  -5.4 E09-W12 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