Building a Type Guard for S.Literal Schema - Effect Community