Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1164 1816 (N52W18 L=279)   355     33        0 (1148/1791-1179/1839)  68.2 W15-W19 N49-N54
      2 1221 1761 (N47W21 L=283)   900    125        2 (1169/1728-1287/1798) -24.0 W15-W26 N43-N50
      3 1567 1667 (N38W50 L=311)  1703    282        0 (1429/1639-1685/1705)  -3.8 W36-W69 N36-N41
      4 1523 1492 (N25W37 L=299)  5998    985        6 (1142/1212-1898/1622) -24.5 W10-W68 N07-N35
      5 1517 1359 (N17W34 L=295)   542    155        0 (1494/1294-1550/1414) -81.9 W31-W36 N12-N20
      6  790 1352 (N18E14 L=248)   675    162        2 ( 721/1303- 851/1407) -41.2 E18-E09 N14-N21
      7 1727 1252 (N10W49 L=311)   347     62        0 (1713/1216-1740/1290)  59.0 W47-W50 N07-N12
      8 1638 1257 (N10W41 L=303)   248     41        0 (1615/1237-1663/1283)  26.6 W39-W43 N08-N11
      9 1822 1212 (N08W58 L=320)   833     74        2 (1791/1169-1850/1249) -59.0 W54-W60 N04-N09
     10  948 1191 (N08E04 L=258)   265     79        0 ( 909/1162- 984/1224) -45.0 E06-E01 N05-N09
     11  378 1201 (N11E43 L=219)   280     68        0 ( 344/1181- 412/1219)  18.4 E45-E39 N09-N11
     12 1878  877 (S13W65 L=326)  2874    280        2 (1813/ 758-1939/1007)  59.0 W57-W73 S19-S04
     13 1586  795 (S18W37 L=299)   871    269        0 (1544/ 687-1651/ 918)  70.3 W34-W41 S24-S10
     14  391  766 (S16E44 L=218)   859    208        4 ( 298/ 730- 481/ 788)  -3.6 E52-E36 S17-S13
     15  382  601 (S26E50 L=212)   344     88        0 ( 356/ 572- 420/ 638)  26.6 E53-E45 S27-S23
     16 1744  522 (S35W63 L=324)  2254    286        2 (1640/ 471-1834/ 630)  27.9 W49-W72 S39-S27
     17 1252  590 (S30W14 L=276)   249     86        0 (1224/ 554-1288/ 623)  53.1 W12-W16 S32-S28
     18 1459  463 (S40W33 L=295)   720    112        3 (1410/ 424-1510/ 506) -11.3 W28-W38 S42-S36
     19 1134  449 (S40W06 L=268)   802    204        2 (1047/ 417-1226/ 487)  13.0 W00-W13 S42-S37
     20  368  388 (S40E69 L=192)   750     62        1 ( 338/ 362- 390/ 418)   5.7 E81-E61 S41-S38
  

    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