Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1450 1625 (N27W49 L=359)   560    101        0 (1405/1606-1510/1645) -16.7 W44-W55 N25-N28
      2 1505 1513 (N19W46 L=356)   318     49        2 (1474/1491-1532/1531) -56.3 W43-W47 N17-N21
      3 1023 1381 (N27W10 L=321)  1300    226        5 ( 945/1313-1105/1437)  -9.5 W05-W17 N22-N29
      4  936 1344 (N27W04 L=314)   269     87        1 ( 893/1321- 975/1368) -45.0 W01-W05 N24-N28
      5  706 1314 (N31E12 L=299)   381    110        0 ( 650/1296- 757/1333) -15.9 E15-E08 N30-N32
      6  343 1299 (N40E43 L=267)   388     75        0 ( 300/1282- 382/1311) -21.8 E48-E38 N37-N41
      7 1745 1196 (S05W50 L=  0)   494    118        0 (1725/1135-1765/1251)  35.5 W46-W53 S07-S02
      8 1746 1061 (S12W46 L=356)  1642    279        2 (1690/ 964-1802/1188)  31.0 W38-W54 S15-S06
      9  628 1089 (N20E22 L=289)  1304    303        1 ( 476/1055- 769/1118) -16.7 E32-E12 N16-N22
     10 1861 1064 (S16W58 L=  8)  1123    139        4 (1814/1017-1918/1104) -41.6 W52-W66 S20-S12
     11  425  897 (N14E40 L=270)  2036    372        6 ( 379/ 743- 494/1049)  71.6 E43-E34 N04-N22
     12  905  990 (N08E07 L=303)   186     94        0 ( 858/ 960- 932/1029) -63.4 E09-E06 N05-N11
     13 1316  822 (S12W11 L=321)   766    236        1 (1241/ 735-1401/ 893)  17.1 W04-W17 S15-S09
     14 1479  705 (S24W18 L=329)  1180    456        0 (1394/ 490-1544/ 876)  48.0 W08-W26 S35-S15
     15  275  735 (N07E58 L=252)   743    103        1 ( 249/ 704- 314/ 782) -45.0 E60-E54 N04-N09
     16  212  697 (N06E67 L=243)   841    101        1 ( 198/ 645- 228/ 753)  36.9 E72-E63 N02-N08
     17 1315  729 (S17W09 L=319)   298    105        1 (1270/ 713-1368/ 749) -38.7 W06-W11 S19-S15
     18  422  526 (S08E53 L=257)   329     46        1 ( 405/ 496- 438/ 552)  71.6 E55-E51 S09-S06
     19  935  495 (S21E20 L=290)   602     91        1 ( 904/ 451- 969/ 531)  18.4 E23-E17 S23-S18
     20  609  402 (S19E45 L=265)   917    219        1 ( 559/ 322- 644/ 486)  40.2 E53-E39 S24-S13
     21  505  444 (S14E51 L=259)  1210    200        2 ( 448/ 390- 590/ 479)   0.0 E57-E43 S18-S11
     22  889  413 (S25E26 L=284)   247     66        0 ( 870/ 380- 905/ 439)  78.7 E27-E24 S27-S22
     23 1598  360 (S57W27 L=337)   708     76        2 (1567/ 336-1631/ 387) -28.6 W22-W33 S60-S53
     24  526  340 (S22E57 L=253)  1360    129        1 ( 477/ 288- 571/ 379)  76.0 E62-E53 S26-S18
     25  838  186 (S41E47 L=263)  1348    155        1 ( 797/ 127- 876/ 261)  24.6 E60-E36 S46-S35
  

    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