Hex Artifact Content
Not logged in

Artifact 1b625ac1477fd5f00c4eee688cd288ac5ca16ec9:


0000: 23 69 6e 63 6c 75 64 65 20 3c 69 6f 73 74 72 65  #include <iostre
0010: 61 6d 3e 0d 0a 23 69 6e 63 6c 75 64 65 20 3c 73  am>..#include <s
0020: 73 74 72 65 61 6d 3e 0d 0a 23 69 6e 63 6c 75 64  stream>..#includ
0030: 65 20 3c 69 6f 6d 61 6e 69 70 3e 0d 0a 23 69 6e  e <iomanip>..#in
0040: 63 6c 75 64 65 20 3c 76 65 63 74 6f 72 3e 0d 0a  clude <vector>..
0050: 23 69 6e 63 6c 75 64 65 20 3c 73 74 72 69 6e 67  #include <string
0060: 3e 0d 0a 23 69 6e 63 6c 75 64 65 20 3c 6d 61 70  >..#include <map
0070: 3e 0d 0a 23 69 6e 63 6c 75 64 65 20 3c 73 65 74  >..#include <set
0080: 3e 0d 0a 23 69 6e 63 6c 75 64 65 20 3c 61 6c 67  >..#include <alg
0090: 6f 72 69 74 68 6d 3e 0d 0a 23 69 6e 63 6c 75 64  orithm>..#includ
00a0: 65 20 3c 6e 75 6d 65 72 69 63 3e 0d 0a 23 69 6e  e <numeric>..#in
00b0: 63 6c 75 64 65 20 3c 69 74 65 72 61 74 6f 72 3e  clude <iterator>
00c0: 0d 0a 23 69 6e 63 6c 75 64 65 20 3c 66 75 6e 63  ..#include <func
00d0: 74 69 6f 6e 61 6c 3e 0d 0a 23 69 6e 63 6c 75 64  tional>..#includ
00e0: 65 20 3c 63 6f 6d 70 6c 65 78 3e 0d 0a 23 69 6e  e <complex>..#in
00f0: 63 6c 75 64 65 20 3c 71 75 65 75 65 3e 0d 0a 23  clude <queue>..#
0100: 69 6e 63 6c 75 64 65 20 3c 73 74 61 63 6b 3e 0d  include <stack>.
0110: 0a 23 69 6e 63 6c 75 64 65 20 3c 63 6d 61 74 68  .#include <cmath
0120: 3e 0d 0a 23 69 6e 63 6c 75 64 65 20 3c 63 61 73  >..#include <cas
0130: 73 65 72 74 3e 0d 0a 23 69 6e 63 6c 75 64 65 20  sert>..#include 
0140: 3c 63 73 74 72 69 6e 67 3e 0d 0a 75 73 69 6e 67  <cstring>..using
0150: 20 6e 61 6d 65 73 70 61 63 65 20 73 74 64 3b 0d   namespace std;.
0160: 0a 74 79 70 65 64 65 66 20 6c 6f 6e 67 20 6c 6f  .typedef long lo
0170: 6e 67 20 4c 4c 3b 0d 0a 74 79 70 65 64 65 66 20  ng LL;..typedef 
0180: 63 6f 6d 70 6c 65 78 3c 64 6f 75 62 6c 65 3e 20  complex<double> 
0190: 43 4d 50 3b 0d 0a 0d 0a 69 6e 74 20 62 69 74 63  CMP;....int bitc
01a0: 6e 74 28 69 6e 74 20 6d 29 0d 0a 7b 0d 0a 09 69  nt(int m)..{...i
01b0: 6e 74 20 63 20 3d 20 30 3b 0d 0a 09 66 6f 72 28  nt c = 0;...for(
01c0: 3b 6d 3b 6d 3e 3e 3d 31 29 0d 0a 09 09 63 20 2b  ;m;m>>=1)....c +
01d0: 3d 20 28 6d 26 31 29 3b 0d 0a 09 72 65 74 75 72  = (m&1);...retur
01e0: 6e 20 63 3b 0d 0a 7d 0d 0a 0d 0a 63 6c 61 73 73  n c;..}....class
01f0: 20 52 61 62 62 69 74 53 74 65 70 70 69 6e 67 20   RabbitStepping 
0200: 7b 20 70 75 62 6c 69 63 3a 0d 0a 09 64 6f 75 62  { public:...doub
0210: 6c 65 20 67 65 74 45 78 70 65 63 74 65 64 28 73  le getExpected(s
0220: 74 72 69 6e 67 20 66 69 65 6c 64 2c 20 69 6e 74  tring field, int
0230: 20 72 29 20 0d 0a 09 7b 0d 0a 09 09 63 65 72 72   r) ...{....cerr
0240: 3c 3c 66 69 65 6c 64 2e 73 69 7a 65 28 29 3c 3c  <<field.size()<<
0250: 65 6e 64 6c 3b 0d 0a 09 09 69 6e 74 20 65 78 20  endl;....int ex 
0260: 3d 20 30 3b 0d 0a 09 09 69 6e 74 20 63 6e 20 3d  = 0;....int cn =
0270: 20 30 3b 0d 0a 0d 0a 09 09 69 6e 74 20 4e 20 3d   0;......int N =
0280: 20 66 69 65 6c 64 2e 73 69 7a 65 28 29 3b 0d 0a   field.size();..
0290: 09 09 66 6f 72 28 69 6e 74 20 6d 61 73 6b 3d 31  ..for(int mask=1
02a0: 3b 20 6d 61 73 6b 3c 28 31 3c 3c 4e 29 3b 20 2b  ; mask<(1<<N); +
02b0: 2b 6d 61 73 6b 29 0d 0a 09 09 09 69 66 28 20 62  +mask).....if( b
02c0: 69 74 63 6e 74 28 6d 61 73 6b 29 20 3d 3d 20 72  itcnt(mask) == r
02d0: 20 29 0d 0a 09 09 09 7b 0d 0a 09 09 09 09 76 65   ).....{......ve
02e0: 63 74 6f 72 3c 20 70 61 69 72 3c 69 6e 74 2c 69  ctor< pair<int,i
02f0: 6e 74 3e 20 3e 20 72 73 3b 0d 0a 09 09 09 09 66  nt> > rs;......f
0300: 6f 72 28 69 6e 74 20 69 3d 30 3b 20 69 3c 4e 3b  or(int i=0; i<N;
0310: 20 2b 2b 69 29 0d 0a 09 09 09 09 09 69 66 28 20   ++i).......if( 
0320: 6d 61 73 6b 20 26 20 28 31 3c 3c 69 29 20 29 0d  mask & (1<<i) ).
0330: 0a 09 09 09 09 09 09 72 73 2e 70 75 73 68 5f 62  .......rs.push_b
0340: 61 63 6b 28 6d 61 6b 65 5f 70 61 69 72 28 2d 31  ack(make_pair(-1
0350: 2c 69 29 29 3b 0d 0a 09 09 09 09 69 6e 74 20 6c  ,i));......int l
0360: 65 66 74 20 3d 20 72 75 6e 28 66 69 65 6c 64 2c  eft = run(field,
0370: 20 72 73 2c 20 4e 29 3b 0d 0a 09 09 09 09 65 78   rs, N);......ex
0380: 20 2b 3d 20 6c 65 66 74 3b 0d 0a 09 09 09 09 63   += left;......c
0390: 6e 20 2b 3d 20 31 3b 0d 0a 09 09 09 7d 0d 0a 09  n += 1;.....}...
03a0: 09 72 65 74 75 72 6e 20 64 6f 75 62 6c 65 28 65  .return double(e
03b0: 78 29 20 2f 20 63 6e 3b 0d 0a 09 7d 0d 0a 0d 0a  x) / cn;...}....
03c0: 09 69 6e 74 20 72 75 6e 28 63 6f 6e 73 74 20 73  .int run(const s
03d0: 74 72 69 6e 67 26 20 66 69 65 6c 64 2c 20 76 65  tring& field, ve
03e0: 63 74 6f 72 3c 20 70 61 69 72 3c 69 6e 74 2c 69  ctor< pair<int,i
03f0: 6e 74 3e 20 3e 26 20 72 73 2c 20 69 6e 74 20 73  nt> >& rs, int s
0400: 69 7a 65 29 0d 0a 09 7b 0d 0a 09 09 77 68 69 6c  ize)...{....whil
0410: 65 28 20 73 69 7a 65 20 3e 20 32 20 26 26 20 21  e( size > 2 && !
0420: 72 73 2e 65 6d 70 74 79 28 29 20 29 0d 0a 09 09  rs.empty() )....
0430: 7b 0d 0a 09 09 09 6f 6e 65 53 74 65 70 28 66 69  {.....oneStep(fi
0440: 65 6c 64 2c 20 72 73 2c 20 73 69 7a 65 29 3b 0d  eld, rs, size);.
0450: 0a 09 09 09 69 6e 74 20 63 6e 74 5b 32 30 5d 20  ....int cnt[20] 
0460: 3d 20 7b 7d 3b 0d 0a 09 09 09 66 6f 72 28 69 6e  = {};.....for(in
0470: 74 20 69 3d 30 3b 20 69 3c 72 73 2e 73 69 7a 65  t i=0; i<rs.size
0480: 28 29 3b 20 2b 2b 69 29 0d 0a 09 09 09 09 63 6e  (); ++i)......cn
0490: 74 5b 72 73 5b 69 5d 2e 73 65 63 6f 6e 64 5d 20  t[rs[i].second] 
04a0: 2b 2b 3b 0d 0a 09 09 09 76 65 63 74 6f 72 3c 20  ++;.....vector< 
04b0: 70 61 69 72 3c 69 6e 74 2c 69 6e 74 3e 20 3e 20  pair<int,int> > 
04c0: 72 73 32 3b 0d 0a 09 09 09 66 6f 72 28 69 6e 74  rs2;.....for(int
04d0: 20 69 3d 30 3b 20 69 3c 72 73 2e 73 69 7a 65 28   i=0; i<rs.size(
04e0: 29 3b 20 2b 2b 69 29 0d 0a 09 09 09 09 69 66 28  ); ++i)......if(
04f0: 20 63 6e 74 5b 72 73 5b 69 5d 2e 73 65 63 6f 6e   cnt[rs[i].secon
0500: 64 5d 20 3d 3d 20 31 20 29 0d 0a 09 09 09 09 09  d] == 1 ).......
0510: 72 73 32 2e 70 75 73 68 5f 62 61 63 6b 28 72 73  rs2.push_back(rs
0520: 5b 69 5d 29 3b 0d 0a 09 09 09 72 73 2e 73 77 61  [i]);.....rs.swa
0530: 70 28 72 73 32 29 3b 0d 0a 09 09 7d 0d 0a 09 09  p(rs2);....}....
0540: 72 65 74 75 72 6e 20 72 73 2e 73 69 7a 65 28 29  return rs.size()
0550: 3b 0d 0a 09 7d 0d 0a 0d 0a 09 76 6f 69 64 20 6f  ;...}.....void o
0560: 6e 65 53 74 65 70 28 63 6f 6e 73 74 20 73 74 72  neStep(const str
0570: 69 6e 67 26 20 66 69 65 6c 64 2c 20 76 65 63 74  ing& field, vect
0580: 6f 72 3c 20 70 61 69 72 3c 69 6e 74 2c 69 6e 74  or< pair<int,int
0590: 3e 20 3e 26 20 72 73 2c 20 69 6e 74 26 20 73 69  > >& rs, int& si
05a0: 7a 65 29 0d 0a 09 7b 0d 0a 09 09 66 6f 72 28 69  ze)...{....for(i
05b0: 6e 74 20 69 3d 30 3b 20 69 3c 72 73 2e 73 69 7a  nt i=0; i<rs.siz
05c0: 65 28 29 3b 20 2b 2b 69 29 20 7b 0d 0a 09 09 09  e(); ++i) {.....
05d0: 69 6e 74 20 70 72 65 76 20 3d 20 72 73 5b 69 5d  int prev = rs[i]
05e0: 2e 66 69 72 73 74 3b 0d 0a 09 09 09 69 6e 74 26  .first;.....int&
05f0: 20 63 75 72 20 3d 20 72 73 5b 69 5d 2e 73 65 63   cur = rs[i].sec
0600: 6f 6e 64 3b 0d 0a 09 09 09 72 73 5b 69 5d 2e 66  ond;.....rs[i].f
0610: 69 72 73 74 20 3d 20 63 75 72 3b 0d 0a 09 09 09  irst = cur;.....
0620: 69 66 28 20 63 75 72 20 3d 3d 20 30 20 29 0d 0a  if( cur == 0 )..
0630: 09 09 09 09 63 75 72 20 2b 2b 3b 0d 0a 09 09 09  ....cur ++;.....
0640: 65 6c 73 65 20 69 66 28 20 63 75 72 20 3e 3d 20  else if( cur >= 
0650: 73 69 7a 65 2d 32 20 29 0d 0a 09 09 09 09 63 75  size-2 )......cu
0660: 72 20 2d 2d 3b 0d 0a 09 09 09 65 6c 73 65 20 69  r --;.....else i
0670: 66 28 20 66 69 65 6c 64 5b 63 75 72 5d 3d 3d 27  f( field[cur]=='
0680: 57 27 20 29 0d 0a 09 09 09 09 63 75 72 20 2d 2d  W' )......cur --
0690: 3b 0d 0a 09 09 09 65 6c 73 65 20 69 66 28 20 66  ;.....else if( f
06a0: 69 65 6c 64 5b 63 75 72 5d 3d 3d 27 42 27 20 29  ield[cur]=='B' )
06b0: 0d 0a 09 09 09 09 63 75 72 20 2b 2b 3b 0d 0a 09  ......cur ++;...
06c0: 09 09 65 6c 73 65 20 69 66 28 20 70 72 65 76 20  ..else if( prev 
06d0: 3d 3d 20 2d 31 20 29 0d 0a 09 09 09 09 63 75 72  == -1 )......cur
06e0: 20 2d 2d 3b 0d 0a 09 09 09 65 6c 73 65 0d 0a 09   --;.....else...
06f0: 09 09 09 63 75 72 20 3d 20 70 72 65 76 3b 0d 0a  ...cur = prev;..
0700: 09 09 7d 0d 0a 09 09 2d 2d 73 69 7a 65 3b 0d 0a  ..}....--size;..
0710: 09 7d 0d 0a 7d 3b 0d 0a 0d 0a 2f 2f 20 42 45 47  .}..};....// BEG
0720: 49 4e 20 43 55 54 20 48 45 52 45 0d 0a 23 69 6e  IN CUT HERE..#in
0730: 63 6c 75 64 65 20 3c 63 74 69 6d 65 3e 0d 0a 64  clude <ctime>..d
0740: 6f 75 62 6c 65 20 73 74 61 72 74 5f 74 69 6d 65  ouble start_time
0750: 3b 20 73 74 72 69 6e 67 20 74 69 6d 65 72 28 29  ; string timer()
0760: 0d 0a 20 7b 20 6f 73 74 72 69 6e 67 73 74 72 65  .. { ostringstre
0770: 61 6d 20 6f 73 3b 20 6f 73 20 3c 3c 20 22 20 28  am os; os << " (
0780: 22 20 3c 3c 20 69 6e 74 28 28 63 6c 6f 63 6b 28  " << int((clock(
0790: 29 2d 73 74 61 72 74 5f 74 69 6d 65 29 2f 43 4c  )-start_time)/CL
07a0: 4f 43 4b 53 5f 50 45 52 5f 53 45 43 2a 31 30 30  OCKS_PER_SEC*100
07b0: 30 29 20 3c 3c 20 22 20 6d 73 65 63 29 22 3b 20  0) << " msec)"; 
07c0: 72 65 74 75 72 6e 20 6f 73 2e 73 74 72 28 29 3b  return os.str();
07d0: 20 7d 0d 0a 74 65 6d 70 6c 61 74 65 3c 74 79 70   }..template<typ
07e0: 65 6e 61 6d 65 20 54 3e 20 6f 73 74 72 65 61 6d  ename T> ostream
07f0: 26 20 6f 70 65 72 61 74 6f 72 3c 3c 28 6f 73 74  & operator<<(ost
0800: 72 65 61 6d 26 20 6f 73 2c 20 63 6f 6e 73 74 20  ream& os, const 
0810: 76 65 63 74 6f 72 3c 54 3e 26 20 76 29 0d 0a 20  vector<T>& v).. 
0820: 7b 20 6f 73 20 3c 3c 20 22 7b 20 22 3b 0d 0a 20  { os << "{ ";.. 
0830: 20 20 66 6f 72 28 74 79 70 65 6e 61 6d 65 20 76    for(typename v
0840: 65 63 74 6f 72 3c 54 3e 3a 3a 63 6f 6e 73 74 5f  ector<T>::const_
0850: 69 74 65 72 61 74 6f 72 20 69 74 3d 76 2e 62 65  iterator it=v.be
0860: 67 69 6e 28 29 3b 20 69 74 21 3d 76 2e 65 6e 64  gin(); it!=v.end
0870: 28 29 3b 20 2b 2b 69 74 29 0d 0a 20 20 20 6f 73  (); ++it)..   os
0880: 20 3c 3c 20 27 5c 22 27 20 3c 3c 20 2a 69 74 20   << '\"' << *it 
0890: 3c 3c 20 27 5c 22 27 20 3c 3c 20 28 69 74 2b 31  << '\"' << (it+1
08a0: 3d 3d 76 2e 65 6e 64 28 29 20 3f 20 22 22 20 3a  ==v.end() ? "" :
08b0: 20 22 2c 20 22 29 3b 20 6f 73 20 3c 3c 20 22 20   ", "); os << " 
08c0: 7d 22 3b 20 72 65 74 75 72 6e 20 6f 73 3b 20 7d  }"; return os; }
08d0: 0d 0a 76 6f 69 64 20 76 65 72 69 66 79 5f 63 61  ..void verify_ca
08e0: 73 65 28 63 6f 6e 73 74 20 64 6f 75 62 6c 65 26  se(const double&
08f0: 20 45 78 70 65 63 74 65 64 2c 20 63 6f 6e 73 74   Expected, const
0900: 20 64 6f 75 62 6c 65 26 20 52 65 63 65 69 76 65   double& Receive
0910: 64 29 20 7b 0d 0a 20 62 6f 6f 6c 20 6f 6b 20 3d  d) {.. bool ok =
0920: 20 28 61 62 73 28 45 78 70 65 63 74 65 64 20 2d   (abs(Expected -
0930: 20 52 65 63 65 69 76 65 64 29 20 3c 20 31 65 2d   Received) < 1e-
0940: 39 29 3b 0d 0a 20 69 66 28 6f 6b 29 20 63 65 72  9);.. if(ok) cer
0950: 72 20 3c 3c 20 22 50 41 53 53 45 44 22 20 3c 3c  r << "PASSED" <<
0960: 20 74 69 6d 65 72 28 29 20 3c 3c 20 65 6e 64 6c   timer() << endl
0970: 3b 20 20 65 6c 73 65 20 7b 20 63 65 72 72 20 3c  ;  else { cerr <
0980: 3c 20 22 46 41 49 4c 45 44 22 20 3c 3c 20 74 69  < "FAILED" << ti
0990: 6d 65 72 28 29 20 3c 3c 20 65 6e 64 6c 3b 0d 0a  mer() << endl;..
09a0: 20 63 65 72 72 20 3c 3c 20 22 5c 74 6f 3a 20 5c   cerr << "\to: \
09b0: 22 22 20 3c 3c 20 45 78 70 65 63 74 65 64 20 3c  "" << Expected <
09c0: 3c 20 27 5c 22 27 20 3c 3c 20 65 6e 64 6c 20 3c  < '\"' << endl <
09d0: 3c 20 22 5c 74 78 3a 20 5c 22 22 20 3c 3c 20 52  < "\tx: \"" << R
09e0: 65 63 65 69 76 65 64 20 3c 3c 20 27 5c 22 27 20  eceived << '\"' 
09f0: 3c 3c 20 65 6e 64 6c 3b 20 7d 20 7d 0d 0a 23 64  << endl; } }..#d
0a00: 65 66 69 6e 65 20 43 41 53 45 28 4e 29 20 7b 63  efine CASE(N) {c
0a10: 65 72 72 20 3c 3c 20 22 54 65 73 74 20 43 61 73  err << "Test Cas
0a20: 65 20 23 22 20 3c 3c 20 4e 20 3c 3c 20 22 2e 2e  e #" << N << "..
0a30: 2e 22 20 3c 3c 20 66 6c 75 73 68 3b 20 73 74 61  ." << flush; sta
0a40: 72 74 5f 74 69 6d 65 3d 63 6c 6f 63 6b 28 29 3b  rt_time=clock();
0a50: 0d 0a 23 64 65 66 69 6e 65 20 45 4e 44 09 20 76  ..#define END. v
0a60: 65 72 69 66 79 5f 63 61 73 65 28 5f 2c 20 52 61  erify_case(_, Ra
0a70: 62 62 69 74 53 74 65 70 70 69 6e 67 28 29 2e 67  bbitStepping().g
0a80: 65 74 45 78 70 65 63 74 65 64 28 66 69 65 6c 64  etExpected(field
0a90: 2c 20 72 29 29 3b 7d 0d 0a 69 6e 74 20 6d 61 69  , r));}..int mai
0aa0: 6e 28 29 7b 0d 0a 0d 0a 43 41 53 45 28 30 29 0d  n(){....CASE(0).
0ab0: 0a 09 73 74 72 69 6e 67 20 66 69 65 6c 64 20 3d  ..string field =
0ac0: 20 22 57 52 42 52 57 22 3b 20 0d 0a 09 69 6e 74   "WRBRW"; ...int
0ad0: 20 72 20 3d 20 34 3b 20 0d 0a 09 64 6f 75 62 6c   r = 4; ...doubl
0ae0: 65 20 5f 20 3d 20 30 2e 38 3b 20 0d 0a 45 4e 44  e _ = 0.8; ..END
0af0: 0d 0a 43 41 53 45 28 31 29 0d 0a 09 73 74 72 69  ..CASE(1)...stri
0b00: 6e 67 20 66 69 65 6c 64 20 3d 20 22 57 57 42 22  ng field = "WWB"
0b10: 3b 20 0d 0a 09 69 6e 74 20 72 20 3d 20 32 3b 20  ; ...int r = 2; 
0b20: 0d 0a 09 64 6f 75 62 6c 65 20 5f 20 3d 20 31 2e  ...double _ = 1.
0b30: 33 33 33 33 33 33 33 33 33 33 33 33 33 33 33 33  3333333333333333
0b40: 3b 20 0d 0a 45 4e 44 0d 0a 43 41 53 45 28 32 29  ; ..END..CASE(2)
0b50: 0d 0a 09 73 74 72 69 6e 67 20 66 69 65 6c 64 20  ...string field 
0b60: 3d 20 22 57 57 22 3b 20 0d 0a 09 69 6e 74 20 72  = "WW"; ...int r
0b70: 20 3d 20 31 3b 20 0d 0a 09 64 6f 75 62 6c 65 20   = 1; ...double 
0b80: 5f 20 3d 20 31 2e 30 3b 20 0d 0a 45 4e 44 0d 0a  _ = 1.0; ..END..
0b90: 43 41 53 45 28 33 29 0d 0a 09 73 74 72 69 6e 67  CASE(3)...string
0ba0: 20 66 69 65 6c 64 20 3d 20 22 42 42 42 42 42 42   field = "BBBBBB
0bb0: 42 42 42 42 22 3b 20 0d 0a 09 69 6e 74 20 72 20  BBBB"; ...int r 
0bc0: 3d 20 34 3b 20 0d 0a 09 64 6f 75 62 6c 65 20 5f  = 4; ...double _
0bd0: 20 3d 20 30 2e 39 35 32 33 38 30 39 35 32 33 38   = 0.95238095238
0be0: 30 39 35 32 33 3b 20 0d 0a 45 4e 44 0d 0a 43 41  09523; ..END..CA
0bf0: 53 45 28 34 29 0d 0a 09 73 74 72 69 6e 67 20 66  SE(4)...string f
0c00: 69 65 6c 64 20 3d 20 22 52 52 42 52 52 57 52 52  ield = "RRBRRWRR
0c10: 42 52 52 57 22 3b 20 0d 0a 09 69 6e 74 20 72 20  BRRW"; ...int r 
0c20: 3d 20 38 3b 20 0d 0a 09 64 6f 75 62 6c 65 20 5f  = 8; ...double _
0c30: 20 3d 20 30 2e 39 36 39 36 39 36 39 36 39 36 39   = 0.96969696969
0c40: 36 39 36 39 37 3b 20 0d 0a 45 4e 44 0d 0a 43 41  69697; ..END..CA
0c50: 53 45 28 35 29 0d 0a 09 73 74 72 69 6e 67 20 66  SE(5)...string f
0c60: 69 65 6c 64 20 3d 20 22 52 52 52 52 52 52 52 52  ield = "RRRRRRRR
0c70: 52 52 52 52 52 52 52 52 52 22 3b 20 0d 0a 09 69  RRRRRRRRR"; ...i
0c80: 6e 74 20 72 20 3d 20 38 3b 20 0d 0a 09 64 6f 75  nt r = 8; ...dou
0c90: 62 6c 65 20 5f 20 3d 20 2d 31 3b 20 0d 0a 45 4e  ble _ = -1; ..EN
0ca0: 44 0d 0a 43 41 53 45 28 36 29 0d 0a 09 73 74 72  D..CASE(6)...str
0cb0: 69 6e 67 20 66 69 65 6c 64 20 3d 20 22 42 42 42  ing field = "BBB
0cc0: 42 42 42 42 42 42 42 42 42 42 42 42 42 42 22 3b  BBBBBBBBBBBBBB";
0cd0: 20 0d 0a 09 69 6e 74 20 72 20 3d 20 38 3b 20 0d   ...int r = 8; .
0ce0: 0a 09 64 6f 75 62 6c 65 20 5f 20 3d 20 2d 31 3b  ..double _ = -1;
0cf0: 20 0d 0a 45 4e 44 0d 0a 43 41 53 45 28 37 29 0d   ..END..CASE(7).
0d00: 0a 09 73 74 72 69 6e 67 20 66 69 65 6c 64 20 3d  ..string field =
0d10: 20 22 57 57 57 57 57 57 57 57 57 57 57 57 57 57   "WWWWWWWWWWWWWW
0d20: 57 57 57 22 3b 20 0d 0a 09 69 6e 74 20 72 20 3d  WWW"; ...int r =
0d30: 20 38 3b 20 0d 0a 09 64 6f 75 62 6c 65 20 5f 20   8; ...double _ 
0d40: 3d 20 2d 31 3b 20 0d 0a 45 4e 44 0d 0a 43 41 53  = -1; ..END..CAS
0d50: 45 28 38 29 0d 0a 09 73 74 72 69 6e 67 20 66 69  E(8)...string fi
0d60: 65 6c 64 20 3d 20 22 42 57 42 57 42 57 42 57 42  eld = "BWBWBWBWB
0d70: 57 42 57 42 57 42 57 42 22 3b 20 0d 0a 09 69 6e  WBWBWBWB"; ...in
0d80: 74 20 72 20 3d 20 38 3b 20 0d 0a 09 64 6f 75 62  t r = 8; ...doub
0d90: 6c 65 20 5f 20 3d 20 2d 31 3b 20 0d 0a 45 4e 44  le _ = -1; ..END
0da0: 0d 0a 43 41 53 45 28 39 29 0d 0a 09 73 74 72 69  ..CASE(9)...stri
0db0: 6e 67 20 66 69 65 6c 64 20 3d 20 22 52 52 22 3b  ng field = "RR";
0dc0: 20 0d 0a 09 69 6e 74 20 72 20 3d 20 32 3b 20 0d   ...int r = 2; .
0dd0: 0a 09 64 6f 75 62 6c 65 20 5f 20 3d 20 32 3b 20  ..double _ = 2; 
0de0: 0d 0a 45 4e 44 0d 0a 43 41 53 45 28 39 29 0d 0a  ..END..CASE(9)..
0df0: 09 73 74 72 69 6e 67 20 66 69 65 6c 64 20 3d 20  .string field = 
0e00: 22 52 52 22 3b 20 0d 0a 09 69 6e 74 20 72 20 3d  "RR"; ...int r =
0e10: 20 31 3b 20 0d 0a 09 64 6f 75 62 6c 65 20 5f 20   1; ...double _ 
0e20: 3d 20 31 3b 20 0d 0a 45 4e 44 0d 0a 43 41 53 45  = 1; ..END..CASE
0e30: 28 39 29 0d 0a 09 73 74 72 69 6e 67 20 66 69 65  (9)...string fie
0e40: 6c 64 20 3d 20 22 42 52 57 57 42 52 42 57 42 57  ld = "BRWWBRBWBW
0e50: 42 57 42 52 42 57 52 22 3b 20 0d 0a 09 69 6e 74  BWBRBWR"; ...int
0e60: 20 72 20 3d 20 31 3b 20 0d 0a 09 64 6f 75 62 6c   r = 1; ...doubl
0e70: 65 20 5f 20 3d 20 31 3b 20 0d 0a 45 4e 44 0d 0a  e _ = 1; ..END..
0e80: 7d 0d 0a 2f 2f 20 45 4e 44 20 43 55 54 20 48 45  }..// END CUT HE
0e90: 52 45 0d 0a                                      RE..