$case modalContent $of Right content ^{content} $of Left _