2009-06-10 00:41:32 +02:00
|
|
|
integer, parameter :: t_Gaussian = 1
|
|
|
|
integer, parameter :: t_Slater = 2
|
|
|
|
|
2009-12-04 10:42:19 +01:00
|
|
|
character*(32) :: types(t_Slater) = &
|
2009-06-10 00:41:32 +02:00
|
|
|
(/ "Gaussian", "Slater", "Brownian", "Langevin", &
|
|
|
|
"VMC", "DMC", "CI" /)
|
|
|
|
|