Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1150 1661 (N45W24 L=235)   881    147        2 (1094/1616-1227/1694) -41.2 W19-W28 N40-N48
      2  627 1579 (N48E24 L=187)  1732    416        2 ( 467/1485- 786/1639) -20.4 E44-E09 N38-N53
      3 1595 1528 (N26W53 L=264)   684     92        2 (1542/1497-1622/1560)  -7.1 W47-W57 N24-N28
      4 1087 1498 (N34W13 L=224)  1424    344        1 ( 939/1471-1253/1519) -12.3 W01-W24 N30-N37
      5 1742 1419 (N17W61 L=273)  1640    157        2 (1675/1359-1787/1461) -48.8 W56-W66 N12-N20
      6  532 1393 (N36E31 L=180)   265     59        0 ( 504/1380- 574/1405) -18.4 E33-E27 N34-N36
      7 1764 1258 (N07W56 L=267)   374     52        1 (1736/1238-1785/1283) -71.6 W53-W58 N05-N08
      8  687 1244 (N24E19 L=192)   230     54        1 ( 658/1222- 716/1264) -45.0 E20-E16 N22-N25
      9  629 1129 (N17E24 L=187)   240    140        0 ( 586/1085- 669/1172) -45.0 E26-E21 N14-N20
     10  424  994 (N11E40 L=171)   742    305        1 ( 301/ 939- 551/1033)   5.4 E51-E30 N08-N12
     11  145  857 (N04E73 L=138)   956     82        3 ( 118/ 822- 172/ 896) -33.7 E78-E68 N02-N06
     12  764  860 (S00E18 L=193)   260     44        0 ( 735/ 841- 795/ 881)   0.0 E19-E16 S01-N01
     13 1247  803 (S10W10 L=222)   763    177        4 (1202/ 719-1301/ 872)  66.0 W07-W14 S15-S06
     14 1109  814 (S08W02 L=213)   379     80        1 (1076/ 787-1134/ 854)  36.9 W00-W04 S09-S05
     15  395  791 (S01E45 L=166)   620    164        0 ( 323/ 758- 466/ 827) -14.0 E51-E39 S03-N01
     16 1135  753 (S12W03 L=214)   193     61        0 (1123/ 720-1152/ 780)  63.4 W01-W04 S13-S09
     17 1064  732 (S12E02 L=209)   217     74        1 (1033/ 714-1102/ 747)   0.0 E03-W00 S13-S10
     18  402  719 (S05E46 L=165)   320     46        0 ( 386/ 689- 422/ 741)  53.1 E47-E44 S07-S03
     19 1134  694 (S15W02 L=213)   447    150        1 (1069/ 674-1196/ 737)   0.0 E02-W06 S16-S13
     20 1531  709 (S21W29 L=240)   455    118        0 (1470/ 683-1576/ 734)   8.1 W24-W32 S22-S20
     21 1272  608 (S23W10 L=221)  1456    306        5 (1173/ 561-1400/ 668)   3.6 W02-W18 S26-S19
     22  451  638 (S11E45 L=167)   368    133        0 ( 395/ 625- 512/ 654)  -5.7 E49-E39 S11-S09
     23  444  535 (S17E49 L=162)   970    180        4 ( 381/ 468- 488/ 578) -63.4 E54-E45 S22-S14
     24  729  453 (S26E30 L=181)   984    312        2 ( 649/ 346- 810/ 566)  31.8 E41-E20 S33-S19
  

    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