From e578d642c8420880a9e87831b02d0fb27f81e5b6 Mon Sep 17 00:00:00 2001 From: Anthony Scemama Date: Sat, 31 Jul 2021 16:22:33 +0200 Subject: [PATCH] Comments --- src/dressing/dressing_vector.irp.f | 1 + 1 file changed, 1 insertion(+) diff --git a/src/dressing/dressing_vector.irp.f b/src/dressing/dressing_vector.irp.f index 2c1bd2f9..1643deeb 100644 --- a/src/dressing/dressing_vector.irp.f +++ b/src/dressing/dressing_vector.irp.f @@ -3,6 +3,7 @@ implicit none BEGIN_DOC ! \Delta_{state-specific}. \Psi + ! Diagonal element is divided by 2 because Delta = D + D^t END_DOC integer :: i,ii,k,j, l