Write applicatives for concurrent actions

We start with two sequential finds using monads, then rewrite our code to achieve two concurrent finds.