Search results for query: *

@ArKM thanks man . such simple , i make a stupid mistake . @ArKM gummibar problem solved . thank you guy so much . appreciate both of your time and patients

@gummibaer at first, i just declare syndata and obsdata with fixed dimension , but i find memory get less and less (top command),then i change it to allocatable and thought this may release memory . the problem is that ,i still have this memory problem .

@gummibaer Actually, i check memory use in terminal . after i run this code , memory get less and less . the number of obspath-file is not constant , so i just give a big one to make i can read all file contained .the data i read into syndata and obsdata is more than 3500, but i only need first...

hi guys sorry for post problem .i reattach my code . and problem is when i run my code , the memory get less and less ,and finally run out . i use one variable in loop ,overwrite different data file to this variable,then write txt to disk . it should not take that much memory .thanks a lot for...

HI guys when i run my fortran code . the memory get less and less and finely run out . i'm not family with memory work .here is my code : program rfcor character*32,dimension(20,160)::synfile character*32 syn,synname,obspath,filepath character*64 outpath...

@ gummibaer thanks man

Hi guy i use a loop to read different file data and find each file data's peak. but i found the output are same . here is my code : program rfcc character*32,dimension(20,160)::synfile character*32 syn,syn1,syn2 real,allocatable,dimension(:)::syndata real...

@xwb acturally , that's what i do . i put the common block in a file . that use 'include ' in the declaration . it still have this problem . i will try use pointer represent ,try use free () to release the memorary .

sorry for that the subroutine is kind of big .so i just give part of them ,i check the main program . it's correct . it should be something wrong with subroutine calrespknt . the subroutine like : subroutine calrespknt (modela,ipors,dt,t,pr,complt,modcnv) ....... common /coff/...

HI prgramer when i run a loop to call subroutine . it stop execution and came out :bus error 10 . do 96 i=1,row do 97 j=1,conlum if(i.eq.datarow(i).AND.(j.eq.dataconlum(j))) then depth=mindepth+stepdeph*(i-1) prossio=minpro+steppro*(j-1)...

i got it ,thanks

HI programer like i have two real variable: month ,date . now i want to got a file name like: month_date if month=5 date=23, i want to get a string 5_23 . i try some . only get it in this way 5_ 23!!!! there a space between 5_ and 23 !!! do you guys have any experience on this ?

thank you salgerman

hi guy do you know how to call main program in fortran ? i mean , in main program , i call anther main program, not the function or subroutine . by the way , how to call interactive program .