Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1195 1743 (N49W35 L=178)  1913    404        2 (1022/1708-1370/1777) -14.0 W17-W49 N43-N52
      2 1166 1623 (N41W24 L=167)   272     39        1 (1142/1603-1191/1642)  14.0 W22-W26 N39-N42
      3 1328 1612 (N37W36 L=179)   339     43        2 (1298/1588-1359/1631)  -9.5 W33-W39 N35-N38
      4 1622 1395 (N17W49 L=192)   762    245        0 (1528/1351-1709/1418) -23.2 W40-W54 N12-N19
      5 1346 1193 (N11W23 L=166)   756    262        1 (1247/1152-1448/1240) -21.0 W17-W30 N07-N15
      6 1900 1097 (S07W68 L=211)  4365    259        9 (1852/ 984-1940/1183) -77.0 W60-W77 S15-S02
      7  324 1089 (N19E48 L= 95)   779    166        1 ( 303/1016- 359/1179) -70.0 E50-E45 N14-N25
      8  746 1039 (N11E17 L=126)   404    106        1 ( 720/ 987- 771/1095)  63.4 E18-E14 N08-N14
      9 1356 1023 (N01W20 L=163)   583    271        0 (1226/ 991-1472/1041)  -3.6 W11-W27 S01-N02
     10 1798  974 (S12W53 L=196)   507     73        0 (1779/ 937-1815/1011)  76.0 W51-W54 S13-S09
     11 1543  902 (S10W30 L=173)  1573    284        4 (1431/ 812-1644/ 967)  13.2 W21-W38 S13-S07
     12 1388  850 (S10W19 L=162)   279     50        2 (1368/ 817-1408/ 882) -90.0 W18-W20 S12-S07
     13 1549  816 (S15W30 L=173)   687    179        1 (1505/ 728-1580/ 881)  56.3 W26-W32 S20-S11
     14  356  835 (N04E48 L= 95)   334     67        0 ( 332/ 806- 379/ 863) -63.4 E49-E45 N01-N05
     15  524  731 (S04E37 L=106)   262     83        0 ( 494/ 696- 549/ 763) -78.7 E38-E35 S06-S01
     16  769  680 (S10E21 L=122)   515    191        1 ( 701/ 628- 816/ 751)  29.1 E26-E17 S13-S06
     17  361  653 (S07E52 L= 91)  1298    186        5 ( 321/ 569- 398/ 730)  63.4 E57-E48 S12-S02
     18  516  590 (S13E41 L=102)  1669    325        4 ( 430/ 497- 614/ 716) -66.4 E45-E37 S20-S04
     19 1609  607 (S31W34 L=177)  1115    181        0 (1553/ 556-1665/ 677)  33.7 W29-W39 S33-S27
     20  612  627 (S12E33 L=110)   366     90        1 ( 580/ 608- 660/ 655) -45.0 E35-E30 S13-S09
     21 1373  586 (S27W15 L=158)   329    177        0 (1303/ 551-1434/ 645)  16.7 W10-W20 S28-S24
     22  781  516 (S21E25 L=118)   297     48        2 ( 755/ 489- 805/ 535)   0.0 E26-E22 S22-S19
     23  608  445 (S24E40 L=103)   450     83        2 ( 585/ 404- 629/ 486)  39.8 E43-E36 S26-S21
     24  754  379 (S31E32 L=111)   623    146        0 ( 695/ 346- 824/ 415)   9.5 E37-E25 S32-S28
     25  410  380 (S27E66 L= 77)   778     54        1 ( 388/ 355- 436/ 403)  -9.5 E70-E61 S29-S25
     26 1121  228 (S51E11 L=132)   748    109        1 (1085/ 201-1169/ 258)  18.4 E14-E05 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