Path: utzoo!utgpu!news-server.csri.toronto.edu!rpi!zaphod.mps.ohio-state.edu!pacific.mps.ohio-state.edu!linac!uwm.edu!psuvax1!rutgers!maverick.ksu.ksu.edu!mac From: mac@cis.ksu.edu (Myron A. Calhoun) Newsgroups: comp.lang.fortran Subject: Re: Implied write loop question Message-ID: <1991Apr23.131147.6377@maverick.ksu.ksu.edu> Date: 23 Apr 91 13:11:47 GMT References: Sender: news@maverick.ksu.ksu.edu (The News Guru) Distribution: usa Organization: Kansas State University Lines: 22 Nntp-Posting-Host: harris.cis.ksu.edu >In article... moshkovi@sanandreas.ecn.purdue.edu (Gennady Moshkovich) writes... >I am looking for the way to print out matrix type table with >n rows and m columns. I don't know before what n and m are. >What is the way to print it ? If you want it to LOOK nice, do it this way: DO 100 row = 1, n WRITE (DevNum, 99) (Table(Column), Column = 1, m) 99 FORMAT (20I6) 100 CONTINUE where DevNum and FORMAT need definitions appropriate to your situation. The above example assumed that your table was full of integers and that there were never more than 20 of them in any one row. --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