|
Liebe Kollegen, Warum funktioniert die folgende Funktion nicht; resp. warum schreibt diese Funktion die Matrix nicht in FortranForm raus, obwohl der Outputstream doch so eroeffnet wurde? Ich benutze MMA 3.0 auf einem Macintosh. WriteFMatrix[file_String,matrix_List, separator_String:"\t"] := With[{myfile = OpenWrite[file,FormatType->FortranForm]}, Scan[(WriteString[myfile,First[#]]; Scan[WriteString[myfile,separator,#]&, Rest[#]]; WriteString[myfile, "\n"])&,matrix]; Close[myfile]] Kann mir jemand weiterhelfen? Mit freundlichen Gruessen, Martin Heimann ------------------------------------------------------------------ Max-Planck-Institut fuer Meteorologie Bundesstrasse 55, D-20146 Hamburg, Germany Tel.: +49-40-41173-240/293/0, Fax.: +49-40-41173-173/298 Http://www.mpimet.mpg.de/gbc, Email:martin.heimann@XXXXXXX.de --> NEW ADDRESS after October 1st, 1998: Max-Planck-Institut fuer Biogeochemie Postfach 100164, D-07745 Jena, Germany (Street Address: Tatzendpromenade 1a) Tel.: +49-3641-64-3773/3701, Fax.: +49-3641-64-3710 Email: martin.heimann@XXXXXXX.de |