Add comment documenting where format 9470 is used

Co-authored-by: npbauman <8113971+npbauman@users.noreply.github.com>
This commit is contained in:
copilot-swe-agent[bot] 2025-11-12 19:09:29 +00:00
parent e9abc8ac5b
commit 970c9a5a88

View file

@ -1441,6 +1441,7 @@ c
9460 format(/,1x,'Excited state root',i3,/
1 1x,'Excitation energy / hartree =',f25.15,/
2 1x,' / eV =',f25.15)
c Format 9470 is used in tce_energy.F at lines 8620, 10370, and 10656
9470 format(/,1x,A,' transition moments / hartree',/
1 1x,'--------------------------------------------',/
2 1x,'X',f13.7,' Y',f13.7,' Z',f13.7,/