Remove the creation of output file "fort.354"

This file was created for debugging purposes by the renormalization
procedure. But since it had one line per diffusion path, its size
could rapidly become an issue.
The line is simply commented in the code.
This commit is contained in:
Sylvain Tricot 2023-06-19 14:50:08 +02:00
parent 893d012c99
commit 5f19198dec
1 changed files with 1 additions and 1 deletions

View File

@ -115,7 +115,7 @@ C Renormalization of the path
C
IF(I_REN.GE.1) THEN
COEF=COEF*C_REN(JORDP)
write(354,*) JORDP,C_REN(JORDP)
C write(354,*) JORDP,C_REN(JORDP)
ENDIF
C
C Call of the subroutines used for the R-A termination matrix