(* ::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. *) (************************************************************************) Make::usage = "Make[targets, sources, action] makes a target, or a list of targets, given sources, or a list of sources, in the style of the unix 'make' command."; Make[target_String, sources_, action_Hold] := Make[Evaluate@{target}, sources, action]; Make[targets_, source_String, action__Hold] := Make[targets, Evaluate@{source}, action]; Make[targets_List, sources_List, action_Hold] := Module[{}, If[ (And @@ ((FileType[#] =!= None)& /@ sources)) && Or[ Or @@ ((FileType[#]===None)& /@ targets), Min[AbsoluteTime[FileDate[#]]& /@ targets] < Max[AbsoluteTime[FileDate[#]]& /@ sources] ], Print["Making ",targets, " ..."]; ReleaseHold[action] ] ]; name= "Commutators-Handout"; target =name<>"_400.png"; source = name<>".pdf"; Make[target, source, Hold[ Read["!convert -trim -geometry 400x400 -background white -alpha remove -gamma 0.5 "<>source<>"[0] "<>target]; ]] name= "Commutators-Handout"; target =name<>"_800.png"; source = name<>".pdf"; Make[target, source, Hold[ Read["!convert -trim -geometry 800x800 -background white -alpha remove "<>source<>"[0] "<>target]; ]] target ="Proof.png"; source = "Commutators-Handout.pdf"; dpi=150; pos=dpi(11-Get["Commutators-Handout.pos"]) // Round; yoff=pos[[1]]// ToString; ylen=pos[[2]]-pos[[1]] // ToString; Make[target, source, Hold[ Read["!convert -density 150 -background white -alpha remove -crop x"<>ylen<>"+0+"<>yoff<>" -trim "<>source<>"[0] "<>target]; ]] { "TitleNotes" -> "This is the construction folder for my talk \"Commutators\", http://www.math.toronto.edu/~drorbn/Talks/CMU-1504/.
", "CleanTeX" -> True }