(* ::Package:: *)
(************************************************************************)
(* This file was generated automatically by the Mathematica front end. *)
(* It contains Initialization cells from a Notebook file, which *)
(* typically will have the same name as this file except ending in *)
(* ".nb" instead of ".m". *)
(* *)
(* This file is intended to be loaded into the Mathematica kernel using *)
(* the package loading commands Get or Needs. Doing so is equivalent *)
(* to using the Evaluate Initialization Cells menu command in the front *)
(* end. *)
(* *)
(* DO NOT EDIT THIS FILE. This entire file is regenerated *)
(* automatically each time the parent Notebook file is saved in the *)
(* Mathematica front end. Any changes you make to this file will be *)
(* overwritten. *)
(************************************************************************)
target = "MetaMonoids";
sources = Join[
{"MetaMonoids.tex", "MetaMonoids-JKTR.tex", "main.tex", "00README.XXX"},
{"817_10x_greened.pdf","817labeled.pdf","cloud.pdf","Crossings.pdf","R1.pdf","R2.pdf","R3left_numbered.pdf","R3.pdf","R3right_numbered.pdf","sw1_check.pdf","sw1.pdf","sw2.pdf","Zfigure.pdf"},
Complement[FileNames["*.png"], {"Icon_120.png"}]
]
If[FileType[target<>".zip"]===None || (
FileType[target<>".zip"] === File && OrderedQ[{FileDate[target<>".zip"], Sort[FileDate /@ sources] // Last}]),
Print["Making ",target,".zip..."];
If[
FileType[target] === Directory,
DeleteDirectory[target, DeleteContents->True]
];
dir=CreateDirectory[target];
CreateDirectory[FileNameJoin[{target, "Mathematica"}]];
CopyFile[# , FileNameJoin[{dir, #}]]& /@ sources;
If[FileType[target<>".zip"] === File, DeleteFile[target<>".zip"]];
CreateArchive[dir, target<>".zip"];
DeleteDirectory[target, DeleteContents->True];
];
{
"TitleNotes"->"
This is the construction page for MetaMonoids.pdf; all sources are at MetaMonoids.zip.
",
"CleanTeX" -> True
}