Path: utzoo!utgpu!news-server.csri.toronto.edu!rpi!dali.cs.montana.edu!caen!kuhub.cc.ukans.edu!maverick.ksu.ksu.edu!mac From: mac@cis.ksu.edu (Myron A. Calhoun) Newsgroups: comp.lang.fortran Subject: Re: Implied do loop in write (SUMMARY) Message-ID: <1991Apr24.162241.8045@maverick.ksu.ksu.edu> Date: 24 Apr 91 16:22:41 GMT References: <1991Apr23.201123.3908@unixg.ubc.ca> Sender: news@maverick.ksu.ksu.edu (The News Guru) Distribution: usa Organization: Kansas State University Lines: 28 Nntp-Posting-Host: harris.cis.ksu.edu moshkovi@sanandreas.ecn.purdue.edu (Gennady Moshkovich) writes: >buckland@cheddar.ucs.ubc.ca (Tony Buckland) writes: >>moshkovi@eurotunnel.ecn.purdue.edu (Gennady Moshkovich) writes: >>>100 format(10i8) > ^^^^ > THIS IS THE PROBLEM !! >Just look at the code, and you will see where the problem is. >You can't print with this code more then _10_ elements in a row. And who told you that? FORTRAN FORMAT processor automatically starts a new line when it reaches the last closing parentheses. >I can repeat again !!!. I don't know beforehand how many >elements I have, I can have 3, or I can have 300, but the >output MUST look nice. You must have some awfully wide printers! For the 132-column printers I get to use, 16 8-digit numbers across is all that "look nice". So just write 100 format(16i8) AND THAT IS ALL YOU'LL EVER NEED (for 8-digit numbers)! --Myron. -- # Myron A. Calhoun, Ph.D. E.E.; Associate Professor (913) 539-4448 home # INTERNET: mac@cis.ksu.edu (129.130.10.2) 532-6350 work # UUCP: ...rutgers!ksuvax1!harry!mac 532-7353 fax # AT&T Mail: attmail!ksuvax1!mac W0PBV @ K0VAY.KS.USA.NA