Commit 80780a15 authored by giannozz's avatar giannozz

Merge branch 'matdyn_precision' into 'develop'

Increase precision of phDOS output (frequency and total DOS) in matdyn.x

See merge request !199
parents 83b8483a 3afb67ac
......@@ -754,7 +754,7 @@ PROGRAM matdyn
END DO
END DO
!
IF (ionode) WRITE (2, '(ES12.4,1000ES12.4)') E, SUM(DOSofE(1:nat)), DOSofE(1:nat)
IF (ionode) WRITE (2, '(2ES18.10,1000ES12.4)') E, SUM(DOSofE(1:nat)), DOSofE(1:nat)
END DO
IF (ionode) CLOSE(unit=2)
END IF !dos
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment