Hi,
I have this code for sorting N numbers X(I) in increasing order.
DIMENSION X(100)
READ (*,*) N, (X(I),I=1,N)
N1=N-1
DO 15 I=1,N1
AMIN=X(I)
M=I+1
DO 25 K=M,N
IF (AMIN.LE.X(K)) GO TO 25
Z=AMIN
AMIN=X(K)
X(K)=Z
25 CONTINUE
15 X(I)=AMIN...
Hi,
I am new with fortran and i face a problem with reading a file with a huge number of rows. I want to read this file randomly and not read the data as they are stored in file.
The file is like this...
U[m/s] Dir[deg] Usdv[m/s] Umax[m/s] Time Date
7.8 233.6 0.5...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.