#!/usr/local/bin/rune
#
# nested procedures

import "sys" as self;
import "stdio";

alias stdio.File *stdout = stdio.stdout;

void
main()
{
	int i;

	int
	subfubar(int z)
	{
		int j = i * 2 + z;

		int
		subsubfubar() {
			int k = j * 2;

			stdout->show("k is", k);
			if (i == 4) {
				i = 40;
				stdout->show("woa nelly (should get 2160)");
				subfubar(1000);
				i = 4;
			}
		}

		subsubfubar();
	}

	for (i = 0; i < 10; ++i)
		subfubar(0);
}