1 (* -*- mode: tuareg; -*- *) 2 3 (** Interface for NACA 4-digit airfoil generation *) 4 5 val generate_coordinates : string -> float -> (float * float) list 6 (** Generates coordinates for a 4-digit NACA airfoil given its number and chord length. *) 7