#! /usr/bin/ocaml man_or_boy.ocaml