+# makemmdf_A mmdfboxname sz
+makemmdf_A () {
+ MBOX="$1"
+ SZ=$2
+
+ arith_eval $SZ - $HDRSZ - $MMDFDELIMLINESZ - 1; WANTSZ=$arith_val
+ dd if="$FILLER" of="$MBOX.body" bs="$WANTSZ" count=1 2>/dev/null
+ echo >> "$MBOX.body"
+ #### The trailing $MMDF_DELIM's allows $MBOX to exactly match a file
+ #### created by packf.
+ (eval "$MMDF_DELIM"; cat "$HDR" "$MBOX.body"; eval "$MMDF_DELIM"; \
+ eval "$MMDF_DELIM"; cat "$HDR" "$FILLER"; eval "$MMDF_DELIM") > "$MBOX"
+}
+