From b11b8edb9a25f63dcef58216c2d5cda0b15e040e Mon Sep 17 00:00:00 2001 From: Frederick Stein Date: Thu, 28 Aug 2025 11:15:17 +0200 Subject: [PATCH] Fix typo in Zhang's given name --- src/xc/xc_pbe.F | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/src/xc/xc_pbe.F b/src/xc/xc_pbe.F index b9923e3fd4..5ab2d5cf30 100644 --- a/src/xc/xc_pbe.F +++ b/src/xc/xc_pbe.F @@ -107,7 +107,7 @@ CONTAINS CALL cite_reference(Zhang1998) IF (sx == 1._dp .AND. sc == 1._dp) THEN IF (PRESENT(reference)) THEN - reference = "revPBE, Yingkay Zhang and Weitao Yang,"// & + reference = "revPBE, Yingkai Zhang and Weitao Yang,"// & " Phys. Rev. Letter, vol 80,n 4, p. 890, (1998) {spin unpolarized}" END IF IF (PRESENT(shortform)) THEN @@ -116,7 +116,7 @@ CONTAINS ELSE IF (PRESENT(reference)) THEN WRITE (reference, "(a,a,'sx=',f5.3,'sc=',f5.3,a)") & - "revPBE, Yingkay Zhang and Weitao Yang,", & + "revPBE, Yingkai Zhang and Weitao Yang,", & " Phys. Rev. Letter, vol 80,n 4, p. 890, (1998)", & sx, sc, "{spin unpolarized}" END IF @@ -211,7 +211,7 @@ CONTAINS CALL cite_reference(Zhang1998) IF (sx == 1._dp .AND. sc == 1._dp) THEN IF (PRESENT(reference)) THEN - reference = "revPBE, Yingkay Zhang and Weitao Yang,"// & + reference = "revPBE, Yingkai Zhang and Weitao Yang,"// & " Phys. Rev. Letter, vol 80,n 4, p. 890, (1998) {spin polarized}" END IF IF (PRESENT(shortform)) THEN @@ -220,7 +220,7 @@ CONTAINS ELSE IF (PRESENT(reference)) THEN WRITE (reference, "(a,a,'sx=',f5.3,'sc=',f5.3,a)") & - "revPBE, Yingkay Zhang and Weitao Yang,", & + "revPBE, Yingkai Zhang and Weitao Yang,", & " Phys. Rev. Letter, vol 80,n 4, p. 890, (1998)", & sx, sc, "{spin polarized}" END IF