(upd: (s: S2) => S3)
| 222 | } |
| 223 | |
| 224 | export function updateWith<S2, S3>(upd: (s: S2) => S3) { |
| 225 | return modify((_: S2) => { |
| 226 | const r = upd(_) |
| 227 | return tuple(r, r) |
| 228 | }) |
| 229 | } |
| 230 | |
| 231 | export function updateWithEffect<W, R, E, S2, S3>( |
| 232 | upd: (s: S2, log: (evt: W) => PureLogT<W>) => Effect.Effect<S3, E, FixEnv<R, W, S2, S3>> |