xbasc();
set old_style on  /// @@prerequisite
xset('font',2,4); /// @@prerequisite
t=linspace(0,2*%pi);
plot2d(t,sin(t))
plot2d(t,sinh(t/%pi)) /// \sleftarrow {\begin{minipage}[t]{7cm}{\nf{}the current scale changes so as to contain the two\\ graphs (Figure~\ref{f:plot2L})}\end{minipage}}
[a,b,c,d]=xgetech();
b /// \sleftarrow{\normalfont get the current scale \verb+[xmin,ymin,xmax,ymax]+}
xs2ps(0,'plot1')  /// @@prerequisite 
unix(SCI+'/bin/BEpsf plot1 '); /// @@prerequisite 
xbasc();
xset('font',2,4); /// @@prerequisite
plot2d(t,sin(t))
plot2d(t,sinh(t/%pi),strf="000")/// \sleftarrow {\begin{minipage}[t]{6cm}{\nf{}we don't want to change the current scale\\ (Figure~\ref{f:plot2R})}\end{minipage}}
[a,b,c,d]=xgetech();
b /// \sleftarrow{\normalfont get the current scale \verb+[xmin,ymin,xmax,ymax]+}
xs2ps(0,'plot2')  /// @@prerequisite 
unix(SCI+'/bin/BEpsf plot2 '); /// @@prerequisite