#$ Case 5 of late init environments. Ultra hard version.
# 8008
# 69
# 11111
# 8008
# 420
# True
# 8008
# 8008
# 420
# True
# 69
# 420
# 69
# 1337

class MyStr
	print-str (x _) -> Unit

MyConcatStr l r
	MyConcatStr l r

msp-const = 8008
inst MyStr MyConcatStr
	print-str (MyConcatStr(l, r)) -> Unit
		println(msp-const)
		print-str(l)
		print-str(r)
		return Unit

fn f (x) -> Unit
	int-const = 69
	inst MyStr I32
		print-str (x I32) -> Unit
			println(int-const)
			println(x)

	print-str(MyConcatStr(11111, MyConcatStr(x, MyConcatStr(MyConcatStr(x, 420), 1337))))

bool-const = 420
inst MyStr Bool
	print-str (self Bool) -> Unit
		println(bool-const)
		println(self)
		return Unit

f(True)