since import { getRaceMonoid , Task , delay , of } from 'fp-ts/lib/Task' ; example since export const withTimeout = < A > ( onTimeout , millis ) : ( ( ma : Task < A > ) => Task < A > ) => { const M = getRaceMonoid < A > ( ) ; const fallback = delay ( millis ) ( of ( onTimeout ) ) ; return ( ma ) => M . concat ( ma , fallback ) ; } ;