#Needs: fonts/Ambrosia.pt3
# check that we can read and generate type3 fonts

Open($1);
Print( "...Read Ambrosia.pt3")
Generate("Ambrosia.pt3");
Print( "...Generated type3")
Close();
Open("Ambrosia.pt3");
Print( "...Loaded generated font")
Quit()