Petit problème programme hyper simple

Bonjour,
J'ai un petit programme normalement hyper simple à faire en Caml.
Un gérant de boite qui fait payer l'entrer 12 euros, mais fait moins voigt pourcent pour les 18-25 ans et 50 pourent en plus pour les filles(50 pourcent aussi pour les plus de 25 ans)
J'ai fait se programme mais ça marche pas je comprend pas l'erreur pouvez vouq m'aider s'il vous plait

# let paf a s=
let x=(12.*.20.)/.100. in
let fem b=(b*.50.)/.100. in
if(a<18) then failwith"interdit aux mineurs"
else if(a<25) then
if (s='F') then fem x
else x
else if (a>25) then
if(s='F') then fem 12.
else 12. ;;

Characters 275-282:
if(s='F') then fem 12.
^^^^^^^
Error: This expression has type float but an expression was expected of type
unit
#

Merci encore