Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1  373 1513 (N45E43 L=167)   361     60        2 ( 336/1491- 409/1531) -11.3 E48-E38 N42-N46
      2  928 1418 (N26W02 L=212)   409    140        2 ( 870/1376- 987/1460) -60.3 W00-W05 N22-N29
      3 1828 1353 (N04W64 L=274)   994     89        3 (1784/1324-1872/1377) -16.7 W58-W70 N02-N06
      4 1380 1319 (N12W27 L=237)   495     98        1 (1333/1279-1426/1351) -38.7 W24-W29 N08-N14
      5  604 1300 (N25E21 L=189)   295     97        0 ( 555/1274- 648/1336)   8.1 E24-E17 N24-N27
      6  607 1185 (N18E22 L=188)  1481    543        0 ( 406/1128- 829/1234) -19.7 E36-E08 N13-N25
      7  173 1080 (N20E61 L=150)  1314    170        2 ( 109/1039- 247/1115) -15.5 E70-E52 N16-N22
      8 1922 1022 (S16W67 L=277)  2015    163        4 (1883/ 965-1958/1104)  54.5 W60-W74 S19-S12
      9  131  986 (N15E67 L=143)  2578    151        7 (  86/ 920- 176/1057) -36.9 E76-E61 N10-N19
     10 1082  964 (S03W02 L=213)   195     68        0 (1042/ 950-1118/ 977) -26.6 W00-W04 S04-S01
     11  852  872 (S04E13 L=198)   488    108        1 ( 837/ 812- 869/ 936)  74.1 E14-E10 S07-N00
     12  140  865 (N08E68 L=142)  1235    136        1 (  84/ 814- 187/ 908) -16.4 E80-E63 N04-N10
     13 1058  825 (S10E02 L=209)   975    359        3 ( 943/ 778-1190/ 902)  -3.8 E08-W07 S13-S05
     14 1379  717 (S23W16 L=226)   220     72        1 (1357/ 687-1400/ 757)  53.1 W14-W17 S24-S20
     15 1676  637 (S35W39 L=249)  1645    376        0 (1527/ 524-1813/ 743)  16.5 W25-W53 S39-S30
     16  906  698 (S15E13 L=197)   271     74        0 ( 875/ 667- 938/ 732)  21.8 E15-E10 S16-S12
     17  457  605 (S12E45 L=165)  2686    441        6 ( 340/ 499- 567/ 731)  14.0 E58-E34 S17-S05
     18  842  622 (S18E19 L=192)   574    205        2 ( 809/ 524- 869/ 692)  74.7 E21-E15 S24-S13
     19  297  522 (S14E65 L=146)  3298    222        8 ( 241/ 431- 349/ 620)  47.5 E80-E58 S20-S08
     20  640  551 (S19E34 L=176)   353     89        1 ( 620/ 520- 668/ 595)  68.2 E36-E31 S20-S15
     21  446  521 (S17E50 L=161)   374     32        0 ( 423/ 497- 468/ 545) -71.6 E51-E48 S18-S15
     22  521  507 (S19E44 L=166)   317     43        1 ( 502/ 478- 541/ 536)  63.4 E45-E42 S21-S17
     23  456  463 (S21E52 L=158)   525     89        2 ( 420/ 424- 487/ 493) -76.0 E54-E48 S23-S18
     24 1029  368 (S39E15 L=195)  1465    263        4 ( 933/ 295-1121/ 469)  25.3 E24-E05 S42-S33
     25 1369  421 (S43W11 L=222)   406     86        1 (1321/ 407-1413/ 440)   0.0 W07-W15 S44-S41
     26  433  380 (S25E61 L=150)  1283    160        1 ( 373/ 358- 515/ 414)   0.0 E71-E50 S27-S23
     27 1185  302 (S48E06 L=204)   430     83        0 (1150/ 277-1222/ 330)  20.6 E10-E02 S49-S46
  

    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