Allow [where con] to descend within submodule structure; open submodule constraints while checking later signature items

fun main [r] (r : $([A = int] ++ ([B = float] ++ r))) : $([A = float] ++ ([B = int] ++ r)) = r