version 1.14, 2004/03/11 12:25:20 |
version 1.15, 2004/03/11 21:59:36 |
|
|
/* $OpenXM: OpenXM_contrib2/asir2000/lib/glib,v 1.13 2004/03/11 05:16:11 takayama Exp $ */ |
/* $OpenXM: OpenXM_contrib2/asir2000/lib/glib,v 1.14 2004/03/11 12:25:20 takayama Exp $ */ |
/* $Id$ */ |
/* $Id$ */ |
|
|
/* BUG: this library has not yet been adapted to the new automatic launcher |
/* BUG: this library has not yet been adapted to the new automatic launcher |
Line 434 def glib_ps(L) { |
|
Line 434 def glib_ps(L) { |
|
/*&usage begin: glib_ps_form(S) |
/*&usage begin: glib_ps_form(S) |
It returns the PS code generated by executing {S} |
It returns the PS code generated by executing {S} |
(experimental). |
(experimental). |
BUG. Only one function call is allowed as an argument. |
|
example: glib_ps_form(quote( glib_line(0,0,100,100) )); |
example: glib_ps_form(quote( glib_line(0,0,100,100) )); |
|
example: glib_ps_form(quote([glib_line(0,0,100,100),glib_line(100,0,0,100)])); |
ref: glib_tops |
ref: glib_tops |
end: */ |
end: */ |
|
/* Todo. Change the canvas size. */ |
def glib_ps_form(F) { |
def glib_ps_form(F) { |
extern Glib_h; |
extern Glib_h; |
extern Glib_ps; |
extern Glib_ps; |