Customizing Error Messages with Effects in `Schema.TaggedError`

Is there a way to have effect-full messages for

Schema.TaggedError

Schema.TaggedError

? Currently I can provide an error messages by overriding the

message

message

getter but this function only supports the return of strings. I would like to translate my error messages using a

I18nTranslateService

I18nTranslateService

but for that

Schema.TaggedError

Schema.TaggedError

would obviously need to support some way to set the error message using an Effect similar to how it works for Schemas