Brainstorming a structure for storing recipes

Recipe.re

module Measurement = {
  type t =
    | Tsp
    | Tbsp
    | Cup
    | Ounce;
};

module Ingredient = {
  type t = {name: string};
};

module Amount = {
  type t = {
    quantity: float,
    measurement: Measurement.t,
  };
};

module IngredientAmount = {
  type t = {
    name: string,
    amount: Amount.t,
    ingredient: Ingredient.t,
  };
};

module RecipeStep = {
  [@unboxed]
  type t =
    | Step(string);

  let make: string => t = str => Step(str);
};

type t = {
  name: string,
  ingredients: list(IngredientAmount.t),
  overview: string,
  directions: list(RecipeStep.t),
};

let curryChicken = {
  name: "Green Curry Chicken",
  ingredients: [],
  overview: "TODO",
  directions: [RecipeStep.make("")],
};