Artifact 18e652cfb8226cd8700c11531c56d2b24fc5d81e:
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 74 75 70 6c 65 3e 0d 0a 75 73 69 6e 67 20 6e <tuple>..using n
0150: 61 6d 65 73 70 61 63 65 20 73 74 64 3b 0d 0a 74 amespace std;..t
0160: 79 70 65 64 65 66 20 6c 6f 6e 67 20 6c 6f 6e 67 ypedef long long
0170: 20 4c 4c 3b 0d 0a 74 79 70 65 64 65 66 20 63 6f LL;..typedef co
0180: 6d 70 6c 65 78 3c 64 6f 75 62 6c 65 3e 20 43 4d mplex<double> CM
0190: 50 3b 0d 0a 0d 0a 69 6e 74 20 67 63 64 28 69 6e P;....int gcd(in
01a0: 74 20 61 2c 20 69 6e 74 20 62 29 0d 0a 7b 0d 0a t a, int b)..{..
01b0: 09 77 68 69 6c 65 28 61 29 0d 0a 09 09 73 77 61 .while(a)....swa
01c0: 70 28 61 2c 20 62 25 3d 61 29 3b 0d 0a 09 72 65 p(a, b%=a);...re
01d0: 74 75 72 6e 20 62 3b 0d 0a 7d 0d 0a 0d 0a 63 6c turn b;..}....cl
01e0: 61 73 73 20 46 69 6e 64 50 6f 6c 79 67 6f 6e 73 ass FindPolygons
01f0: 20 7b 20 70 75 62 6c 69 63 3a 0d 0a 09 64 6f 75 { public:...dou
0200: 62 6c 65 20 6d 69 6e 69 6d 75 6d 50 6f 6c 79 67 ble minimumPolyg
0210: 6f 6e 28 69 6e 74 20 4c 29 0d 0a 09 7b 0d 0a 09 on(int L)...{...
0220: 09 69 66 28 4c 3c 3d 32 29 0d 0a 09 09 09 72 65 .if(L<=2).....re
0230: 74 75 72 6e 20 2d 31 3b 0d 0a 09 09 69 66 28 4c turn -1;....if(L
0240: 25 32 3d 3d 31 29 20 2f 2f 20 65 75 63 6c 69 64 %2==1) // euclid
0250: 25 32 20 3d 3d 20 6d 61 6e 68 61 74 74 61 6e 25 %2 == manhattan%
0260: 32 2e 20 74 6f 75 72 20 69 73 20 61 6c 77 61 79 2. tour is alway
0270: 73 20 65 76 65 6e 2e 0d 0a 09 09 09 72 65 74 75 s even......retu
0280: 72 6e 20 2d 31 3b 0d 0a 0d 0a 09 09 6d 61 70 3c rn -1;......map<
0290: 69 6e 74 2c 20 76 65 63 74 6f 72 3c 70 61 69 72 int, vector<pair
02a0: 3c 69 6e 74 2c 69 6e 74 3e 3e 3e 20 70 79 74 3b <int,int>>> pyt;
02b0: 0d 0a 09 09 66 6f 72 28 69 6e 74 20 6b 3d 31 3b ....for(int k=1;
02c0: 20 6b 3c 3d 4c 3b 20 2b 2b 6b 29 20 7b 0d 0a 09 k<=L; ++k) {...
02d0: 09 09 61 75 74 6f 26 20 70 6b 20 3d 20 70 79 74 ..auto& pk = pyt
02e0: 5b 6b 5d 3b 0d 0a 09 09 09 70 6b 2e 65 6d 70 6c [k];.....pk.empl
02f0: 61 63 65 5f 62 61 63 6b 28 30 2c 20 6b 29 3b 0d ace_back(0, k);.
0300: 0a 09 09 09 70 6b 2e 65 6d 70 6c 61 63 65 5f 62 ....pk.emplace_b
0310: 61 63 6b 28 6b 2c 20 30 29 3b 0d 0a 09 09 09 70 ack(k, 0);.....p
0320: 6b 2e 65 6d 70 6c 61 63 65 5f 62 61 63 6b 28 30 k.emplace_back(0
0330: 2c 20 2d 6b 29 3b 0d 0a 09 09 09 70 6b 2e 65 6d , -k);.....pk.em
0340: 70 6c 61 63 65 5f 62 61 63 6b 28 2d 6b 2c 20 30 place_back(-k, 0
0350: 29 3b 0d 0a 09 09 7d 0d 0a 09 09 66 6f 72 28 69 );....}....for(i
0360: 6e 74 20 6d 3d 31 3b 20 6d 2a 6d 3c 3d 4c 2f 32 nt m=1; m*m<=L/2
0370: 3b 20 2b 2b 6d 29 0d 0a 09 09 09 66 6f 72 28 69 ; ++m).....for(i
0380: 6e 74 20 6e 3d 31 3b 20 6e 3c 6d 20 26 26 20 6d nt n=1; n<m && m
0390: 2a 6d 2b 6e 2a 6e 3c 3d 4c 2f 32 3b 20 2b 2b 6e *m+n*n<=L/2; ++n
03a0: 29 0d 0a 09 09 09 09 69 66 28 28 28 6d 5e 6e 29 )......if(((m^n)
03b0: 26 31 29 20 26 26 20 67 63 64 28 6d 2c 6e 29 3d &1) && gcd(m,n)=
03c0: 3d 31 29 20 7b 0d 0a 09 09 09 09 09 69 6e 74 20 =1) {.......int
03d0: 61 20 3d 20 6d 2a 6d 2d 6e 2a 6e 2c 20 62 20 3d a = m*m-n*n, b =
03e0: 20 32 2a 6d 2a 6e 2c 20 63 20 3d 20 6d 2a 6d 2b 2*m*n, c = m*m+
03f0: 6e 2a 6e 3b 0d 0a 09 09 09 09 09 66 6f 72 28 69 n*n;.......for(i
0400: 6e 74 20 6b 3d 31 3b 20 6b 2a 63 3c 3d 4c 3b 20 nt k=1; k*c<=L;
0410: 2b 2b 6b 29 20 7b 0d 0a 09 09 09 09 09 09 61 75 ++k) {........au
0420: 74 6f 26 20 70 6b 20 3d 20 70 79 74 5b 6b 2a 63 to& pk = pyt[k*c
0430: 5d 3b 0d 0a 09 09 09 09 09 09 70 6b 2e 65 6d 70 ];........pk.emp
0440: 6c 61 63 65 5f 62 61 63 6b 28 6b 2a 61 2c 20 6b lace_back(k*a, k
0450: 2a 62 29 3b 0d 0a 09 09 09 09 09 09 70 6b 2e 65 *b);........pk.e
0460: 6d 70 6c 61 63 65 5f 62 61 63 6b 28 6b 2a 61 2c mplace_back(k*a,
0470: 20 2d 6b 2a 62 29 3b 0d 0a 09 09 09 09 09 09 70 -k*b);........p
0480: 6b 2e 65 6d 70 6c 61 63 65 5f 62 61 63 6b 28 2d k.emplace_back(-
0490: 6b 2a 61 2c 20 6b 2a 62 29 3b 0d 0a 09 09 09 09 k*a, k*b);......
04a0: 09 09 70 6b 2e 65 6d 70 6c 61 63 65 5f 62 61 63 ..pk.emplace_bac
04b0: 6b 28 2d 6b 2a 61 2c 20 2d 6b 2a 62 29 3b 0d 0a k(-k*a, -k*b);..
04c0: 09 09 09 09 09 09 70 6b 2e 65 6d 70 6c 61 63 65 ......pk.emplace
04d0: 5f 62 61 63 6b 28 6b 2a 62 2c 20 6b 2a 61 29 3b _back(k*b, k*a);
04e0: 0d 0a 09 09 09 09 09 09 70 6b 2e 65 6d 70 6c 61 ........pk.empla
04f0: 63 65 5f 62 61 63 6b 28 6b 2a 62 2c 20 2d 6b 2a ce_back(k*b, -k*
0500: 61 29 3b 0d 0a 09 09 09 09 09 09 70 6b 2e 65 6d a);........pk.em
0510: 70 6c 61 63 65 5f 62 61 63 6b 28 2d 6b 2a 62 2c place_back(-k*b,
0520: 20 6b 2a 61 29 3b 0d 0a 09 09 09 09 09 09 70 6b k*a);........pk
0530: 2e 65 6d 70 6c 61 63 65 5f 62 61 63 6b 28 2d 6b .emplace_back(-k
0540: 2a 62 2c 20 2d 6b 2a 61 29 3b 0d 0a 09 09 09 09 *b, -k*a);......
0550: 09 7d 0d 0a 09 09 09 09 7d 0d 0a 0d 0a 09 09 2f .}......}....../
0560: 2f 20 54 72 69 61 6e 67 6c 65 0d 0a 09 09 69 6e / Triangle....in
0570: 74 20 62 65 73 74 20 3d 20 4c 3b 0d 0a 09 09 66 t best = L;....f
0580: 6f 72 28 69 6e 74 20 61 3d 31 3b 20 61 2a 33 3c or(int a=1; a*3<
0590: 3d 4c 3b 20 2b 2b 61 29 0d 0a 09 09 09 66 6f 72 =L; ++a).....for
05a0: 28 69 6e 74 20 62 3d 61 3b 20 61 2b 62 2a 32 3c (int b=a; a+b*2<
05b0: 3d 4c 3b 20 2b 2b 62 29 0d 0a 09 09 09 7b 0d 0a =L; ++b).....{..
05c0: 09 09 09 09 69 6e 74 20 63 20 3d 20 4c 2d 61 2d ....int c = L-a-
05d0: 62 3b 0d 0a 0d 0a 09 09 09 09 66 6f 72 28 61 75 b;........for(au
05e0: 74 6f 26 20 61 76 20 3a 20 70 79 74 5b 61 5d 29 to& av : pyt[a])
05f0: 0d 0a 09 09 09 09 7b 0d 0a 09 09 09 09 09 69 6e ......{.......in
0600: 74 20 61 78 3d 61 76 2e 66 69 72 73 74 3b 0d 0a t ax=av.first;..
0610: 09 09 09 09 09 69 6e 74 20 61 79 3d 61 76 2e 73 .....int ay=av.s
0620: 65 63 6f 6e 64 3b 0d 0a 09 09 09 09 09 69 66 28 econd;.......if(
0630: 61 78 3e 3d 30 20 26 26 20 61 79 3e 3d 30 29 0d ax>=0 && ay>=0).
0640: 0a 09 09 09 09 09 66 6f 72 28 61 75 74 6f 26 20 ......for(auto&
0650: 62 76 20 3a 20 70 79 74 5b 62 5d 29 0d 0a 09 09 bv : pyt[b])....
0660: 09 09 09 7b 0d 0a 09 09 09 09 09 09 69 6e 74 20 ...{........int
0670: 62 78 3d 62 76 2e 66 69 72 73 74 3b 0d 0a 09 09 bx=bv.first;....
0680: 09 09 09 09 69 6e 74 20 62 79 3d 62 76 2e 73 65 ....int by=bv.se
0690: 63 6f 6e 64 3b 0d 0a 09 09 09 09 09 09 69 6e 74 cond;........int
06a0: 20 63 78 3d 2d 61 78 2d 62 78 3b 0d 0a 09 09 09 cx=-ax-bx;.....
06b0: 09 09 09 69 6e 74 20 63 79 3d 2d 61 79 2d 62 79 ...int cy=-ay-by
06c0: 3b 0d 0a 09 09 09 09 09 09 69 66 28 61 78 2a 62 ;........if(ax*b
06d0: 79 21 3d 61 79 2a 62 78 20 26 26 20 63 78 2a 63 y!=ay*bx && cx*c
06e0: 78 2b 63 79 2a 63 79 20 3d 3d 20 63 2a 63 29 20 x+cy*cy == c*c)
06f0: 7b 0d 0a 09 09 09 09 09 09 09 62 65 73 74 20 3d {.........best =
0700: 20 6d 69 6e 28 62 65 73 74 2c 20 63 2d 61 29 3b min(best, c-a);
0710: 0d 0a 09 09 09 09 09 09 09 62 72 65 61 6b 3b 0d .........break;.
0720: 0a 09 09 09 09 09 09 7d 0d 0a 09 09 09 09 09 7d .......}.......}
0730: 0d 0a 09 09 09 09 7d 0d 0a 09 09 09 7d 0d 0a 09 ......}.....}...
0740: 09 69 66 28 62 65 73 74 20 3c 20 4c 29 0d 0a 09 .if(best < L)...
0750: 09 09 72 65 74 75 72 6e 20 62 65 73 74 3b 0d 0a ..return best;..
0760: 09 09 2f 2f 20 52 65 63 74 61 6e 67 6c 65 0d 0a ..// Rectangle..
0770: 09 09 69 66 28 4c 25 34 3d 3d 30 29 0d 0a 09 09 ..if(L%4==0)....
0780: 09 72 65 74 75 72 6e 20 30 3b 0d 0a 09 09 72 65 .return 0;....re
0790: 74 75 72 6e 20 31 3b 0d 0a 09 7d 0d 0a 7d 3b 0d turn 1;...}..};.
07a0: 0a 0d 0a 2f 2f 20 42 45 47 49 4e 20 43 55 54 20 ...// BEGIN CUT
07b0: 48 45 52 45 0d 0a 23 69 6e 63 6c 75 64 65 20 3c HERE..#include <
07c0: 63 74 69 6d 65 3e 0d 0a 64 6f 75 62 6c 65 20 73 ctime>..double s
07d0: 74 61 72 74 5f 74 69 6d 65 3b 20 73 74 72 69 6e tart_time; strin
07e0: 67 20 74 69 6d 65 72 28 29 0d 0a 20 7b 20 6f 73 g timer().. { os
07f0: 74 72 69 6e 67 73 74 72 65 61 6d 20 6f 73 3b 20 tringstream os;
0800: 6f 73 20 3c 3c 20 22 20 28 22 20 3c 3c 20 69 6e os << " (" << in
0810: 74 28 28 63 6c 6f 63 6b 28 29 2d 73 74 61 72 74 t((clock()-start
0820: 5f 74 69 6d 65 29 2f 43 4c 4f 43 4b 53 5f 50 45 _time)/CLOCKS_PE
0830: 52 5f 53 45 43 2a 31 30 30 30 29 20 3c 3c 20 22 R_SEC*1000) << "
0840: 20 6d 73 65 63 29 22 3b 20 72 65 74 75 72 6e 20 msec)"; return
0850: 6f 73 2e 73 74 72 28 29 3b 20 7d 0d 0a 74 65 6d os.str(); }..tem
0860: 70 6c 61 74 65 3c 74 79 70 65 6e 61 6d 65 20 54 plate<typename T
0870: 3e 20 6f 73 74 72 65 61 6d 26 20 6f 70 65 72 61 > ostream& opera
0880: 74 6f 72 3c 3c 28 6f 73 74 72 65 61 6d 26 20 6f tor<<(ostream& o
0890: 73 2c 20 63 6f 6e 73 74 20 76 65 63 74 6f 72 3c s, const vector<
08a0: 54 3e 26 20 76 29 0d 0a 20 7b 20 6f 73 20 3c 3c T>& v).. { os <<
08b0: 20 22 7b 20 22 3b 0d 0a 20 20 20 66 6f 72 28 74 "{ ";.. for(t
08c0: 79 70 65 6e 61 6d 65 20 76 65 63 74 6f 72 3c 54 ypename vector<T
08d0: 3e 3a 3a 63 6f 6e 73 74 5f 69 74 65 72 61 74 6f >::const_iterato
08e0: 72 20 69 74 3d 76 2e 62 65 67 69 6e 28 29 3b 20 r it=v.begin();
08f0: 69 74 21 3d 76 2e 65 6e 64 28 29 3b 20 2b 2b 69 it!=v.end(); ++i
0900: 74 29 0d 0a 20 20 20 6f 73 20 3c 3c 20 27 5c 22 t).. os << '\"
0910: 27 20 3c 3c 20 2a 69 74 20 3c 3c 20 27 5c 22 27 ' << *it << '\"'
0920: 20 3c 3c 20 28 69 74 2b 31 3d 3d 76 2e 65 6e 64 << (it+1==v.end
0930: 28 29 20 3f 20 22 22 20 3a 20 22 2c 20 22 29 3b () ? "" : ", ");
0940: 20 6f 73 20 3c 3c 20 22 20 7d 22 3b 20 72 65 74 os << " }"; ret
0950: 75 72 6e 20 6f 73 3b 20 7d 0d 0a 76 6f 69 64 20 urn os; }..void
0960: 76 65 72 69 66 79 5f 63 61 73 65 28 63 6f 6e 73 verify_case(cons
0970: 74 20 64 6f 75 62 6c 65 26 20 45 78 70 65 63 74 t double& Expect
0980: 65 64 2c 20 63 6f 6e 73 74 20 64 6f 75 62 6c 65 ed, const double
0990: 26 20 52 65 63 65 69 76 65 64 29 20 7b 0d 0a 20 & Received) {..
09a0: 62 6f 6f 6c 20 6f 6b 20 3d 20 28 61 62 73 28 45 bool ok = (abs(E
09b0: 78 70 65 63 74 65 64 20 2d 20 52 65 63 65 69 76 xpected - Receiv
09c0: 65 64 29 20 3c 20 31 65 2d 39 29 3b 0d 0a 20 69 ed) < 1e-9);.. i
09d0: 66 28 6f 6b 29 20 63 65 72 72 20 3c 3c 20 22 50 f(ok) cerr << "P
09e0: 41 53 53 45 44 22 20 3c 3c 20 74 69 6d 65 72 28 ASSED" << timer(
09f0: 29 20 3c 3c 20 65 6e 64 6c 3b 20 20 65 6c 73 65 ) << endl; else
0a00: 20 7b 20 63 65 72 72 20 3c 3c 20 22 46 41 49 4c { cerr << "FAIL
0a10: 45 44 22 20 3c 3c 20 74 69 6d 65 72 28 29 20 3c ED" << timer() <
0a20: 3c 20 65 6e 64 6c 3b 0d 0a 20 63 65 72 72 20 3c < endl;.. cerr <
0a30: 3c 20 22 5c 74 6f 3a 20 5c 22 22 20 3c 3c 20 45 < "\to: \"" << E
0a40: 78 70 65 63 74 65 64 20 3c 3c 20 27 5c 22 27 20 xpected << '\"'
0a50: 3c 3c 20 65 6e 64 6c 20 3c 3c 20 22 5c 74 78 3a << endl << "\tx:
0a60: 20 5c 22 22 20 3c 3c 20 52 65 63 65 69 76 65 64 \"" << Received
0a70: 20 3c 3c 20 27 5c 22 27 20 3c 3c 20 65 6e 64 6c << '\"' << endl
0a80: 3b 20 7d 20 7d 0d 0a 23 64 65 66 69 6e 65 20 43 ; } }..#define C
0a90: 41 53 45 28 4e 29 20 7b 63 65 72 72 20 3c 3c 20 ASE(N) {cerr <<
0aa0: 22 54 65 73 74 20 43 61 73 65 20 23 22 20 3c 3c "Test Case #" <<
0ab0: 20 4e 20 3c 3c 20 22 2e 2e 2e 22 20 3c 3c 20 66 N << "..." << f
0ac0: 6c 75 73 68 3b 20 73 74 61 72 74 5f 74 69 6d 65 lush; start_time
0ad0: 3d 63 6c 6f 63 6b 28 29 3b 0d 0a 23 64 65 66 69 =clock();..#defi
0ae0: 6e 65 20 45 4e 44 09 20 76 65 72 69 66 79 5f 63 ne END. verify_c
0af0: 61 73 65 28 5f 2c 20 46 69 6e 64 50 6f 6c 79 67 ase(_, FindPolyg
0b00: 6f 6e 73 28 29 2e 6d 69 6e 69 6d 75 6d 50 6f 6c ons().minimumPol
0b10: 79 67 6f 6e 28 4c 29 29 3b 7d 0d 0a 69 6e 74 20 ygon(L));}..int
0b20: 6d 61 69 6e 28 29 7b 0d 0a 43 41 53 45 28 30 29 main(){..CASE(0)
0b30: 0d 0a 09 69 6e 74 20 4c 20 3d 20 34 3b 20 0d 0a ...int L = 4; ..
0b40: 09 64 6f 75 62 6c 65 20 5f 20 3d 20 30 2e 30 3b .double _ = 0.0;
0b50: 20 0d 0a 45 4e 44 0d 0a 43 41 53 45 28 31 29 0d ..END..CASE(1).
0b60: 0a 09 69 6e 74 20 4c 20 3d 20 35 3b 20 0d 0a 09 ..int L = 5; ...
0b70: 64 6f 75 62 6c 65 20 5f 20 3d 20 2d 31 2e 30 3b double _ = -1.0;
0b80: 20 0d 0a 45 4e 44 0d 0a 43 41 53 45 28 32 29 0d ..END..CASE(2).
0b90: 0a 09 69 6e 74 20 4c 20 3d 20 31 32 3b 20 0d 0a ..int L = 12; ..
0ba0: 09 64 6f 75 62 6c 65 20 5f 20 3d 20 32 2e 30 3b .double _ = 2.0;
0bb0: 20 0d 0a 45 4e 44 0d 0a 43 41 53 45 28 33 29 0d ..END..CASE(3).
0bc0: 0a 09 69 6e 74 20 4c 20 3d 20 34 39 38 34 3b 20 ..int L = 4984;
0bd0: 0d 0a 09 64 6f 75 62 6c 65 20 5f 20 3d 20 38 31 ...double _ = 81
0be0: 39 2e 30 3b 20 0d 0a 45 4e 44 0d 0a 43 41 53 45 9.0; ..END..CASE
0bf0: 28 34 29 0d 0a 09 69 6e 74 20 4c 20 3d 20 35 30 (4)...int L = 50
0c00: 30 30 3b 20 0d 0a 09 64 6f 75 62 6c 65 20 5f 20 00; ...double _
0c10: 3d 20 2d 39 39 39 3b 20 0d 0a 45 4e 44 0d 0a 43 = -999; ..END..C
0c20: 41 53 45 28 34 29 0d 0a 09 69 6e 74 20 4c 20 3d ASE(4)...int L =
0c30: 20 32 30 3b 20 0d 0a 09 64 6f 75 62 6c 65 20 5f 20; ...double _
0c40: 20 3d 20 2d 39 39 39 3b 20 0d 0a 45 4e 44 0d 0a = -999; ..END..
0c50: 2f 2a 0d 0a 43 41 53 45 28 35 29 0d 0a 09 69 6e /*..CASE(5)...in
0c60: 74 20 4c 20 3d 20 3b 20 0d 0a 09 64 6f 75 62 6c t L = ; ...doubl
0c70: 65 20 5f 20 3d 20 3b 20 0d 0a 45 4e 44 0d 0a 2a e _ = ; ..END..*
0c80: 2f 0d 0a 7d 0d 0a 2f 2f 20 45 4e 44 20 43 55 54 /..}..// END CUT
0c90: 20 48 45 52 45 0d 0a HERE..