on nthSummitToOutline (adrSource,adrDest,n) {
	adrDest^ = adrSource^;
	local (i=1, j, k, flSuccess=false, returnTarget = target.get());
	target.set(adrDest);
	op.firstSummit();
	j = op.countSummits();
	if (n <= j) {
		for k = 1 to (n - 1) {
			op.deleteLine()};
		while op.go (down, 1) {
			op.deleteLine()};
		flSuccess = true};
	target.set(returnTarget);
	return(flSuccess)};
«bundle //test code
	«nthSummitToOutline(@examples.["Sample Outline 1"], @scratchpad.savedoutline, 4)