vInteger i; if (args.length > 1) { i = iRuntime.argVal(args, 1).mkInteger(); if (i.value == 0) { iRuntime.error(205, i); } } else { i = iNew.Integer(1);
vInteger i = iNew.Integer(vInteger.argVal(args, 1, 1)); if (i.value == 0) { iRuntime.error(205, i);
	vDescriptor function(vDescriptor[] args) {		vValue[] a = iRuntime.argVal(args, 0, 125).mkArray();		vInteger i;		if (args.length > 1) {			i = iRuntime.argVal(args, 1).mkInteger();			if (i.value == 0) {				iRuntime.error(205, i);			}		} else {			i = iNew.Integer(1);		}		for (int j = 0; j < a.length; j++) {			a[j] = new vSortElem(a[j], i);		}		iUtil.sort(a);		for (int j = 0; j < a.length; j++) {			a[j] = ((vSortElem)a[j]).value;		}		return iNew.List(a);	}