Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1583 1642 (N23W59 L=214)   570    146        2 (1537/1595-1645/1681) -60.3 W55-W62 N18-N25
      2 1433 1592 (N25W44 L=199)   514    104        1 (1382/1569-1481/1617) -38.7 W40-W46 N22-N27
      3 1813 1474 (N07W71 L=226)  1174    106        1 (1760/1436-1848/1495) -10.6 W64-W80 N04-N08
      4 1296 1435 (N20W27 L=183)   756    220        1 (1203/1388-1393/1476)  -8.1 W20-W34 N17-N21
      5 1127 1336 (N19W14 L=169)   409    141        0 (1101/1268-1165/1392)  39.8 W11-W17 N15-N21
      6 1581 1219 (N00W38 L=193)   885    176        2 (1526/1139-1618/1288) -83.7 W35-W39 S04-N05
      7  323 1220 (N32E43 L=112)   374     79        1 ( 290/1191- 352/1239)   0.0 E46-E40 N30-N33
      8 1754 1119 (S10W48 L=203)   489    121        2 (1697/1088-1803/1148) -36.9 W43-W52 S12-S06
      9  399 1079 (N22E38 L=118)   554    161        2 ( 352/1003- 420/1143) -77.5 E41-E35 N17-N26
     10 1857 1074 (S16W57 L=213)  1077    151        3 (1834/1005-1887/1132)  81.9 W54-W61 S19-S12
     11  220  997 (N21E56 L=100)  1166    160        1 ( 192/ 934- 264/1080) -68.2 E58-E51 N16-N26
     12 1660  956 (S16W37 L=192)  1343    372        4 (1536/ 873-1765/1043)   9.0 W26-W45 S19-S13
     13 1814  995 (S19W51 L=206)   483     91        1 (1795/ 948-1834/1042) -80.5 W49-W53 S21-S15
     14 1004  897 (S02E04 L=151)  1125    262        2 ( 896/ 802-1080/ 980) -67.4 E08-W00 S08-N04
     15 1516  926 (S14W26 L=181)   532    123        1 (1475/ 866-1543/ 974)  56.3 W23-W28 S17-S11
     16 1727  914 (S20W41 L=197)   403     78        1 (1704/ 870-1748/ 945)  53.1 W39-W43 S23-S18
     17  455  906 (N11E37 L=118)   271     69        1 ( 416/ 883- 480/ 934)  11.3 E39-E34 N09-N12
     18 1653  864 (S21W34 L=190)   269     37        2 (1631/ 842-1676/ 885)   0.0 W32-W36 S22-S19
     19 1843  715 (S37W54 L=210)  1008     96        1 (1801/ 673-1873/ 759)  53.1 W48-W58 S40-S34
     20  824  534 (S18E25 L=131)  1935    621        2 ( 687/ 334-1010/ 726)  28.0 E40-E08 S29-S11
     21 1498  673 (S28W20 L=175)   251     85        0 (1462/ 661-1537/ 692) -31.0 W17-W22 S29-S26
     22  286  582 (S04E63 L= 92)  2049    312        0 ( 199/ 494- 384/ 687) -52.4 E69-E56 S10-N03
     23 1222  588 (S25W00 L=155)  1423    373        0 (1075/ 511-1381/ 678)   5.2 E10-W12 S27-S23
     24 1788  652 (S40W47 L=203)   412     43        0 (1761/ 635-1814/ 667)  -7.1 W43-W51 S41-S37
     25  480  541 (S10E47 L=108)  1391    318        4 ( 410/ 446- 579/ 654) -78.7 E50-E42 S17-S02
     26  351  595 (S05E55 L=100)   373     74        0 ( 332/ 555- 373/ 626)  76.0 E56-E53 S06-S02
     27  473  432 (S17E54 L=102)   383     62        1 ( 447/ 411- 508/ 458) -21.8 E55-E50 S18-S14
     28  914  414 (S28E24 L=131)   393    113        0 ( 868/ 382- 963/ 449)  12.5 E28-E19 S29-S26
  

    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