Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1  573 1633 (N17E47 L= 83)  1169    322        3 ( 540/1530- 629/1741) -54.5 E51-E39 N11-N25
      2  927 1652 (N27E26 L=105)   528    115        3 ( 903/1597- 949/1695) -45.0 E28-E22 N23-N30
      3  638 1647 (N19E43 L= 87)   400    109        0 ( 613/1597- 679/1690) -82.9 E44-E41 N15-N23
      4  707 1523 (N13E33 L= 98)   903    222        2 ( 667/1424- 751/1615) -57.5 E37-E29 N07-N18
      5  488 1330 (S03E41 L= 90)   951    199        1 ( 437/1247- 519/1402) -41.2 E46-E36 S07-N00
      6 1244 1329 (N16W04 L=135)   406    124        0 (1215/1264-1277/1372)  90.0 W02-W05 N11-N19
      7  140 1072 (S24E65 L= 66)  2621    358        4 (  97/ 927- 179/1218)  86.8 E68-E61 S32-S14
      8 1270 1171 (N08W09 L=140)   246     93        1 (1236/1155-1319/1200)  21.8 W07-W12 N06-N09
      9 1558 1152 (N16W27 L=158)   364     60        2 (1533/1118-1578/1187) -76.0 W25-W28 N13-N17
     10  295 1065 (S22E49 L= 82)   400     81        1 ( 280/1023- 314/1112) -78.7 E50-E47 S24-S19
     11 1473 1074 (N09W24 L=155)   280     56        1 (1447/1048-1509/1103)  63.4 W22-W25 N06-N10
     12 1812  975 (N15W52 L=182)  1221    285        5 (1775/ 852-1850/1092) -40.2 W45-W59 N09-N20
     13  528 1066 (S17E31 L=100)   240     95        0 ( 492/1039- 570/1091)  -9.5 E33-E27 S17-S15
     14  594  986 (S20E24 L=106)   711    223        0 ( 513/ 910- 666/1070)  67.4 E28-E20 S26-S14
     15 1327 1016 (N01W17 L=148)   280     88        1 (1279/1002-1370/1030)  21.8 W14-W19 N00-N02
     16  324  891 (S32E43 L= 87)   652    224        2 ( 308/ 801- 357/1002)  85.6 E44-E41 S37-S24
     17  788  923 (S19E11 L=120)   438    141        0 ( 733/ 889- 865/ 959)  45.0 E13-E06 S21-S14
     18 1769  837 (N06W52 L=183)   456    125        1 (1723/ 814-1801/ 865)  26.6 W48-W55 N04-N08
     19 1592  773 (S03W41 L=172)   422    108        1 (1546/ 753-1631/ 788)  26.6 W37-W44 S05-S01
     20 1621  669 (S08W47 L=178)   552    134        1 (1593/ 602-1643/ 732) -69.4 W45-W49 S12-S04
     21 1001  646 (S28W10 L=141)  1302    313        6 ( 875/ 588-1167/ 723)  53.1 W03-W17 S35-S18
     22 1293  697 (S17W25 L=156)   223     66        1 (1263/ 674-1327/ 713)  26.6 W22-W26 S18-S15
     23 1388  555 (S21W37 L=167)   263     80        1 (1371/ 523-1399/ 595) -36.9 W34-W38 S22-S19
     24 1683  484 (S15W63 L=194)  2272    390        6 (1601/ 430-1774/ 534)  47.5 W57-W75 S20-S08
     25 1506  400 (S25W54 L=184)   327     97        2 (1483/ 380-1527/ 423)   0.0 W50-W55 S26-S23
     26 1336  271 (S38W51 L=182)  2335    507        6 (1250/ 182-1419/ 361)  -7.1 W40-W64 S40-S35
  

    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