hi,
I am trying to join two strings and facing a strange problem. My codes are:
Program Read_result
Implicit None
character*6::d,filename
character*19::file
Integer::c,e
c=1
write(d,'(I1)') c
filename = 'run'//d
file='\reach000034_33.csv'
open(18,file='C:\WAMView\bnz\WAMSA\'//filename//file)...