Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1  834 1633 (N27E26 L=102)  1746    436        3 ( 762/1503- 961/1802) -32.2 E40-E13 N18-N38
      2  491 1740 (N29E61 L= 66)  1013    120        1 ( 458/1694- 526/1786) -19.3 E73-E53 N26-N33
      3  658 1614 (N22E37 L= 91)   435    110        2 ( 605/1573- 707/1648)  45.0 E39-E34 N18-N25
      4 1205 1622 (N34E01 L=127)   268     39        1 (1182/1598-1230/1647) -18.4 E03-W00 N32-N35
      5  379 1589 (N17E60 L= 68)   516    132        0 ( 350/1557- 418/1630)  59.0 E63-E54 N15-N20
      6  686 1429 (N11E28 L= 99)   957    293        1 ( 652/1304- 711/1586) -68.7 E32-E25 N03-N21
      7 1462 1437 (N27W20 L=147)   477    108        1 (1429/1390-1496/1487)  76.0 W17-W21 N23-N31
      8 1060 1426 (N17E06 L=122)   604    193        0 ( 989/1390-1127/1478)  -6.3 E10-E01 N15-N19
      9 1022 1395 (N15E07 L=121)   324    133        0 ( 976/1341-1075/1429) -23.2 E10-E03 N12-N16
     10 1616 1383 (N28W32 L=160)   386    115        0 (1587/1324-1640/1427) -45.0 W29-W34 N24-N29
     11 1931 1079 (N18W69 L=196)   664     93        1 (1922/1033-1945/1126)  63.4 W67-W72 N15-N21
     12  857  986 (S12E09 L=119)   223    120        0 ( 809/ 952- 897/1008)  31.0 E11-E06 S14-S10
     13  977  918 (S14E01 L=127)   768    204        3 ( 913/ 849-1079/ 975)  26.6 E04-W04 S18-S10
     14  580  838 (S25E25 L=103)   310     79        0 ( 535/ 812- 616/ 860)  -9.5 E28-E22 S26-S24
     15  536  701 (S35E28 L=100)   331     77        0 ( 507/ 682- 579/ 730)  -9.5 E30-E23 S35-S33
     16 1718  648 (S12W56 L=184)   342     41        1 (1698/ 621-1734/ 673) -71.6 W53-W58 S13-S10
     17 1374  521 (S28W36 L=163)  1118    229        3 (1296/ 449-1459/ 586) -17.4 W28-W45 S30-S25
     18 1205  539 (S31W23 L=151)   324    119        0 (1150/ 524-1261/ 554)  15.9 W19-W26 S32-S29
     19  712  492 (S46E11 L=117)   843    168        1 ( 649/ 467- 803/ 526)  15.9 E17-E03 S47-S42
     20 1399  380 (S36W46 L=174)   622     98        1 (1366/ 336-1441/ 414) -80.5 W42-W48 S39-S33
     21  734  240 (S68E05 L=123)   927    146        2 ( 674/ 212- 806/ 271)  -5.4 E15-W07 S69-S64
  

    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