File:ShokopPlotAT.png

Shoko function $y = \mathrm{Shoko}(t) = \ln\!\Big(1+\mathrm e^x (\mathrm e\!-\!1)\Big)$ and two its asymptotics versus $x$.

Generator of curves
// File ado.cin should be stored in the working directory in order to compile the C++ code below:


 * 1) include
 * 2) include
 * 3) include
 * 4) define DB double
 * 5) include "ado.cin"

DB Shoko(DB x) { return log(1.+exp(x)*(M_E-1.)); }

main{ int m,n; double x,y; FILE *o; o=fopen("ShokoPlotA.eps","w"); ado(o,802,460); fprintf(o,"401 1 translate 100 100 scale\n"); for(m=-4;m<5;m++) {M(m,0)L(m,4)} for(m=0;m<5;m++) {M(-4,m)L(4,m)} fprintf(o,"2 setlinecap .01 W S\n"); for(m=0;m<81;m++) {x=-4.+.1*m; y=Shoko(x); if(m==0) M(x,y) else L(x,y);} fprintf(o,"1 setlinecap 1 setlinejoin .05 W 0 .5 0 RGB S\n"); for(m=0;m<51;m++) {x=-4.+.1*m; y=(M_E-1)*exp(x); if(m==0) M(x,y) else L(x,y);} fprintf(o,"1 setlinecap 1 setlinejoin .012 W 0 0 .4 RGB S\n"); x=-.55; y=log(M_E-1.)+x; M(x,y) x=4; y=log(M_E-1.)+x; L(x,y) fprintf(o,".012 W .5 0 0 RGB S\n"); fprintf(o,"showpage\n%c%cTrailer",'%','%'); fclose(o); system("epstopdf ShokoPlotA.eps"); system(   "open ShokoPlotA.pdf"); getchar; system("killall Preview");//for mac }
 * 1) define M(x,y) fprintf(o,"%6.3f %6.3f M\n",0.+x,0.+y);
 * 2) define L(x,y) fprintf(o,"%6.3f %6.3f L\n",0.+x,0.+y);

// Copyleft 2012 by Dmitrii Kouznetsov

Latex generator of labels
% FIle ShokoPlotA.pdf sould be generated with the code above in order to compile the Latex document below.

% \documentclass[12pt]{article} % \usepackage{geometry} % \usepackage{graphics} % \usepackage{rotating} % \paperwidth 804pt % \paperheight 460pt % \topmargin -111pt % \oddsidemargin -73pt % \parindent 0pt % \pagestyle{empty} % \newcommand \sx {\scalebox} % \newcommand \rot {\begin{rotate}} % \newcommand \ero {\end{rotate}} % \begin{document} % \begin{picture}(802,462) % \put(0,0){\includegraphics{ShokoPlotA}} % \put(380,432){\sx{3}{$y$}} % \put(380,392){\sx{3}{$4$}} % \put(380,292){\sx{3}{$3$}} % \put(380,192){\sx{3}{$2$}} % \put(380, 92){\sx{3}{$1$}} % \put( 75, 3){\sx{3}{$-\!3$}} % \put(175, 3){\sx{3}{$-\!2$}} % \put(275, 3){\sx{3}{$-\!1$}} % \put(394, 3){\sx{3}{$0$}} % \put(494, 3){\sx{3}{$1$}} % \put(594, 3){\sx{3}{$2$}} % \put(694, 3){\sx{3}{$3$}} % \put(785, 3){\sx{3}{$x$}} % \put(428,238){\sx{3.1}{\rot{72} $y\!=\!(\mathrm e\!-\!1)\mathrm e^x$\ero}} % \put(416,120){\sx{3.2}{\rot{40} $y\!=\!\mathrm{Shoko}(x)$\ero}} % \put(424,44){\sx{3.1}{\rot{44.8} $y\!=\!x\!+\!\ln(\mathrm e\!-\!1)$\ero}} % \end{picture} % \end{document} % %

% Copyleft 2012 by Dmitrii Kouznetsov