currentTime :: Member CurrentTime r => Eff r LocalTime
currentTime = send CurrentTime
currentTime :: Member CurrentTime r => Eff r LocalTime
currentTime = send CurrentTime
currentTime = send CurrentTime