CHARACTER*(MAX_LEN_FNAM) PTRACERS_initialFile(PTRACERS_num)
& PTRACERS_initialFile,
tmpInitialFile = PTRACERS_initialFile(iTracer)
PTRACERS_initialFile(iTracer)=' '