comp-chem/cp2k
1
0
Fork 0
mirror of https://github.com/cp2k/cp2k.git synced 2026-07-28 22:25:32 -04:00
Code Issues Projects Releases Packages Wiki Activity Actions

Add newline in output format

Browse source
This commit is contained in:
Matthias Krack 2021-03-03 13:52:15 +01:00
parent 1ca3b7d46f
commit 0df64db49a
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
src/qs_kind_types.F
View file

@ -2787,12 +2787,12 @@ CONTAINS
"The atoms of this atomic kind are FLOATING BASIS FUNCTIONS."
END IF
IF (qs_kind%covalent_radius > 0.0_dp) THEN
WRITE (UNIT=output_unit, FMT="(T8,A,T71,F10.3)") &
WRITE (UNIT=output_unit, FMT="(/,T8,A,T71,F10.3)") &
"Atomic covalent radius [Angstrom]:", &
qs_kind%covalent_radius*angstrom
END IF
IF (qs_kind%vdw_radius > 0.0_dp) THEN
WRITE (UNIT=output_unit, FMT="(T8,A,T71,F10.3)") &
WRITE (UNIT=output_unit, FMT="(/,T8,A,T71,F10.3)") &
"Atomic van der Waals radius [Angstrom]:", &
qs_kind%vdw_radius*angstrom
END IF