& tauxbarfile,
character*(MAX_LEN_FNAM) tauxbarfile
tauxbarfile = 'tauxbar'
& tauxbarfile, tauybarfile,
ils=ilnblnk( tauxbarfile )
write(fnametauxbar,'(2a,i10.10)') tauxbarfile(1:ils),'.',
ilps=ilnblnk( tauxbarfile )
& tauxbarfile(1:ilps), '.', eccoiter
& yadprefix, tauxbarfile(1:ilps), '.', eccoiter