Article View: fj.mail-lists.reduce
Article #8Re: loop with out
From: Rainer Schoepf
Date: Mon, 07 Sep 1992 15:34
Date: Mon, 07 Sep 1992 15:34
25 lines
1591 bytes
1591 bytes
"Z.Popowicz" writes:
> Who knows how to construct the loop with output files.?
> In the loop in the every step the new output file should be opened.
> The following example is wrong but it describes what I want
>
> for k:=1 : 1000 do << out "**/f(k)";sentence;shut "**/f(k)";>>;
The following rather arcane construction does what you want from
algebraic mode:
procedure do_out(file); out file;
procedure do_shut(file); shut file;
for k :=1 :10 do << do_out(mkid(xx,k)); write k; do_shut(mkid(xx,k))>>;
Rainer Schoepf
Konrad-Zuse-Zentrum ,,Ich mag es nicht, wenn
fuer Informationstechnik Berlin sich die Dinge so frueh
Heilbronner Strasse 10 am Morgen schon so
W-1000 Berlin 31 dynamisch entwickeln!''
Federal Republic of Germany
<Schoepf@sc.ZIB-Berlin.de> or <Schoepf@sc.ZIB-Berlin.dbp.de>
Technical Details
Message-ID:
<9209071534.AA06129@sc.zib-berlin.dbp.de>Path:
arc1-ca.pugleaf.net!sparky!uunet!sun-barr!sh.wide!ccut!schoepf@sc.ZIB-Berlin.DEReferences:
<"DFNGATE:NIhTn0gy"*@x400-gate> <"DFNGATE:NIhTn0gy"*@x400-gate>Show Full Headers
Complete Article Headers
Path: arc1-ca.pugleaf.net!sparky!uunet!sun-barr!sh.wide!ccut!schoepf@sc.ZIB-Berlin.DE Return-Path: <schoepf@sc.ZIB-Berlin.DE> Date: Mon, 7 Sep 92 17:34:17 +0200 From: schoepf@sc.ZIB-Berlin.DE (Rainer Schoepf) Message-ID: <9209071534.AA06129@sc.zib-berlin.dbp.de> Original-To: reduce-forum@RAND.org Subject: Re: loop with out References: <"DFNGATE:NIhTn0gy"*@x400-gate> References: <"DFNGATE:NIhTn0gy"*@x400-gate> Reply-To: Schoepf@sc.ZIB-Berlin.DE Organization: Konrad-Zuse-Zentrum fuer Informationstechnik Berlin Newsgroups: fj.mail-lists.reduce Distribution: fj Sender: news@ccut.cc.u-tokyo.ac.jp Approved: fj.mail-lists.reduce@ccut.cc.u-tokyo.ac.jp Lines: 25