Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

Register Log in
  • Congratulations strongm on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Search results for query: *

  1. JollyJoystickJester

    A pseudo-array of output files

    Thanks
  2. JollyJoystickJester

    A pseudo-array of output files

    I noticed the problem with the spaces. Thanks a lot, it really helped when I changed it. As for the status, what status should I give the file instead?
  3. JollyJoystickJester

    A pseudo-array of output files

    Thanks for all your help. I got it working. For all who may need it, this is the exact code I ended up using: Integer :: i,j,fileindex Character(len=20) :: filename(45),aa fileindex = 1 aa = "(I2,A1,I2,A4)" Do i=1,15 Do j=1,3 write(filename(fileindex),aa) i,"-",j,".txt"...
  4. JollyJoystickJester

    A pseudo-array of output files

    Hello, I'm new to this forum. I was wondering if anyone can tell me if it is possible and if they know how to create what I call a pseudo array of output files. Here is the pseudo code: Do i=1,15 Do j=1,3 open(unit=(10+i*j),file="i-j.txt",status="new") EndDo EndDo Basically...

Part and Inventory Search

Back
Top