Hello,
This file is declared as parallel in the dictionary (then it will be duplicated), but it depends on what the user will do. If you want one file only, change in the dictionary the line starting with SUBMIT that contains T3DRFO : at the end change PARAL into SCAL.
Then you have to decide what you will write and who will write it. For example you can decide that processor 0 will do the job, so in UTIMP put all under a test :
IF(IPID.EQ.0) THEN
WRITE(T3D_FILES(T3DRFO)%LU,*) 'example'
ENDIF
but this requires that this processor has all the information, which depends on what you write.
With best regards,
Jean-Michel Hervouet