//ww:run-exit 0
// #99 alias transparency at multi-let: a NAMED tuple alias rhs
// destructures like its base (was cs-reject "not a tuple" + ww
// asserttyped stop on unstamped binds).
package main;
type pair = (i64, i64);
fn mk() pair = { return (3, 4); };
export fn main() i32 = {
	let (a, b) = mk();
	if (a + b == 7) { return 0; };
	return 1;
};