--| Copyright (c) 1993-2020 University of Southern California, Eiffel Software and contributors.
--| All rights reserved.
--| Your use of this work is governed under the terms of the GNU General
--| Public License version 2.

class TEST
create
	make

feature

	make (args: ARRAY [STRING])
		do
			weasel (args.item (1).to_integer, args.item (2).to_integer);
		end;

	weasel (count, len: INTEGER)
		local
			s1: STRING;
			s2: STRING;
			s3: STRING;
			s4: STRING;
			s5: STRING;
			s6: STRING;
			s7: STRING;
			s8: STRING;
			s9: STRING;
			s10: STRING;
			s11: STRING;
			s12: STRING;
			s13: STRING;
			s14: STRING;
			s15: STRING;
			s16: STRING;
			s17: STRING;
			s18: STRING;
			s19: STRING;
			s20: STRING;
			s21: STRING;
			s22: STRING;
			s23: STRING;
			s24: STRING;
			s25: STRING;
			s26: STRING;
			s27: STRING;
			s28: STRING;
			s29: STRING;
			s30: STRING;
			s31: STRING;
			s32: STRING;
			s33: STRING;
			s34: STRING;
			s35: STRING;
			s36: STRING;
			s37: STRING;
			s38: STRING;
			s39: STRING;
			s40: STRING;
			s41: STRING;
			s42: STRING;
			s43: STRING;
			s44: STRING;
			s45: STRING;
			s46: STRING;
			s47: STRING;
			s48: STRING;
			s49: STRING;
			s50: STRING;
			s51: STRING;
			s52: STRING;
			s53: STRING;
			s54: STRING;
			s55: STRING;
			s56: STRING;
			s57: STRING;
			s58: STRING;
			s59: STRING;
			s60: STRING;
			s61: STRING;
			s62: STRING;
			s63: STRING;
			s64: STRING;
			s65: STRING;
			s66: STRING;
			s67: STRING;
			s68: STRING;
			s69: STRING;
			s70: STRING;
			s71: STRING;
			s72: STRING;
			s73: STRING;
			s74: STRING;
			s75: STRING;
			s76: STRING;
			s77: STRING;
			s78: STRING;
			s79: STRING;
			s80: STRING;
			s81: STRING;
			s82: STRING;
			s83: STRING;
			s84: STRING;
			s85: STRING;
			s86: STRING;
			s87: STRING;
			s88: STRING;
			s89: STRING;
			s90: STRING;
			s91: STRING;
			s92: STRING;
			s93: STRING;
			s94: STRING;
			s95: STRING;
			s96: STRING;
			s97: STRING;
			s98: STRING;
			s99: STRING;
			s100: STRING;
			s101: STRING;
			s102: STRING;
			s103: STRING;
			s104: STRING;
			s105: STRING;
			s106: STRING;
			s107: STRING;
			s108: STRING;
			s109: STRING;
			s110: STRING;
			s111: STRING;
			s112: STRING;
			s113: STRING;
			s114: STRING;
			s115: STRING;
			s116: STRING;
			s117: STRING;
			s118: STRING;
			s119: STRING;
			s120: STRING;
			s121: STRING;
			s122: STRING;
			s123: STRING;
			s124: STRING;
			s125: STRING;
			s126: STRING;
			s127: STRING;
			s128: STRING;
			s129: STRING;
			s130: STRING;
			s131: STRING;
			s132: STRING;
			s133: STRING;
			s134: STRING;
			s135: STRING;
			s136: STRING;
			s137: STRING;
			s138: STRING;
			s139: STRING;
			s140: STRING;
			s141: STRING;
			s142: STRING;
			s143: STRING;
			s144: STRING;
			s145: STRING;
			s146: STRING;
			s147: STRING;
			s148: STRING;
			s149: STRING;
			s150: STRING;
			s151: STRING;
			s152: STRING;
			s153: STRING;
			s154: STRING;
			s155: STRING;
			s156: STRING;
			s157: STRING;
			s158: STRING;
			s159: STRING;
			s160: STRING;
			s161: STRING;
			s162: STRING;
			s163: STRING;
			s164: STRING;
			s165: STRING;
			s166: STRING;
			s167: STRING;
			s168: STRING;
			s169: STRING;
			s170: STRING;
			s171: STRING;
			s172: STRING;
			s173: STRING;
			s174: STRING;
			s175: STRING;
			s176: STRING;
			s177: STRING;
			s178: STRING;
			s179: STRING;
			s180: STRING;
			s181: STRING;
			s182: STRING;
			s183: STRING;
			s184: STRING;
			s185: STRING;
			s186: STRING;
			s187: STRING;
			s188: STRING;
			s189: STRING;
			s190: STRING;
			s191: STRING;
			s192: STRING;
			s193: STRING;
			s194: STRING;
			s195: STRING;
			s196: STRING;
			s197: STRING;
			s198: STRING;
			s199: STRING;
			s200: STRING;
			s201: STRING;
			s202: STRING;
			s203: STRING;
			s204: STRING;
			s205: STRING;
			s206: STRING;
			s207: STRING;
			s208: STRING;
			s209: STRING;
			s210: STRING;
			s211: STRING;
			s212: STRING;
			s213: STRING;
			s214: STRING;
			s215: STRING;
			s216: STRING;
			s217: STRING;
			s218: STRING;
			s219: STRING;
			s220: STRING;
			s221: STRING;
			s222: STRING;
			s223: STRING;
			s224: STRING;
			s225: STRING;
			s226: STRING;
			s227: STRING;
			s228: STRING;
			s229: STRING;
			s230: STRING;
			s231: STRING;
			s232: STRING;
			s233: STRING;
			s234: STRING;
			s235: STRING;
			s236: STRING;
			s237: STRING;
			s238: STRING;
			s239: STRING;
			s240: STRING;
			s241: STRING;
			s242: STRING;
			s243: STRING;
			s244: STRING;
			s245: STRING;
			s246: STRING;
			s247: STRING;
			s248: STRING;
			s249: STRING;
			s250: STRING;
			s251: STRING;
			s252: STRING;
			s253: STRING;
			s254: STRING;
			s255: STRING;
		do
		    	io.putstring ("Entering weasel: ");
			io.putint (count); io.new_line;
			if count > 0 then 
				create s1.make (len + 1) ;
				create s2.make (len + 2) ;
				create s3.make (len + 3) ;
				create s4.make (len + 4) ;
				create s5.make (len + 5) ;
				create s6.make (len + 6) ;
				create s7.make (len + 7) ;
				create s8.make (len + 8) ;
				create s9.make (len + 9) ;
				create s10.make (len + 10) ;
				create s11.make (len + 11) ;
				create s12.make (len + 12) ;
				create s13.make (len + 13) ;
				create s14.make (len + 14) ;
				create s15.make (len + 15) ;
				create s16.make (len + 16) ;
				create s17.make (len + 17) ;
				create s18.make (len + 18) ;
				create s19.make (len + 19) ;
				create s20.make (len + 20) ;
				create s21.make (len + 21) ;
				create s22.make (len + 22) ;
				create s23.make (len + 23) ;
				create s24.make (len + 24) ;
				create s25.make (len + 25) ;
				create s26.make (len + 26) ;
				create s27.make (len + 27) ;
				create s28.make (len + 28) ;
				create s29.make (len + 29) ;
				create s30.make (len + 30) ;
				create s31.make (len + 31) ;
				create s32.make (len + 32) ;
				create s33.make (len + 33) ;
				create s34.make (len + 34) ;
				create s35.make (len + 35) ;
				create s36.make (len + 36) ;
				create s37.make (len + 37) ;
				create s38.make (len + 38) ;
				create s39.make (len + 39) ;
				create s40.make (len + 40) ;
				create s41.make (len + 41) ;
				create s42.make (len + 42) ;
				create s43.make (len + 43) ;
				create s44.make (len + 44) ;
				create s45.make (len + 45) ;
				create s46.make (len + 46) ;
				create s47.make (len + 47) ;
				create s48.make (len + 48) ;
				create s49.make (len + 49) ;
				create s50.make (len + 50) ;
				create s51.make (len + 51) ;
				create s52.make (len + 52) ;
				create s53.make (len + 53) ;
				create s54.make (len + 54) ;
				create s55.make (len + 55) ;
				create s56.make (len + 56) ;
				create s57.make (len + 57) ;
				create s58.make (len + 58) ;
				create s59.make (len + 59) ;
				create s60.make (len + 60) ;
				create s61.make (len + 61) ;
				create s62.make (len + 62) ;
				create s63.make (len + 63) ;
				create s64.make (len + 64) ;
				create s65.make (len + 65) ;
				create s66.make (len + 66) ;
				create s67.make (len + 67) ;
				create s68.make (len + 68) ;
				create s69.make (len + 69) ;
				create s70.make (len + 70) ;
				create s71.make (len + 71) ;
				create s72.make (len + 72) ;
				create s73.make (len + 73) ;
				create s74.make (len + 74) ;
				create s75.make (len + 75) ;
				create s76.make (len + 76) ;
				create s77.make (len + 77) ;
				create s78.make (len + 78) ;
				create s79.make (len + 79) ;
				create s80.make (len + 80) ;
				create s81.make (len + 81) ;
				create s82.make (len + 82) ;
				create s83.make (len + 83) ;
				create s84.make (len + 84) ;
				create s85.make (len + 85) ;
				create s86.make (len + 86) ;
				create s87.make (len + 87) ;
				create s88.make (len + 88) ;
				create s89.make (len + 89) ;
				create s90.make (len + 90) ;
				create s91.make (len + 91) ;
				create s92.make (len + 92) ;
				create s93.make (len + 93) ;
				create s94.make (len + 94) ;
				create s95.make (len + 95) ;
				create s96.make (len + 96) ;
				create s97.make (len + 97) ;
				create s98.make (len + 98) ;
				create s99.make (len + 99) ;
				create s100.make (len + 100) ;
				create s101.make (len + 101) ;
				create s102.make (len + 102) ;
				create s103.make (len + 103) ;
				create s104.make (len + 104) ;
				create s105.make (len + 105) ;
				create s106.make (len + 106) ;
				create s107.make (len + 107) ;
				create s108.make (len + 108) ;
				create s109.make (len + 109) ;
				create s110.make (len + 110) ;
				create s111.make (len + 111) ;
				create s112.make (len + 112) ;
				create s113.make (len + 113) ;
				create s114.make (len + 114) ;
				create s115.make (len + 115) ;
				create s116.make (len + 116) ;
				create s117.make (len + 117) ;
				create s118.make (len + 118) ;
				create s119.make (len + 119) ;
				create s120.make (len + 120) ;
				create s121.make (len + 121) ;
				create s122.make (len + 122) ;
				create s123.make (len + 123) ;
				create s124.make (len + 124) ;
				create s125.make (len + 125) ;
				create s126.make (len + 126) ;
				create s127.make (len + 127) ;
				create s128.make (len + 128) ;
				create s129.make (len + 129) ;
				create s130.make (len + 130) ;
				create s131.make (len + 131) ;
				create s132.make (len + 132) ;
				create s133.make (len + 133) ;
				create s134.make (len + 134) ;
				create s135.make (len + 135) ;
				create s136.make (len + 136) ;
				create s137.make (len + 137) ;
				create s138.make (len + 138) ;
				create s139.make (len + 139) ;
				create s140.make (len + 140) ;
				create s141.make (len + 141) ;
				create s142.make (len + 142) ;
				create s143.make (len + 143) ;
				create s144.make (len + 144) ;
				create s145.make (len + 145) ;
				create s146.make (len + 146) ;
				create s147.make (len + 147) ;
				create s148.make (len + 148) ;
				create s149.make (len + 149) ;
				create s150.make (len + 150) ;
				create s151.make (len + 151) ;
				create s152.make (len + 152) ;
				create s153.make (len + 153) ;
				create s154.make (len + 154) ;
				create s155.make (len + 155) ;
				create s156.make (len + 156) ;
				create s157.make (len + 157) ;
				create s158.make (len + 158) ;
				create s159.make (len + 159) ;
				create s160.make (len + 160) ;
				create s161.make (len + 161) ;
				create s162.make (len + 162) ;
				create s163.make (len + 163) ;
				create s164.make (len + 164) ;
				create s165.make (len + 165) ;
				create s166.make (len + 166) ;
				create s167.make (len + 167) ;
				create s168.make (len + 168) ;
				create s169.make (len + 169) ;
				create s170.make (len + 170) ;
				create s171.make (len + 171) ;
				create s172.make (len + 172) ;
				create s173.make (len + 173) ;
				create s174.make (len + 174) ;
				create s175.make (len + 175) ;
				create s176.make (len + 176) ;
				create s177.make (len + 177) ;
				create s178.make (len + 178) ;
				create s179.make (len + 179) ;
				create s180.make (len + 180) ;
				create s181.make (len + 181) ;
				create s182.make (len + 182) ;
				create s183.make (len + 183) ;
				create s184.make (len + 184) ;
				create s185.make (len + 185) ;
				create s186.make (len + 186) ;
				create s187.make (len + 187) ;
				create s188.make (len + 188) ;
				create s189.make (len + 189) ;
				create s190.make (len + 190) ;
				create s191.make (len + 191) ;
				create s192.make (len + 192) ;
				create s193.make (len + 193) ;
				create s194.make (len + 194) ;
				create s195.make (len + 195) ;
				create s196.make (len + 196) ;
				create s197.make (len + 197) ;
				create s198.make (len + 198) ;
				create s199.make (len + 199) ;
				create s200.make (len + 200) ;
				create s201.make (len + 201) ;
				create s202.make (len + 202) ;
				create s203.make (len + 203) ;
				create s204.make (len + 204) ;
				create s205.make (len + 205) ;
				create s206.make (len + 206) ;
				create s207.make (len + 207) ;
				create s208.make (len + 208) ;
				create s209.make (len + 209) ;
				create s210.make (len + 210) ;
				create s211.make (len + 211) ;
				create s212.make (len + 212) ;
				create s213.make (len + 213) ;
				create s214.make (len + 214) ;
				create s215.make (len + 215) ;
				create s216.make (len + 216) ;
				create s217.make (len + 217) ;
				create s218.make (len + 218) ;
				create s219.make (len + 219) ;
				create s220.make (len + 220) ;
				create s221.make (len + 221) ;
				create s222.make (len + 222) ;
				create s223.make (len + 223) ;
				create s224.make (len + 224) ;
				create s225.make (len + 225) ;
				create s226.make (len + 226) ;
				create s227.make (len + 227) ;
				create s228.make (len + 228) ;
				create s229.make (len + 229) ;
				create s230.make (len + 230) ;
				create s231.make (len + 231) ;
				create s232.make (len + 232) ;
				create s233.make (len + 233) ;
				create s234.make (len + 234) ;
				create s235.make (len + 235) ;
				create s236.make (len + 236) ;
				create s237.make (len + 237) ;
				create s238.make (len + 238) ;
				create s239.make (len + 239) ;
				create s240.make (len + 240) ;
				create s241.make (len + 241) ;
				create s242.make (len + 242) ;
				create s243.make (len + 243) ;
				create s244.make (len + 244) ;
				create s245.make (len + 245) ;
				create s246.make (len + 246) ;
				create s247.make (len + 247) ;
				create s248.make (len + 248) ;
				create s249.make (len + 249) ;
				create s250.make (len + 250) ;
				create s251.make (len + 251) ;
				create s252.make (len + 252) ;
				create s253.make (len + 253) ;
				create s254.make (len + 254) ;
				create s255.make (len + 255);
				weasel (count - 1, len);
			end
		    	io.putstring ("Leaving weasel%N");
		end;

end