Re: Fortran Users! Is there a better way to do this?

How about a simple output to dataset instead of "paper?" That's pretty easy to do for FortranG/H. You avoid the spooler... If that buys anything.

Remember that in TSO, the printed output is all thrown into the spool and isn't dumped until the job ends (typically).

J


On 15 May 2010, at 4:59 PM, Dave Wade wrote:

> 
> Rod,
>  
>  From what I remember Fortran i/o is expensive so your solution is probably more efficient than the alternative which would be to use the "+" format control to allow multiple prints to occupy the same line.
>  
> Dave
> G4UGM
> Illegitimi Non Carborundum
> -----Original Message-----
> From: [email protected] [mailto:[email protected]] On Behalf Of Ron Hudson
> Sent: 15 May 2010 21:20
> To: [email protected]
> Subject: [turnkey-mvs] Fortran Users! Is there a better way to do this?
> 
> Hey fellow fortran users..
> 
> I have a program that produces a long list of numbers calculated one after the other.
> I want to print these numbers 5 wide to save 'paper'
> 
> What I am doing now:
> 
> an array(5)
> a pointer = 0
> loop
>    increment pointer
>    fill array(pointer) with next calculated result)
>    if pointer = 5
>        print array on a line of the page
>        zero pointer
> until done calculating 
> if (pointer .ge. 1) print array(1 - pointer)
> ...
> 
> Is there a better way?
> 
> Ron 
>  
> 
> 
>