Function showPartAlgebra

Parameters

• fa:
      | { _tag: "EmptyF" }
      | { _tag: "TextF"; show: string }
      | {
          _tag: "RowF";
          bottom: Draw.VStrut;
          cells: string[];
          hAlign: "left" | "right" | "center";
          left: Draw.HStrut;
          right: Draw.HStrut;
          top: Draw.VStrut;
          vAlign: "top" | "bottom" | "middle";
      }
      | {
          _tag: "ColumnF";
          cells: string[];
          hAlign: "left"
          | "right"
          | "center";
          left: Draw.HStrut;
          right: Draw.HStrut;
      }