Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1304 1810 (N48W55 L=222)   476     51        0 (1284/1775-1326/1835)  16.7 W49-W60 N45-N49
      2 1018 1694 (N49W20 L=186)  1085    142        2 ( 945/1647-1083/1734)   0.0 W12-W27 N45-N50
      3  417 1593 (N56E48 L=119)   711     72        1 ( 381/1564- 462/1610)   0.0 E54-E40 N53-N57
      4  961 1516 (N38W08 L=174)   307    116        1 ( 899/1500-1019/1527) -26.6 W03-W11 N35-N39
      5 1218 1482 (N29W24 L=190)   403     89        0 (1195/1436-1239/1512)  78.7 W21-W26 N26-N31
      6 1759 1419 (N12W62 L=229)   756     91        1 (1730/1375-1788/1463)  71.6 W60-W66 N08-N14
      7  414 1346 (N38E39 L=127)  1060    163        3 ( 365/1285- 464/1409)  33.7 E43-E34 N33-N41
      8  600 1364 (N36E22 L=144)   257     54        0 ( 576/1337- 632/1390)  26.6 E24-E19 N34-N36
      9  340 1067 (N21E46 L=121)  1331    306        1 ( 302/ 911- 391/1192) -74.5 E49-E42 N11-N29
     10 1346  991 (S01W18 L=185)   403    123        0 (1325/ 933-1372/1052)  51.3 W15-W20 S04-N01
     11  300  769 (N04E54 L=112)  1733    240        4 ( 262/ 663- 352/ 884)  63.4 E60-E48 S02-N10
     12 1569  822 (S17W30 L=196)   379     72        0 (1533/ 790-1599/ 854)  18.4 W26-W32 S18-S15
     13 1629  718 (S25W33 L=200)   778    234        2 (1555/ 630-1696/ 799)  30.3 W26-W39 S28-S21
     14  367  699 (S01E50 L=116)   396     90        1 ( 318/ 683- 405/ 726)  -9.5 E53-E46 S02-N00
     15 1143  555 (S23E03 L=164)  1299    251        2 (1078/ 447-1202/ 665)  50.2 E08-W03 S29-S17
     16  724  521 (S17E30 L=137)   937    175        1 ( 662/ 460- 771/ 576) -73.3 E32-E26 S22-S12
     17  500  437 (S20E50 L=116)  3507    355        5 ( 402/ 357- 600/ 545) -75.1 E58-E41 S26-S11
     18  807  440 (S24E27 L=139)   813    218        0 ( 729/ 364- 864/ 516)  34.7 E35-E21 S28-S19
     19 1318  440 (S36W07 L=173)   267     86        0 (1282/ 419-1345/ 474)  18.4 W03-W09 S37-S33
     20 1213  362 (S39E03 L=164)   370     50        1 (1180/ 347-1247/ 382) -21.8 E05-W00 S41-S37
     21 1351  258 (S54W06 L=173)  1558    206        2 (1257/ 222-1433/ 306)   3.2 E03-W15 S56-S51
     22  642  249 (S36E53 L=113)   947     88        1 ( 616/ 222- 677/ 287)  50.2 E58-E48 S38-S32
  

    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