Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1186 1742 (N49W34 L=180)  1772    325        3 (1067/1710-1351/1772) -18.4 W22-W46 N43-N52
      2 1593 1713 (N36W73 L=219)   916     65        0 (1565/1682-1627/1734)   2.7 W64-W85 N34-N36
      3 1129 1615 (N41W21 L=167)   330     83        1 (1090/1594-1170/1629) -26.6 W18-W24 N40-N43
      4 1313 1597 (N36W34 L=180)   616    110        1 (1266/1573-1369/1619) -33.7 W30-W37 N33-N38
      5 1594 1384 (N17W46 L=192)   798    200        1 (1503/1351-1671/1406) -22.6 W38-W51 N13-N19
      6 1314 1186 (N11W20 L=166)   816    248        2 (1207/1137-1411/1227) -17.1 W14-W27 N08-N15
      7 1874 1077 (S08W64 L=210)  4141    313       16 (1802/ 985-1927/1171)  16.7 W53-W74 S13-S02
      8  773 1138 (N17E14 L=132)   203     25        0 ( 759/1114- 788/1161)  90.0 E14-E12 N15-N18
      9  313 1027 (N16E50 L= 96)   824    177        1 ( 273/ 948- 359/1106) -55.0 E53-E45 N10-N20
     10  700 1018 (N11E20 L=126)   363    108        0 ( 679/ 970- 718/1075)  63.4 E21-E18 N08-N14
     11 1312 1011 (N01W17 L=163)   535    243        0 (1204/ 980-1421/1027)  -8.1 W09-W23 S01-N02
     12  831  936 (N04E13 L=133)   235     56        0 ( 810/ 914- 858/ 964) -63.4 E14-E11 N02-N06
     13 1496  901 (S09W27 L=173)   603    141        2 (1448/ 856-1540/ 944)  33.7 W23-W30 S11-S07
     14 1540  852 (S13W30 L=175)   916    247        3 (1490/ 740-1610/ 931)  45.0 W25-W35 S19-S09
     15 1410  855 (S10W21 L=167)   519    108        4 (1373/ 817-1450/ 893) -68.2 W18-W23 S12-S07
     16  327  744 (S02E53 L= 93)  1449    284        4 ( 290/ 636- 371/ 877)  81.9 E57-E48 S08-N06
     17  755  717 (S08E21 L=124)   250     66        0 ( 737/ 684- 773/ 756)  53.1 E23-E19 S09-S05
     18  568  625 (S11E36 L=110)   364     61        0 ( 546/ 600- 594/ 661) -90.0 E37-E34 S13-S08
     19 1572  597 (S31W31 L=177)  1012    160        2 (1522/ 538-1624/ 653)  32.0 W27-W35 S33-S27
     20  692  633 (S12E27 L=118)   286     58        0 ( 660/ 615- 720/ 652)  14.0 E29-E25 S13-S11
     21  520  522 (S18E44 L=102)  2078    334        2 ( 445/ 372- 597/ 632)  87.1 E47-E40 S29-S09
     22  729  514 (S21E28 L=117)   259     55        1 ( 700/ 489- 754/ 531) -71.6 E29-E26 S22-S19
     23  717  371 (S31E35 L=110)   742    135        2 ( 656/ 338- 786/ 404)   8.7 E41-E28 S32-S28
     24 1085  222 (S51E15 L=131)   677     62        1 (1059/ 194-1108/ 250)  81.9 E17-E11 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