Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1219 1547 (N29W20 L=356)   470    114        0 (1167/1516-1277/1567)   6.3 W15-W24 N27-N29
      2  762 1522 (N33E12 L=324)   440    135        1 ( 691/1499- 820/1539) -24.0 E16-E07 N30-N34
      3 1770 1372 (N11W57 L= 33)  1307    224        4 (1715/1270-1821/1475) -85.6 W54-W60 N05-N18
      4  312 1412 (N32E49 L=286)   319     92        0 ( 290/1370- 342/1447)  53.1 E51-E46 N29-N33
      5  343 1315 (N25E44 L=291)   309     73        0 ( 309/1301- 373/1338)   9.5 E47-E41 N23-N26
      6 1307 1284 (N11W20 L=356)   374     77        2 (1272/1254-1340/1313) -63.4 W18-W22 N09-N13
      7  746 1254 (N16E14 L=321)   575    191        1 ( 657/1201- 819/1296)  15.3 E20-E09 N13-N18
      8 1820 1114 (S04W56 L= 31)  2457    310        3 (1713/1002-1887/1232) -51.8 W47-W62 S11-N03
      9  190  980 (N07E59 L=276)  2091    240        5 (  99/ 936- 304/1021)  -4.4 E73-E47 N02-N09
     10 1561  960 (S10W33 L=  8)   303     80        1 (1533/ 934-1601/ 989) -31.0 W30-W35 S11-S08
     11 1865  829 (S22W61 L= 37)  3483    219        8 (1811/ 737-1911/ 951)  76.0 W55-W68 S27-S14
     12  684  929 (S02E21 L=314)   284     97        0 ( 636/ 906- 719/ 950) -21.8 E24-E19 S03-N00
     13 1290  921 (S10W15 L=350)   227     96        0 (1250/ 888-1322/ 944) -36.9 W12-W16 S11-S07
     14 1634  889 (S15W38 L= 13)   311     48        1 (1614/ 858-1652/ 917)  45.0 W36-W39 S17-S13
     15 1167  642 (S25W04 L=340)  3724    995        3 ( 717/ 516-1553/ 831)   8.8 E27-W31 S30-S17
     16  534  555 (S23E40 L=296)  2022    353        8 ( 458/ 467- 586/ 701)  45.0 E48-E33 S28-S13
     17  273  654 (S13E59 L=276)   496     85        1 ( 244/ 622- 314/ 681)   6.3 E62-E53 S15-S12
     18 1820  620 (S35W62 L= 38)  2162    164        5 (1770/ 556-1885/ 677)  17.1 W52-W75 S39-S30
     19  373  590 (S19E52 L=284)   295     72        1 ( 346/ 574- 405/ 614) -36.9 E54-E48 S19-S16
     20 1607  511 (S40W40 L= 15)   535     89        2 (1568/ 484-1640/ 549)  18.4 W35-W42 S41-S37
     21 1290  418 (S42W12 L=347)   847    247        0 (1199/ 393-1397/ 451)  -3.6 W04-W20 S44-S40
     22  566  344 (S37E49 L=287)  1150    181        3 ( 507/ 277- 612/ 429)  23.5 E62-E39 S41-S31
     23  774  216 (S51E41 L=295)  1404    133        3 ( 727/ 175- 842/ 252)   6.7 E50-E32 S54-S47
  

    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