[Typer] Construire les `refl` dans `Case`