Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1355 1644 (N44W32 L=215)   607    138        2 (1296/1616-1416/1680) -32.0 W27-W36 N41-N46
      2  944 1660 (N47E04 L=178)   292     67        1 ( 911/1643- 982/1675)   0.0 E07-W00 N45-N48
      3 1643 1496 (N31W53 L=235)   542    107        0 (1603/1466-1688/1519) -33.7 W48-W57 N28-N32
      4 1194 1483 (N33W14 L=197)   351     79        0 (1160/1457-1229/1508) -38.7 W11-W16 N30-N34
      5  234 1317 (N23E64 L=119)   519    124        0 ( 198/1288- 279/1336)  11.3 E69-E57 N20-N24
      6  499 1299 (N22E36 L=147)   552    169        0 ( 446/1256- 546/1322)  23.2 E39-E32 N19-N23
      7 1208 1250 (N17W13 L=195)   255    108        0 (1174/1209-1242/1296) -56.3 W10-W14 N14-N20
      8  359 1213 (N17E47 L=136)   327     73        1 ( 337/1190- 387/1241) -36.9 E48-E44 N15-N18
      9  411 1162 (N13E42 L=141)   441    116        3 ( 374/1128- 463/1184)  23.2 E44-E37 N11-N14
     10  839 1055 (N07E11 L=171)   213     99        0 ( 792/1044- 892/1063)   0.0 E14-E08 N05-N07
     11 1425  926 (S03W25 L=208)   229     86        1 (1406/ 896-1461/ 952)  26.6 W23-W27 S05-S01
     12 1054  863 (S06W01 L=184)   775    229        1 ( 966/ 795-1132/ 936) -45.0 E03-W06 S10-S01
     13 1526  769 (S14W32 L=215)   468    111        0 (1499/ 725-1544/ 827)  80.5 W30-W33 S16-S10
     14  233  759 (S12E61 L=121)   856    159        2 ( 206/ 678- 264/ 815)  42.0 E66-E56 S17-S08
     15 1713  710 (S19W50 L=232)   422    128        2 (1657/ 678-1754/ 751)  20.6 W44-W53 S21-S16
     16  762  697 (S16E18 L=165)   394    149        2 ( 686/ 678- 813/ 718)   6.3 E23-E14 S16-S14
     17 1536  625 (S24W35 L=217)   462    145        2 (1493/ 569-1581/ 681)  54.5 W32-W37 S27-S19
     18 1089  586 (S24W03 L=185)  1253    305        2 (1005/ 474-1182/ 674)  50.2 E03-W09 S31-S18
     19  694  654 (S18E23 L=160)   346     83        1 ( 651/ 635- 732/ 669)   0.0 E26-E20 S19-S17
     20  821  599 (S22E15 L=168)   274     69        3 ( 793/ 576- 842/ 633)  53.1 E16-E13 S23-S19
     21  646  579 (S23E28 L=155)   248     58        1 ( 625/ 558- 675/ 600) -18.4 E29-E25 S24-S21
     22  458  526 (S27E45 L=137)   491    121        4 ( 423/ 486- 498/ 555)  24.0 E49-E40 S30-S25
     23  828  466 (S32E16 L=166)   333     88        1 ( 778/ 443- 864/ 486)  23.2 E20-E13 S33-S30
     24  970  357 (S41E07 L=176)   287     35        1 ( 948/ 335- 991/ 373)  45.0 E08-E05 S42-S39
     25  981  225 (S54E09 L=174)   558     63        3 ( 953/ 196-1003/ 254) -74.1 E11-E06 S57-S50
     26 1094  206 (S57W03 L=186)   722    106        1 (1055/ 190-1146/ 233) -24.0 E01-W09 S59-S53
     27 1202  188 (S61W17 L=200)   617     48        0 (1184/ 161-1220/ 222) -71.6 W14-W21 S64-S55
  

    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