mirror of
https://github.com/LCPQ/quantum_package
synced 2024-08-25 22:11:45 +02:00
11 lines
263 B
Fortran
11 lines
263 B
Fortran
|
module dress_types
|
||
|
type dress_buffer
|
||
|
double precision, pointer :: buf(:,:,:), buf0(:,:), coef(:)
|
||
|
double precision :: N
|
||
|
integer, pointer :: det_to_buf(:), buf_to_det(:)
|
||
|
integer :: free_under, pos, N_slot
|
||
|
logical :: full
|
||
|
endtype
|
||
|
end module
|
||
|
|