home *** CD-ROM | disk | FTP | other *** search
Mathematica notebook | 1993-04-26 | 3.2 KB | 104 lines |
- (*^
-
- ::[
- fontset = title, "Arial", 24, L0, center, nohscroll, bold;
- fontset = subtitle, "Arial", 18, L0, center, nohscroll, bold;
- fontset = subsubtitle, "Arial", 14, L0, center, nohscroll, bold;
- fontset = section, "Arial", 14, L0, bold, grayBox;
- fontset = subsection, "Arial", 12, L0, bold, blackBox;
- fontset = subsubsection, "Arial", 10, L0, bold, whiteBox;
- fontset = text, "Arial", 12, L0;
- fontset = smalltext, "Arial", 10, L0;
- fontset = input, "Courier New", 12, L0, nowordwrap;
- fontset = output, "Courier New", 12, L0, nowordwrap;
- fontset = message, "Courier New", 10, L0, nowordwrap, R65280;
- fontset = print, "Courier New", 10, L0, nowordwrap;
- fontset = info, "Courier New", 10, L0, nowordwrap;
- fontset = postscript, "Courier New", 8, L0, nowordwrap;
- fontset = name, "Arial", 10, L0, nohscroll, italic, B65280;
- fontset = header, "Times New Roman", 10, L0, right, nohscroll;
- fontset = footer, "Times New Roman", 10, L0, right, nohscroll;
- fontset = help, "Arial", 10, L0, nohscroll;
- fontset = clipboard, "Arial", 12, L0, nohscroll;
- fontset = completions, "Arial", 12, L0, nowordwrap, nohscroll;
- fontset = network, "Courier New", 10, L0, nowordwrap, nohscroll;
- fontset = graphlabel, "Courier New", 10, L0, nowordwrap, nohscroll;
- fontset = special1, "Arial", 12, L0, nowordwrap, nohscroll;
- fontset = special2, "Arial", 12, L0, center, nowordwrap, nohscroll;
- fontset = special3, "Arial", 12, L0, right, nowordwrap, nohscroll;
- fontset = special4, "Arial", 12, L0, nowordwrap, nohscroll;
- fontset = special5, "Arial", 12, L0, nowordwrap, nohscroll;
- fontset = Left Header, "Arial", 12, L0, nowordwrap, nohscroll;
- fontset = Left Footer, "Arial", 12, L0, nowordwrap, nohscroll;]
- :[font = title; ]
- This is a prototypical title cell.
- :[font = subtitle; ]
- This is a prototypical subtitle cell.
- :[font = subsubtitle; ]
- This is a prototypical subsubtitle cell.
- :[font = section; ]
- This is a prototypical section cell.
- :[font = subsection; ]
- This is a prototypical subsection cell.
- :[font = subsubsection; ]
- This is a prototypical subsubsection cell.
- :[font = text; ]
- This is a prototypical text cell.
- :[font = smalltext; ]
- This is a prototypical smalltext cell.
- :[font = input; ]
- This is a prototypical input cell.
- :[font = output; ]
- This is a prototypical output cell.
- :[font = message; ]
- This is a prototypical message cell.
- :[font = postscript; inactive; output; BITMAP; PostScript; pictureLeft = 100; pictureTop = 0; pictureWidth = 300; pictureHeight = 300; ]
- %!
- %%Creator: Mathematica
- %%AspectRatio: 1
- MathPictureStart
- /Courier findfont 10 scalefont setfont
- % Scaling calculations
- 0.0238095 0.952381 0.0238095 0.952381 [
- [ 0 0 0 0 ]
- [ 1 1 0 0 ]
- ] MathScale
- % Start of Graphics
- 1 setlinecap
- 1 setlinejoin
- newpath
- %%Object: Graphics
- [ ] 0 setdash
- 0 setgray
- gsave
- grestore
- 0 0 moveto
- 1 0 lineto
- 1 1 lineto
- 0 1 lineto
- closepath
- clip
- newpath
- gsave
- gsave
- .5 setgray
- 0.02381 0.02381 moveto
- 0.02381 0.97619 lineto
- 0.97619 0.97619 lineto
- 0.97619 0.02381 lineto
- fill
- grestore
- gsave
- 1.0 setgray
- 0.11905 0.11905 moveto
- 0.11905 0.88095 lineto
- 0.88095 0.88095 lineto
- 0.88095 0.11905 lineto
- fill
- grestore
- [(Default Graphics Size)] 0.5 0.5 0 0 Mshowa
- grestore
- % End of Graphics
- MathPictureEnd
- ^*)
-