exception error;

fun first (x::xs, n) = nth(x, n);

fun tagliste (n, []) = []
	| tagliste (0, x::xs) = []
	| tagliste (n, x::xs) =
		if length x < n+1
		then raise error
		else first (x::xs, n)::tagliste(n, xs);