Functional TypeScript: Either vs Validation

functional-typescript-either-vs-validation-04.ts

import { Validation, failure, getApplicative } from 'fp-ts/lib/Validation'
import { getArrayMonoid } from 'fp-ts/lib/Monoid'

const validation = getApplicative(getArrayMonoid<string>())
const checkAgeV = checkAge(validation, failure)
const checkClothesV = checkClothes(validation, failure)
const checkSobrietyV = checkSobriety(validation, failure)

function costToEnter2(p: Person): Validation<Errors, number> {
  const price = () => () => (): number => (p.gender === 'Female' ? 0 : 5)
  return validation.ap(validation.ap(validation.map(checkAgeV(p), price), checkClothesV(p)), checkSobrietyV(p))
}

console.log('-- Act Two --')
console.log(costToEnter2({ ...dave, sobriety: 'Paralytic' })) // failure(["Too Old!", "Sober Up!"])
console.log(costToEnter2(ruby)) // success(0)