Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1304 1801 (N47W39 L=359)   693     83        1 (1272/1763-1336/1851)  30.3 W34-W47 N43-N50
      2 1461 1822 (N46W59 L= 19)   691     76        1 (1421/1803-1489/1841)   7.1 W51-W67 N44-N47
      3 1415 1558 (N27W34 L=354)   664    159        0 (1378/1491-1473/1604)  36.9 W30-W39 N22-N29
      4  939 1579 (N35W01 L=321)   683    142        0 ( 868/1556-1014/1599) -12.5 E03-W06 N32-N36
      5  322 1412 (N31E48 L=272)   793    156        3 ( 281/1346- 366/1477) -39.8 E55-E42 N26-N36
      6  548 1355 (N24E28 L=293)   251     53        1 ( 517/1330- 569/1380)  18.4 E29-E25 N22-N25
      7 1541 1328 (N12W36 L=356)   498     77        2 (1503/1294-1583/1360) -31.0 W33-W38 N09-N13
      8  424 1201 (N16E37 L=283)   448    101        1 ( 390/1158- 464/1248) -50.2 E39-E33 N13-N19
      9 1775 1043 (S08W50 L= 11)   531     62        2 (1737/1012-1808/1072)  -9.5 W46-W53 S09-S05
     10  350 1008 (N06E44 L=277)  2144    378        3 ( 203/ 951- 519/1057)  -6.6 E57-E31 N02-N09
     11 1741  937 (S13W47 L=  7)   863    198        2 (1686/ 875-1791/1010)  45.0 W42-W51 S16-S09
     12  968  976 (S03E04 L=316)   186     48        0 ( 944/ 957- 996/ 993) -33.7 E05-E02 S04-S01
     13 1815  890 (S17W54 L= 14)   862    151        2 (1788/ 821-1848/ 954)  54.5 W51-W57 S20-S13
     14  768  852 (S08E17 L=303)   202     71        0 ( 750/ 821- 784/ 889)  63.4 E18-E15 S09-S05
     15 1351  667 (S26W17 L=337)  4145   1025        4 ( 902/ 553-1728/ 828)   6.8 E13-W46 S29-S19
     16  318  661 (S14E54 L=266)   630    163        1 ( 303/ 582- 344/ 742)  52.1 E58-E51 S18-S09
     17  242  699 (S11E61 L=260)   426     77        1 ( 221/ 659- 261/ 740) -90.0 E61-E58 S13-S08
     18  433  682 (S14E43 L=277)   532    151        1 ( 382/ 649- 507/ 707) -11.3 E47-E37 S15-S12
     19  283  635 (S15E59 L=261)   384     41        2 ( 264/ 606- 301/ 658)  18.4 E62-E55 S16-S13
     20  755  579 (S24E23 L=297)   471    112        1 ( 729/ 538- 781/ 633)  63.4 E24-E20 S27-S21
     21 1733  528 (S40W55 L= 15)   653     74        1 (1693/ 503-1766/ 561)   6.3 W49-W58 S41-S37
     22 1539  461 (S42W34 L=354)   448     87        1 (1496/ 443-1594/ 481)  -5.7 W29-W40 S43-S40
     23  363  404 (S31E66 L=254)  1700    143        2 ( 316/ 371- 429/ 440) -11.3 E81-E59 S33-S28
     24  588  278 (S43E53 L=268)   404     37        0 ( 567/ 257- 614/ 296)  14.0 E56-E48 S44-S41
  

    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