Add again commit [7781] with correction to avoid circulare dependencies (USE constantes_var instead of USE constantes).
Also move CALL Set_stdout_file('out_orchidee') into get_printlev during the first call to open the output text file as early as possible.
Moved get_printlev from constantes to function_library to be able to acces it from everywhere in the model.
Now:
If PRINTLEV=0, no files are opened, text output are written to standard output.
If PRINTLEV=1, only master open and writes to out_orchidee_0000 (or out_orchidee_0000_0000). All other processors change to have printlev=0 and no files are opended for them.
(No files)
Note: See TracChangeset
for help on using the changeset viewer.