Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1  527 1748 (N31E58 L= 96)  1307    127        4 ( 503/1684- 552/1814) -40.2 E66-E51 N26-N37
      2 1330 1734 (N47W07 L=160)   377     50        0 (1300/1720-1362/1748)  31.0 W04-W09 N45-N49
      3  888 1702 (N33E25 L=129)   689    141        0 ( 826/1651- 940/1734) -16.7 E29-E19 N30-N35
      4  534 1599 (N20E45 L=108)  1195    199        2 ( 497/1523- 626/1664)  58.0 E50-E39 N14-N24
      5 1097 1551 (N26E06 L=148)   619    131        0 (1074/1494-1128/1605) -69.4 E07-E03 N22-N30
      6  380 1518 (N13E55 L= 99)  1063    180        3 ( 355/1428- 407/1603) -56.3 E60-E49 N07-N19
      7  628 1553 (N18E36 L=117)   400     79        3 ( 586/1524- 658/1591)  68.2 E38-E34 N16-N21
      8 1299 1474 (N26W08 L=162)   373    170        0 (1255/1424-1355/1546) -36.9 W04-W12 N23-N29
      9  542 1481 (N13E40 L=114)   281     77        2 ( 516/1450- 568/1507) -53.1 E42-E37 N10-N14
     10 1858 1270 (N27W58 L=212)  1803    172        3 (1781/1214-1920/1335)  -9.0 W48-W68 N24-N29
     11 1691 1194 (N17W40 L=193)   821    146        3 (1658/1109-1718/1261)  84.3 W37-W41 N11-N21
     12 1899 1145 (N20W63 L=217)   724    120        1 (1883/1074-1914/1193) -74.1 W60-W65 N16-N23
     13  788 1116 (S06E15 L=138)   185     52        1 ( 762/1094- 817/1134)  45.0 E16-E13 S07-S04
     14  464 1051 (S14E36 L=118)   679    161        0 ( 428/ 977- 517/1092)  60.3 E38-E31 S18-S11
     15  918  902 (S16E04 L=150)   346    100        0 ( 869/ 876- 961/ 932)  31.0 E06-E01 S17-S13
     16  314  876 (S26E48 L=106)   575    130        1 ( 265/ 830- 359/ 917) -24.0 E52-E43 S28-S24
     17  266  743 (S35E55 L= 99)   563     87        1 ( 235/ 717- 306/ 773) -23.2 E59-E50 S36-S33
     18  585  687 (S35E24 L=130)   274     57        0 ( 566/ 657- 610/ 709)  63.4 E25-E21 S36-S32
     19  984  647 (S30W05 L=159)  1296    394        6 ( 810/ 598-1147/ 687)   7.8 E06-W16 S32-S26
     20 1609  588 (S19W50 L=203)   498    144        0 (1549/ 545-1641/ 645)  81.9 W46-W51 S22-S15
     21  443  571 (S45E38 L=116)  1532    254        5 ( 336/ 535- 560/ 613)   6.8 E50-E25 S47-S40
     22 1114  504 (S36W18 L=172)   371     91        0 (1085/ 471-1155/ 531)  53.1 W16-W20 S38-S33
     23 1730  476 (S21W70 L=224)   635    105        1 (1683/ 453-1775/ 506)  40.6 W66-W74 S24-S18
     24  613  381 (S57E22 L=131)   342     53        0 ( 591/ 357- 629/ 414)  50.2 E25-E19 S59-S53
     25  544  281 (S69E42 L=111)   849    117        1 ( 490/ 261- 599/ 307)  -2.3 E57-E30 S69-S65
  

    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