Return to gnuplot.oxw CVS log

Up to [local] / OpenXM / src / asir-contrib / packages / doc / gnuplot

Annotation of OpenXM/src/asir-contrib/packages/doc/gnuplot/gnuplot.oxw, Revision 1.2

1.2     ! takayama    1: /* $OpenXM: OpenXM/src/asir-contrib/packages/doc/gnuplot/gnuplot.oxw,v 1.1 2005/04/13 22:23:41 takayama Exp $ */
1.1       takayama    2:
                      3:
                      4: /*&C
                      5: @c DO NOT EDIT THIS FILE   oxgnuplot.texi
                      6: */
                      7: /*&ja
                      8: @node GNUPLOT Functions,,, Top
                      9: @chapter GNUPLOT $BH!?t(B
                     10:
                     11: $B$3$N@a$G$O(B GNUPLOT $B$N(B ox $B%5!<%P(B @code{ox_sm1_gnuplot}
                     12: $B$H$N%$%s%?%U%'!<%94X?t$r2r@b$9$k(B.
                     13: $B$3$l$i$N4X?t$O%U%!%$%k(B  @file{gnuplot.rr} $B$GDj5A$5$l$F$$$k(B.
                     14: @code{gnuplot.rr} $B$O(B
                     15: @file{$(OpenXM_HOME)/lib/asir-contrib/} $B$K$"$k(B.
                     16: */
                     17: /*&en
                     18: @node GNUPLOT Functions,,, Top
                     19: @chapter GNUPLOT Functions
                     20:
                     21: This chapter describes  interface functions for
                     22: GNUPLOT ox server @code{ox_sm1_gnuplot}.
                     23: These interface functions are defined in the file @code{gnuplot}.
                     24: The file @file{gnuplot.rr} is at @*
                     25: @file{$(OpenXM_HOME)/lib/asir-contrib}.
                     26: */
                     27: /*&C
                     28:
                     29: @menu
                     30: * gnuplot.start::
                     31: * gnuplot::
                     32: * gnuplot.plot_dots::
                     33: * gnuplot.heat::
                     34: * gnuplot.plot_function::
                     35: * gnuplot.output::
                     36: * gnuplot.setenv::
                     37: * gnuplot.stop::
                     38: @end menu
                     39:
                     40: */
                     41: /*&C
                     42: @example
                     43:
                     44: [255] gnuplot.start();
                     45: 0
                     46: [257] gnuplot.gnuplot("plot sin(x**2);");
                     47: 0
                     48: @end example
                     49: */
                     50: /*&en
                     51: The function
                     52: @code{gnuplot.heat}(@var{dt},@var{step}) demonstrates our gnuplot interface.
                     53: It numerically solves the heat equation
                     54: @tex
                     55: $$   {{\partial u}\over{\partial t}} =  {{\partial^2 u}\over{\partial x^2}},
                     56: \quad u(t,0) = u(t,1) =1
                     57: $$
                     58: with the initial condition
                     59: $$  u(0,x) = x, \  (0 \leq x \leq 0.5), \quad
                     60:     u(1,x) = 1-x, \  (0.5 \leq x \leq 1)
                     61: $$
                     62: by the explicit scheme for $0 \leq t \leq \hbox{\it dt}*\hbox{\it step}$.
                     63: @end tex
                     64: The segment [0,1] is devided into @code{Heat_N} segments.
                     65: The static variable @code{Heat_N} can be set by the function
                     66: @code{gnuplot.heat_set_N}.
                     67: If the celebrated Courant-Friedrichs-Levi number
                     68: @var{dt}*@code{Heat_N}*@code{Heat_N} is less than or equal to 0.5,
                     69: then the explicit scheme is numerically stable.
                     70: One can observe the instability by changing CFL number.
                     71: @example
                     72:   gnuplot.heat_set_N(20); gnuplot.heat(0.001,30);   (CFL number is 0.4)
                     73:   gnuplot.heat_set_N(20); gnuplot.heat(0.003,30);   (CFL > 0.5 unstable)
                     74: @end example
                     75: */
                     76: /*&ja
                     77: $B4X?t(B
                     78: @code{gnuplot.heat}(@var{dt},@var{step}) $B$O$o$l$o$l$N(B GNUPLOT $B%$%s%?%U%'!<%94X?t$N%G%b(B
                     79: $B$G$"$k(B.
                     80: $B$3$N4X?t$OG.EAF3J}Dx<0(B
                     81: @tex
                     82: $$   {{\partial u}\over{\partial t}} =  {{\partial^2 u}\over{\partial x^2}},
                     83: \quad u(t,0) = u(t,1) =1
                     84: $$
                     85: $B$r=i4|>r7o(B
                     86: $$  u(0,x) = x, \  (0 \leq x \leq 0.5), \quad
                     87:     u(1,x) = 1-x, \  (0.5 \leq x \leq 1)
                     88: $$
                     89: $B$GM[E*:9J,K!$rMQ$$$F(B
                     90: $B;~4V$,(B $0 \leq t \leq \hbox{\it dt}*\hbox{\it step}$ $B$NHO0O$G2r$/(B.
                     91: @end tex
                     92: $B6h4V(B [0,1] $B$O(B @code{Heat_N} $B8D$KJ,3d$5$l$k(B.
                     93: static $BJQ?t(B @code{Heat_N} $B$O(B
                     94: $B4X?t(B @code{gnuplot.set_heat_N} $B$G@_Dj$9$k(B.
                     95: $BM-L>$J(B Courant-Friedrichs-Levi $B?t(B
                     96: @var{dt}*@code{Heat_N}*@code{Heat_N} $B$,(B 0.5 $B0J2<$G$"$l$P(B,
                     97: $BM[E*:9J,%9%-!<%`$O0BDj$G$"$k(B.
                     98: CFL $B$rJQ$($k$3$H$K$h$j(B, $BIT0BDj@-$,@8$8$k$N$r4Q;!$G$-$k(B.
                     99: @example
                    100:   gnuplot.set_heat_N(20); gnuplot.heat(0.001,30);   (CFL number is 0.4)
                    101:   gnuplot.set_heat_N(20); gnuplot.heat(0.003,30);   (CFL > 0.5 unstable)
                    102: @end example
                    103: */
                    104: /*&C
                    105: Author of @code{GNUPLOT}: Thomas Williams, Colin Kelley.
                    106: @url{http://www.gnuplot.info}
                    107: */
                    108:
                    109: /*&ja
                    110: @section $BH!?t0lMw(B
                    111: */
                    112: /*&en
                    113: @section Functions
                    114: */
                    115: /*&ja
                    116: @node gnuplot.start,,, GNUPLOT Functions
                    117: @subsection @code{gnuplot.start}
                    118: @findex gnuplot.start
                    119: @table @t
                    120: @item gnuplot.start()
                    121: ::  Localhost $B$G(B @code{ox_sm1_gnuplot} $B$r5/F0$9$k(B.
                    122: @end table
                    123:
                    124: @table @var
                    125: @item return
                    126: $B@0?t(B
                    127: @end table
                    128:
                    129: @itemize @bullet
                    130: @item Localhost $B$G(B @code{ox_sm1_gnuplot} $B$r5/F0$9$k(B.
                    131:     $B5/F0$5$l$?(B @code{ox_sm1_gnuplot} $B$N<1JLHV9f$rLa$9(B.
                    132: @item @code{Xm_noX =1} $B$H$7$F$*$/$H(B, @code{ox_sm1_gnuplot} $BMQ$N(B debug window $B$,3+$+$J$$(B.
                    133: @item $B<1JLHV9f$O(B, @code{Gnuplot_proc} $B$K3JG<$5$l$k(B.
                    134: @end itemize
                    135: */
                    136: /*&en
                    137: @node gnuplot.start,,, GNUPLOT Functions
                    138: @subsection @code{gnuplot.start}
                    139: @findex gnuplot.start
                    140: @table @t
                    141: @item gnuplot.start()
                    142: ::  Start  @code{ox_sm1_gnuplot} on the localhost.
                    143: @end table
                    144:
                    145: @table @var
                    146: @item return
                    147: Integer
                    148: @end table
                    149:
                    150: @itemize @bullet
                    151: @item Start @code{ox_sm1_gnuplot} on the localhost.
                    152:     It returns the descriptor of @code{ox_sm1_gnuplot}.
                    153: @item Set @code{Xm_noX = 1} to start @code{ox_sm1_gnuplot} without a debug window.
                    154: @item The descriptor is stored in @code{Gnuplot_proc}.
                    155: @end itemize
                    156: */
                    157: /*&C
                    158: @example
                    159: P = gnuplot.start();
                    160: @end example
                    161: */
                    162: /*&ja
                    163: @table @t
                    164: @item $B;2>H(B
                    165: @code{ox_launch}, @code{gnuplot}
                    166: @end table
                    167: */
                    168: /*&en
                    169: @table @t
                    170: @item Reference
                    171: @code{ox_launch}, @code{gnuplot}
                    172: @end table
                    173: */
                    174:
                    175:
                    176: /*&en
                    177: @node gnuplot,,, GNUPLOT Functions
                    178: @subsection @code{gnuplot}
                    179: @findex gnuplot
                    180: @table @t
                    181: @item gnuplot.gnuplot(@var{s}|proc=@var{p})
                    182: ::  Ask GNUPLOT to execute the command string @var{s}.
                    183: @end table
                    184:
                    185: @table @var
                    186: @item return
                    187: Void
                    188: @item p
                    189: Number
                    190: @item s
                    191: String
                    192: @end table
                    193:
                    194: @itemize @bullet
                    195: @item
                    196:  The server executes the gnuplot command @var{s}.
                    197:   When an error occurs,
                    198:   the gnuplot itself terminates and ox_sm1_gnuplot server automatically
                    199:   restarts gnuplot.
                    200: @item
                    201:     gnuplot does not accept a long polynomial.
                    202: @item
                    203:     gnuplot does not accept @code{^}. Use @code{**} instead.
                    204: @end itemize
                    205: */
                    206: /*&ja
                    207: @node gnuplot,,, GNUPLOT Functions
                    208: @subsection @code{gnuplot}
                    209: @findex gnuplot
                    210: @table @t
                    211: @item gnuplot.gnuplot(@var{s}|proc=@var{p})
                    212: ::  GNUPLOT $B$K%3%^%s%I(B @var{s} $B$r<B9T$7$F$b$i$&(B.
                    213: @end table
                    214:
                    215: @table @var
                    216: @item return
                    217: $B$J$7(B
                    218: @item p
                    219: $B?t(B
                    220: @item s
                    221: $BJ8;zNs(B
                    222: @end table
                    223:
                    224: @itemize @bullet
                    225: @item
                    226:  $B%5!<%P$O(B GNUPLOT $B$N%3%^%s%I(B @var{s} $B$r<B9T$9$k(B.
                    227:  $B%(%i!<$,$*$-$?>l9g(B GNUPLOT $BK\BN$O=*N;$7$F$7$^$&$,(B,
                    228:  @code{ox_sm1_gnuplot} $B$O<+F0E*$K(B GNUPLOT $BK\BN$r%j%9%?!<%H$9$k(B.
                    229: @item
                    230:    GNUPLOT $B$OD9$$B?9`<0$r$?$@$7$/$&$1$D$1$J$$(B.
                    231: @item
                    232:    GNUPLOT $B$O(B @code{^} $B$r$&$1$D$1$J$$(B. $B$+$o$j$K(B, @code{**} $B$r;H$&(B.
                    233: @end itemize
                    234: */
                    235: /*&C
                    236: @example
                    237: [232] P = gnuplot.start();
                    238: 0
                    239: *Plot 3 dimensional graph.
                    240: [233] gnuplot.gnuplot("splot x**2-y**2;"|proc=P);
                    241: 0
                    242: *Plot 2 dimensional graph.
                    243: [234] gnuplot.gnuplot("plot [-pi:pi] [-2:2] cos(x);");
                    244: 0
                    245: *Output a graph as a postscript figure.
                    246: [235] gnuplot.output(|file="hoge.eps");
                    247: 0
                    248: [236] gnuplot.gnuplot("plot sin(x)*cos(x);");
                    249: 0
                    250: [237] gnuplot.gnuplot(|file="x11");
                    251: 0
                    252:
                    253: *Plot 3 dimensional graph hiding unvisible lines.
                    254: [236] gnuplot.gnuplot("set hidden3d");
                    255: 0
                    256: [237] gnuplot.gnuplot("splot (x**2+y**2)*sin(x**2+y**2)");
                    257: 0
                    258: [238] gnuplot.gnuplot("set isosamples 50");
                    259: 0
                    260: [239] gnuplot.gnuplot("splot (x**2+y**2)*sin(x**2+y**2)");
                    261:
                    262: @end example
                    263: */
                    264: /*&en
                    265: @table @t
                    266: @item Reference
                    267:     @code{ox_launch}, @code{gnuplot.start}, @code{rtostr},
                    268:     @code{gnuplot.plot_dots}
                    269: @item Reference Book
                    270:     Yabuki Michiro, Otake Tuyoshi; Tukai konasu GNUPLOT, Techno Press,
                    271:     in Japansese,  ISBN4-924998-11-7
                    272: @end table
                    273: */
                    274: /*&ja
                    275: @table @t
                    276: @item $B;2>H(B
                    277:     @code{ox_launch}, @code{gnuplot.start}, @code{rtostr},
                    278:     @code{gnuplot.plot_dots}
                    279: @item $B;29M=q(B
                    280:     $BLp?aF;O:(B, $BBgC]$D$h$7(B; $B;H$$$3$J$9(B GNUPLOT, $B%F%/%N%W%l%9(B,
                    281:     ISBN4-924998-11-7
                    282: @end table
                    283: */
                    284:
                    285:
                    286:
                    287: /*&en
                    288: @node gnuplot.plot_dots,,, GNUPLOT Functions
                    289: @subsection @code{gnuplot.plot_dots}
                    290: @findex gnuplot.plot_dots
                    291: @table @t
                    292: @item gnuplot.plot_dots(@var{d},@var{s}|proc=@var{p})
                    293: ::  Plot the dots @var{d} with the style @var{s}.
                    294: @end table
                    295:
                    296: @table @var
                    297: @item return
                    298: Void
                    299: @item p
                    300: Number
                    301: @item d
                    302: List
                    303: @item s
                    304: String or 0
                    305: @end table
                    306:
                    307: @itemize @bullet
                    308: @item
                    309:  Plot the dots @var{d} with the style @var{s}.
                    310:     @var{s} is a string of the form
                    311:       "style color point".
                    312:     Here,
                    313:        style can be lines, points, linespoints, impulses, dots, steps,
                    314:        errorbars, boxes, boxerrorbars.
                    315:        color can be 1 (red), 2 (green), 3 (blue), 4, ... , 8.
                    316:        point can be a number from 1 to 8.
                    317:     The color and point field can be omitted.
                    318: @item
                    319:  When @var{d} == @code{[  ]}, the screen will be cleared.
                    320: @end itemize
                    321: */
                    322: /*&ja
                    323: @node gnuplot.plot_dots,,, GNUPLOT Functions
                    324: @subsection @code{gnuplot.plot_dots}
                    325: @findex gnuplot.plot_dots
                    326: @table @t
                    327: @item gnuplot.plot_dots(@var{d},@var{s}|proc=@var{p})
                    328: ::  $BE@$N=89g(B @var{d} $B$r%9%?%$%k(B @var{s} $B$G%W%m%C%H$9$k(B.
                    329: @end table
                    330:
                    331: @table @var
                    332: @item return
                    333: $B$J$7(B
                    334: @item p
                    335: $B?t(B
                    336: @item d
                    337: $B%j%9%H(B
                    338: @item s
                    339: $BJ8;zNs(B $B$^$?$O(B 0
                    340: @end table
                    341:
                    342: @itemize @bullet
                    343: @item
                    344:  $BE@=89g(B @var{d} $B$r%9%?%$%k(B @var{s} $B$G%W%m%C%H$9$k(B.
                    345:     @var{s} $B$O<!$N$h$&$JJ8;zNs(B:
                    346:       "style color point".
                    347:     $B$3$3$G(B
                    348:        style $B$K$O(B lines, points, linespoints, impulses, dots, steps,
                    349:        errorbars, boxes, boxerrorbars
                    350:        $B$rA*$Y$k(B.
                    351:        color $B$K$O(B 1 (red), 2 (green), 3 (blue), 4, ... , 8
                    352:        $B$rA*$Y$k(B.
                    353:        point $B$O(B 1 $B$+$i(B 8 $B$N?t$rF~$l$k(B.
                    354:     color, point $B$O>JN,$7$F$h$$(B.
                    355: @item
                    356:   @var{d} == @code{[  ]} $B$N$H$-$O%9%/%j!<%s$,$^$:>C5n$5$l$k(B.
                    357: @end itemize
                    358: */
                    359: /*&C
                    360: @example
                    361: [239] P = gnuplot.start();
                    362: 0
                    363: [240] gnuplot.plot_dots([ ],0);
                    364: 0
                    365: [241] for (I=0; I<10; I++) gnuplot.plot_dots([[I,I^2]]," lines ");
                    366: [242] A = [ ];
                    367: []
                    368: [243] for (I=0; I<10; I++) A = append(A,[ [I,I^2]]);
                    369: [244] A;
                    370: [[0,0],[1,1],[2,4],[3,9],[4,16],[5,25],[6,36],[7,49],[8,64],[9,81]]
                    371: [245] gnuplot.plot_dots(A," lines ");
                    372: 0
                    373: @end example
                    374: */
                    375: /*&ja
                    376: @table @t
                    377: @item $B;2>H(B
                    378:     @code{gnuplot.start}, @code{plot "fileName" with options}(GNUPLOT command),
                    379:     @code{gnuplot.clean}, @code{gnuplot}
                    380: @end table
                    381: */
                    382: /*&en
                    383: @table @t
                    384: @item Reference
                    385:     @code{gnuplot.start}, @code{plot "fileName" with options}(GNUPLOT command),
                    386:     @code{gnuplot.clean}, @code{gnuplot}
                    387: @end table
                    388: */
                    389:
                    390:
                    391:
                    392: /** heat equation **/
                    393:
                    394: /*&en
                    395: @node gnuplot.heat,,, GNUPLOT Functions
                    396: @subsection @code{gnuplot.heat}
                    397: @findex gnuplot.heat
                    398: @table @t
                    399: @item gnuplot.heat(@var{dt},@var{step})
                    400: ::  It solves the heat equation numerical and plots solutions
                    401: @end table
                    402:
                    403: @table @var
                    404: @item return
                    405: Void
                    406: @item dt
                    407: floating point number
                    408: @item step
                    409: Integer
                    410: @end table
                    411:
                    412: @itemize @bullet
                    413: @item It solves the heat equation
                    414:  du/dt = d^2 u/dx^2,  u(t,0) = u(t,1) = 0
                    415: with the initial condition
                    416:  u(0,x) = x (0 <= x <= 0.5), u(0,x) = 1-x ( 0.5 <= x <= 1.0).
                    417: @item Heat_N is the number of the meshes in the space.
                    418: @item This function will be called @code{pde_heat_demo} in a future.
                    419: @end itemize
                    420:
                    421: @noindent
                    422: Algorithm: NOT Written. (Difference scheme. Courant-Levi-Friedrichs conditions.)
                    423: */
                    424: /*&ja
                    425: @node gnuplot.heat,,, GNUPLOT Functions
                    426: @subsection @code{gnuplot.heat}
                    427: @findex gnuplot.heat
                    428: @table @t
                    429: @item gnuplot.heat(@var{dt},@var{step})
                    430: ::  $BG.EAF3J}Dx<0$r?tCME*$K2r$/(B.
                    431: @end table
                    432:
                    433: @table @var
                    434: @item return
                    435: $B$J$7(B
                    436: @item dt
                    437: $BIbF0>.?tE@?t(B
                    438: @item step
                    439: $B@0?t(B
                    440: @end table
                    441:
                    442: @itemize @bullet
                    443: @item $BG.EAF3J}Dx<0(B
                    444:  du/dt = d^2 u/dx^2,  u(t,0) = u(t,1) = 0
                    445: $B$r=i4|>r7o(B
                    446:  u(0,x) = x (0 <= x <= 0.5), u(0,x) = 1-x ( 0.5 <= x <= 1.0)
                    447: $B$G2r$/(B.
                    448: @item Heat_N $B$O6u4VJ}8~$G$N%a%C%7%e$N?t(B.
                    449: @item $B$3$N4X?t$O>-Mh(B @code{pde_heat_demo} $B$H8F$P$l$kM=Dj(B.
                    450: @end itemize
                    451: */
                    452: /*&C
                    453: @example
1.2     ! takayama  454: [232] gnuplot.set_heat_N(20)$
1.1       takayama  455: [233] gnuplot.heat(0.001,30)$
                    456: @end example
                    457:
                    458: */
                    459:
                    460:
                    461:
                    462: /*&en
                    463: @node gnuplot.output,,, GNUPLOT Functions
                    464: @subsection @code{gnuplot.output}
                    465: @findex gnuplot.output
                    466: @table @t
                    467: @item gnuplot.output(|@var{file=s})
                    468: ::  ask @code{GNUPLOT} to output graphic to the file @var{s} in the Postscript format.
                    469: @end table
                    470:
                    471: @table @var
                    472: @item return
                    473: Void
                    474: @item s
                    475: String
                    476: @end table
                    477:
                    478: @itemize @bullet
                    479: @item ask @code{GNUPLOT} to output graphic to the file @var{s} in the Postscript format.
                    480: @item When @code{s} is "x11" or this function is called without the argument,
                    481: the output will be written to X11 display.
                    482: @end itemize
                    483: */
                    484: /*&ja
                    485: @node gnuplot.output,,, GNUPLOT Functions
                    486: @subsection @code{gnuplot.output}
                    487: @findex gnuplot.output
                    488: @table @t
                    489: @item gnuplot.output(|@var{file=s})
                    490: ::  @code{GNUPLOT} $B$K%U%!%$%k(B @var{s} $B$X%]%9%H%9%/%j%W%H$G=PNO$9$k$h$&$KMj$`(B.
                    491: @end table
                    492:
                    493: @table @var
                    494: @item return
                    495: Void
                    496: @item s
                    497: String
                    498: @end table
                    499:
                    500: @itemize @bullet
                    501: @item  @code{GNUPLOT} $B$K%U%!%$%k(B @var{s} $B$X%]%9%H%9%/%j%W%H$G=PNO$9$k$h$&$KMj$`(B.
                    502: @item @code{s} $B$,(B "x11" $B$^$?$O(B, $B$3$N4X?t$r0z?tL5$7$G$h$V$H(B,
                    503: $B0J8e(B, X11 $B$N(B display $B$K(B graphics $B$,=PNO$5$l$k(B.
                    504: @end itemize
                    505: */
                    506:
                    507: /*&C
                    508: @example
                    509: [273] gnuplot.output(|file="hoge.eps");
                    510: Graphic output of GNUPLOT will be written to hoge.eps as a Poscript file.
                    511: 0
                    512: [274] gnuplot.gnuplot("plot tan(x)+sin(x);");
                    513: 0
                    514: [275] gnuplot.output();
                    515: Usage of gnuplot.output: gnuplot.output(|file="string")
                    516:                          gnuplot.output(|file="x11")
                    517: Output device is set to X11
                    518: @end example
                    519: */
                    520:
                    521: /*&en
                    522: @table @t
                    523: @item Reference
                    524:     @code{gnuplot}
                    525: @end table
                    526: */
                    527: /*&ja
                    528: @table @t
                    529: @item $B;2>H(B
                    530:     @code{gnuplot}
                    531: @end table
                    532: */
                    533:
                    534:
                    535: /*&en
                    536: @node gnuplot.plot_function,,, GNUPLOT Functions
                    537: @subsection @code{gnuplot.plot_function}
                    538: @findex gnuplot.plot_function
                    539: @table @t
                    540: @item gnuplot.gnuplot(@var{f}|proc=@var{p})
                    541: ::  ask the @code{gnuplot} server to draw a graph of @var{f}
                    542: @end table
                    543:
                    544: @table @var
                    545: @item return
                    546: Void
                    547: @item p
                    548: Number
                    549: @item f
                    550: Polynomial or a list of polynomials
                    551: @end table
                    552:
                    553: @itemize @bullet
                    554: @item ask the @code{gnuplot} server to draw a graph of @var{f}
                    555: @end itemize
                    556: */
                    557:
                    558: /*&ja
                    559: @node gnuplot.plot_function,,, GNUPLOT Functions
                    560: @subsection @code{gnuplot.plot_function}
                    561: @findex gnuplot.plot_function
                    562: @table @t
                    563: @item gnuplot.plot_function(@var{f}|proc=@var{p})
                    564: ::  @code{gnuplot} $B%5!<%P$K(B @var{f} $B$N%0%i%U$r=q$/$h$&$KMj$`(B.
                    565: @end table
                    566:
                    567: @table @var
                    568: @item $BLa$jCM(B
                    569: $B$J$7(B
                    570: @item p
                    571: $B?t(B
                    572: @item f
                    573: $BB?9`<0$^$?$OB?9`<0$N%j%9%H(B
                    574: @end table
                    575:
                    576: @itemize @bullet
                    577: @item @code{gnuplot} $B%5!<%P$K(B @var{f} $B$N%0%i%U$r=q$/$h$&$KMj$`(B.
                    578: @end itemize
                    579: */
                    580: /*&C
                    581:
                    582: @example
                    583: [290] gnuplot.plot_function((x+sin(x))^2);
                    584: 0
                    585: [291] gnuplot.plot_function([x,x^2,x^3]);
                    586: 0
                    587: @end example
                    588:
                    589: */
                    590:
                    591: /*&en
                    592: @table @t
                    593: @item Reference
                    594:     @code{gnuplot.to_gnuplot_format}
                    595: @end table
                    596: */
                    597: /*&ja
                    598: @table @t
                    599: @item $B;2>H(B
                    600:     @code{gnuplot.to_gnuplot_format}
                    601: @end table
                    602: */
                    603:
                    604: /*&en
                    605:
                    606: @node gnuplot.stop,,, GNUPLOT Functions
                    607: @subsection @code{gnuplot.stop}
                    608: @findex gnuplot.stop
                    609: @table @t
                    610: @item gnuplot.stop()
                    611: ::  Stop the gnuplot and remove the temporary fifo file.
                    612: @end table
                    613:
                    614: @table @var
                    615: @item return
                    616: Void
                    617: @item s
                    618: String
                    619: @end table
                    620:
                    621: @itemize @bullet
                    622: @item Stop the @code{GNUPLOT} and remove the temporary fifo file generated
                    623: by the mkfifo system call under the temporary directory.
                    624: @end itemize
                    625: */
                    626: /*&ja
                    627:
                    628: @node gnuplot.stop,,, GNUPLOT Functions
                    629: @subsection @code{gnuplot.stop}
                    630: @findex gnuplot.stop
                    631: @table @t
                    632: @item gnuplot.stop()
                    633: ::  @code{GNUPLOT} $B$rDd;_$7(B, $BDL?.MQ$N(B fifo $B%U%!%$%k$r>C$9(B.
                    634: @end table
                    635:
                    636: @table @var
                    637: @item return
                    638: Void
                    639: @item s
                    640: String
                    641: @end table
                    642:
                    643: @itemize @bullet
                    644: @item  @code{GNUPLOT} $B$rDd;_$7(B, $B0l;~%G%#%l%/%H%j$N2<$K:n@.$5$l$?DL?.MQ$N(B fifo $B%U%!%$%k$r>C$9(B.
                    645: @item $BDL?.MQ$N(B fifo $B%U%!%$%kL>$O(B gnuplot $B$G;O$^$k(B.
                    646: @end itemize
                    647: */
                    648:
                    649: /*&C
                    650: @example
                    651: [273] gnuplot.stop()
                    652: @end example
                    653: */
                    654:
                    655: /*&en
                    656: @table @t
                    657: @item Reference
                    658:     @code{gnuplot.start}
                    659: @end table
                    660: */
                    661: /*&ja
                    662: @table @t
                    663: @item $B;2>H(B
                    664:     @code{gnuplot.start}
                    665: @end table
                    666: */
                    667:
                    668: /*&en
                    669: @node gnuplot.setenv,,, GNUPLOT Functions
                    670: @subsection @code{gnuplot.setenv}
                    671: @findex gnuplot.setenv
                    672: @table @t
                    673: @item gnuplot.setenv(@var{key},@var{value})
                    674: ::
                    675: @end table
                    676:
                    677: @table @var
                    678: @item return
                    679: Void
                    680: @item key
                    681: String
                    682: @item value
                    683: Object
                    684: @end table
                    685:
                    686: @itemize @bullet
                    687: @item The @var{key} takes the value either in
                    688: "gnuplot.callingMethod" or "plot.gnuplotexec".
                    689: @end itemize
                    690: */
                    691: /*&ja
                    692: @node gnuplot.setenv,,, GNUPLOT Functions
                    693: @subsection @code{gnuplot.setenv}
                    694: @findex gnuplot.setenv
                    695: @table @t
                    696: @item gnuplot.setenv(@var{key},@var{value})
                    697: ::
                    698: @end table
                    699:
                    700: @table @var
                    701: @item return
                    702: Void
                    703: @item key
                    704: String
                    705: @item value
                    706: Object
                    707: @end table
                    708:
                    709: @itemize @bullet
                    710: @item  @code{key} $B$O(B "gnuplot.callingMethod" $B$^$?$O(B "plot.gnuplotexec".
                    711: @end itemize
                    712: */
                    713:
                    714: /*&C
                    715: @example
                    716:    Use the old method to communicate with gnuplot (version 3).
                    717:    This method does not use mkfifo, but we need a patched version of gnuplot.
                    718: [273] gnuplot.setenv("gnuplot.callingMethod",0);
                    719: [274] gnuplot.setenv("plot.gnuplotexec",getenv("OpenXM_HOME")+"/bin/gnuplot4ox");
                    720:
                    721:    Calling your own gnuplot binary.
                    722: [274] gnuplot.setenv("plot.gnuplotexec","/cygdrive/c/program files/gnuplot/pgnuplot.exe");
                    723: @end example
                    724: */
                    725:
                    726: /*&en
                    727: @table @t
                    728: @item Reference
                    729:     @code{gnuplot.start}
                    730: @end table
                    731: */
                    732: /*&ja
                    733: @table @t
                    734: @item $B;2>H(B
                    735:     @code{gnuplot.start}
                    736: @end table
                    737: */
                    738:
                    739: end$
                    740: