^{numEntriesWidget}
$maybe r <- firstRoute << $nothing << $maybe r <- backRoute < $nothing < $maybe r <- forwardRoute > $nothing > $maybe r <- lastRoute >> $nothing >>