cwriteln.src

来自「一种求解目标函数最小化的MATLAB仿真程序.」· SRC 代码 · 共 8 行

`C/writeln`:=proc(e)
   global buffer, `C/buffer`;
   options `Copyright 1993 by Waterloo Maple Software`;
      if nargs = 1 then `C/write`(e) fi;
      printf(`%s`,`C/buffer`);
      `C/buffer`:=``
   end