
pageend

%print table of contents :
pagebegin
styletitle0
parbegin (Contents) s parend
/showpagedecorationtop false def
/showpagedecorationbottom false def
styledefault
0 1 tocn 1 sub {
	/tocindex xdef
	tocstyles tocindex get cvx exec
	parbegin
	tocnames tocindex get s
	tocseparator cvx exec
	tocpages tocindex get cvsbuffer cvs s
	parend
} for
pageend

% end of document
