[gradsusr] Fortran Code

[Derek Goring]

Are you sure that the file points.dat exists in the directory you are running the program from?
Otherwise, it looks OK to me, except that it's Fortran 77, which is as old as the hills.  I would have thought that a PhD student would be using Fortran 90/95 at least.................. ________________
Derek Goring
Mulgor Consulting Ltd
24 Brockworth Place
Christchurch, New Zealand
Phone: 64 3 942 5452
Mobile: 64 212 777 639
Website: www.mulgor.co.nz


________________________________
 From: Ali Demir <jdemir1 at hotmail.com>
To: gradsusr at gradsusr.org 
Sent: Wednesday, 28 November 2012 8:22 AM
Subject: [gradsusr] Fortran Code
 

 

 


________________________________

 
Dear All,
I keep on my doctorate program.Grads is one of softwares which will be used on my studies.
My fortran code to open and  see files extended "dat" is below,but ı cant open file extented dat,,any idea? 
Thanks for your assistance.
Regards,
Ali Demir KESKİNER         
 
            
program points
integernmax,u
parameter(nmax=1000,u=20)
realx(nmax),y(nmax),z(nmax)
open(u,FILE='points.dat',STATUS='OLD')
read(u,*)n
if(n.GT.nmax)then
write(*,*)'Error: n = ',n,'is larger than nmax =',nmax
goto9999
endif
do10 i=1,n
read(u,100)x(i),y(i),z(i)
10enddo
100format(3(F10.4))
close(u)
9999stop
end
_______________________________________________
gradsusr mailing list
gradsusr at gradsusr.org
http://gradsusr.org/mailman/listinfo/gradsusr
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://gradsusr.org/pipermail/gradsusr/attachments/20121128/c84282cd/attachment-0003.html