--- src/main-dynamic-f90.inc~ Tue May 17 02:22:50 2005
+++ src/main-dynamic-f90.inc Tue Jan 9 17:39:08 2007
@@ -1,5 +1,5 @@
real*8, dimension(:),allocatable :: cw_orb
- real*8, dimension(:),allocatable :
+ real*8, dimension(:),allocatable :: cw_coul
real*8, dimension(:),allocatable :: cw_exch
real*8, dimension(:),allocatable :: cw_suppl
real*8, dimension(:),allocatable :: cw_sctch