Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1483 1632 (N26W53 L=342)   986    242        1 (1384/1559-1552/1716) -85.9 W51-W54 N19-N33
      2  653 1577 (N50E09 L=280)   262     37        1 ( 641/1549- 672/1603)  63.4 E11-E07 N48-N52
      3  892 1547 (N40W08 L=297)   746    156        3 ( 834/1504- 952/1578) -45.0 W03-W12 N35-N42
      4 1023 1532 (N35W16 L=305)   475     83        1 ( 992/1500-1061/1561)  15.9 W13-W20 N33-N37
      5  430 1524 (N54E35 L=254)   315     55        0 ( 412/1492- 442/1551) -76.0 E38-E33 N51-N56
      6  337 1517 (N56E51 L=238)   868     96        0 ( 296/1486- 393/1536)   0.0 E59-E40 N54-N57
      7 1697 1396 (N07W55 L=344)   877    127        2 (1662/1339-1727/1455)  29.1 W49-W58 N04-N09
      8 1377 1342 (N14W30 L=319)   369     83        1 (1344/1315-1413/1372) -78.7 W27-W31 N11-N16
      9  687 1226 (N26E15 L=274)   214    102        0 ( 654/1191- 711/1247) -45.0 E16-E13 N24-N28
     10 1143 1212 (N14W12 L=301)   383     98        2 (1094/1185-1190/1238) -38.7 W09-W14 N11-N16
     11  194 1173 (N35E62 L=227)   883    102        2 ( 152/1134- 237/1206) -21.8 E70-E55 N31-N37
     12  742 1132 (N20E14 L=275)   221     85        0 ( 709/1090- 764/1158) -78.7 E15-E12 N16-N21
     13 1696 1063 (S11W42 L=331)   298     11        1 (1676/1042-1718/1083) -33.7 W40-W44 S12-S09
     14 1849  963 (S22W55 L=344)   391     78        0 (1817/ 946-1877/ 990)   8.1 W51-W59 S23-S20
     15  720  917 (N08E20 L=269)   467    184        0 ( 642/ 894- 783/ 955) -12.5 E24-E15 N06-N10
     16 1649  801 (S24W33 L=322)   341    146        1 (1604/ 740-1703/ 837)  11.3 W28-W38 S26-S23
     17  259  768 (N09E59 L=230)   418     56        1 ( 235/ 744- 283/ 795)  76.0 E62-E56 N07-N11
     18  816  701 (S06E20 L=269)   448     72        1 ( 781/ 682- 857/ 725) -14.0 E22-E18 S07-S04
     19 1553  646 (S31W23 L=312)   310     78        0 (1536/ 605-1572/ 680)  53.1 W21-W24 S33-S29
     20 1356  573 (S29W07 L=296)   951    219        1 (1283/ 511-1417/ 669)  26.6 W01-W13 S31-S24
     21 1002  619 (S16E12 L=277)   653    191        0 ( 953/ 589-1055/ 667) -38.7 E14-E08 S18-S12
     22 1699  577 (S42W36 L=326)  1224    110        3 (1666/ 522-1733/ 628)  74.1 W32-W41 S45-S37
     23  679  518 (S14E35 L=254)   258     66        1 ( 647/ 505- 723/ 533) -11.3 E37-E32 S14-S12
     24 1056  226 (S45E28 L=261)  1632    244        1 ( 942/ 175-1149/ 291)   7.1 E41-E17 S47-S42
  

    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