! Create the lock file and write set to true (= locked) ! write(6,'(a)') fname1(1:len_trim(fname1))//'.lck' ! open(10,file=fname1(1:len_trim(fname1))//'.lck',status ...
Some results have been hidden because they may be inaccessible to you
Show inaccessible results