Reason BST Blog Post types

ReasonBSTTypes.re

/* waddup annotated as a string */
let waddup: string = "waddup fam?!?!";

/* greeting annotated as a function that takes a string and returns string */
let greeting: string => string = name => "Hey " ++ name ++ "!";

/* Type constructor for a function that takes a string and returns unit */
type nonPureGreeting = string => unit;

/* printGreet annotated as nonPureGreeting*/
let printGreet: nonPureGreeting = name => print_string(greet(name));