Recent content by mrz1982

In my case it is not possible to break the arrays into smaller pieces. But I will try to allocate the arrays dynamically (as soon as I find out how :) )

I don't have any time constraints, let it take 1 week to run the code, that is fine by me as long as it works!

Hi! When I compile I am getting this error: C:\libmingw>C:\MinGW\bin\mingw32-make.exe g77 -c -O2 fgnmod.f C:\DOCUME~1\Z\LOCALS~1\Temp/ccyybaaa.s: Assembler messages: C:\DOCUME~1\Z\LOCALS~1\Temp/ccyybaaa.s:1018: Error: attempt to move .org backwards...

Hi. I am having problem loading large data files. The files consist of values defined as (with a extra space at the end of each line): +1.326000e-005 -1.159306e+000 -1.171263e+000 +1.327000e-005 -1.159202e+000 -1.173770e+000 +1.328000e-005 -1.159563e+000 -1.175345e+000 The problem is...

Thank you, it is working now. I was stuck with these lines for more than 2 weeks... but now everything is working.

Here are 5 lines taken from the middle of the data file: +1.670000e-006 +0.000000e+000 -8.540156e+006 -1.585399e+003 -2.243492e+003 -2.763622e+003 -3.142946e+003 -3.299538e+003 -3.304998e+003 -3.342794e+003 -3.706140e+003 -4.368216e+003 +1.680000e-006 -9.375357e+004 -8.037304e+006...

I have now tried with the following (on a somewhat smaller file [2001][12]), open(1,file="test.txt") DO t=1,2001 READ(1,'(12E14.6)',iostat=ios)(EVg(t,x),x=1,12) ENDDO close(1) DO t=1,2001 WRITE(6,FMT='(SP,12(1PE15.6E3))')(EVg(5,x),x=1,12) ENDDO The iostat returns -1, if I change the...

Thank you for your response! I should maybe add that I am working in Fortran 77 environment (due to limitations). The data in the files basically look like: +0.000000e+000 -7.281896e+002 -1.791944e+003 +0.000000e+000 -7.856508e+002 -1.824643e+003 -1.325604e+005 -8.411246e+002...

The entire code is very long, so I will only write the part where the file is opened and read. I have tried many different formats, here is the last format I tried with: REAL EVg(2003,53) open(1,file=''test.txt'') read(1,10,iostat=k) EVg 10 format(53(G7E3,1X)) close(1) the iostat...

Hi, I have created data files by compiling and running a c++ code. Now I need to open and store the contents of these files in Fortran 77 variables. But I am not able to do this. The read command does not return the values stored in the file. The files are having some 2003 lines and 53...