& PTRACERS_initialFile,
CHARACTER*(MAX_LEN_FNAM) PTRACERS_initialFile(PTRACERS_num)
IF ( PTRACERS_initialFile(iTracer) .NE. ' ' ) THEN
CALL READ_FLD_XYZ_RL(PTRACERS_initialFile(iTracer),' ',
PTRACERS_initialFile(iTracer)=' '