+/* --- @fgoldi_neg@ --- *
+ *
+ * Arguments: @fgoldi *z@ = where to put the result (may alias @x@)
+ * @const fgoldi *x@ = an operand
+ *
+ * Returns: ---
+ *
+ * Use: Set @z = -x@.
+ */
+
+extern void fgoldi_neg(fgoldi */*z*/, const fgoldi */*x*/);
+
+/* --- @fgoldi_pick2@ --- *
+ *
+ * Arguments: @fgoldi *z@ = where to put the result (may alias @x@ or @y@)
+ * @const fgoldi *x, *y@ = two operands
+ * @uint32 m@ = a mask
+ *
+ * Returns: ---
+ *
+ * Use: If @m@ is zero, set @z = y@; if @m@ is all-bits-set, then set
+ * @z = x@. If @m@ has some other value, then scramble @z@ in
+ * an unhelpful way.
+ */
+
+extern void fgoldi_pick2(fgoldi */*z*/,
+ const fgoldi */*x*/, const fgoldi */*y*/,
+ uint32 /*m*/);
+
+/* --- @fgoldi_pickn@ --- *
+ *
+ * Arguments: @fgoldi *z@ = where to put the result
+ * @const fgoldi *v@ = a table of entries
+ * @size_t n@ = the number of entries in @v@
+ * @size_t i@ = an index
+ *
+ * Returns: ---
+ *
+ * Use: If @0 <= i < n < 32@ then set @z = v[i]@. If @n >= 32@ then
+ * do something unhelpful; otherwise, if @i >= n@ then set @z@
+ * to zero.
+ */
+
+extern void fgoldi_pickn(fgoldi */*z*/,
+ const fgoldi */*v*/, size_t /*n*/, size_t /*i*/);
+