determinants
  N_int         integer
  bit_kind      integer
  n_det         integer
  n_states      integer
  psi_coef      double precision (determinants_n_det,determinants_n_states)
  psi_det       integer*8 (determinants_N_int*determinants_bit_kind/8,2,determinants_n_det)
  H_apply_threshold  double precision