//
proc main;
	$i = 0;
	loop 3;
		print 'loop1' $i;
		switch (CINT)%1;
		case 0;
			print 'case 0';
			loop 2;
				print 'loop2' $i;
				if $i == 1;
					print 'break';
					break 2;
				end if;
				$i++;
			end loop;
			break;
		case 1;
			print 'case 1';
			break;
		endsw;
	end loop;
	return $ERROR;
end proc;
