case "$font" in
zealot)
cat <<END
-set mainfont {Helvetica 14}
-set textfont {Courier 14}
-set uifont {Helvetica 14 bold}
+set mainfont {{Nimbus Sans L} 12}
+set textfont {{Courier 10 Pitch} 12}
+set uifont {{Nimbus Sans L} 11 bold}
END
;;
*)
set circlecolors {white blue gray blue blue}
set linkfgcolor blue
set circleoutlinecolor black
-set permviews {}
-set geometry(main) 750x957+846+32
+set geometry(main) 1245x1535+0+0
set geometry(state) normal
-set geometry(topwidth) 750
-set geometry(topheight) 210
-set geometry(pwsash0) "406 1"
-set geometry(pwsash1) "586 1"
-set geometry(botwidth) 574
-set geometry(botheight) 742
+set geometry(topwidth) 1245
+set geometry(topheight) 982
+set geometry(pwsash0) "833 1"
+set geometry(pwsash1) "1038 1"
+set geometry(botwidth) 900
+set geometry(botheight) 548
+set permviews {}
END