anchor.diff:          logical :: use_sparse_hamil
   
           integer :: opts, err
  -        character(12), parameter :: keys(5) = [character(12) :: 'sys', 'qmc', 'restart', 'reference', 'sparse_hamil']
  +        character(12), parameter :: keys(5) = [character(12) :: 'sys', 'qmc', 'restart', 'reference', 'sparse']
   
           lua_state = flu_copyptr(L)
           call get_sys_t(lua_state, sys)
  
positive.code:         !     nanalyse = N,
          !     blacs_block_size = block_size,
          !     rdm = { ... }, -- L-d vector containing the sites to include in subsystem A.
          !     sparse_hamil = true/false
          ! }
          ! lanczos = {
          !     neigv = N,
          !     nbasis = M,
          !     direct = true/false,
          ! }
  
          ! In/Out:
  
negative.code:             call aot_get_val(fci_in%nlanczos_eigv, err, lua_state, fci_table, 'neigv')
              call aot_get_val(fci_in%lanczos_string_len, err, lua_state, fci_table, 'nbasis')
              call aot_get_val(fci_in%direct_lanczos, err, lua_state, fci_table, 'direct')
              call aot_get_val(use_sparse_hamil, err, lua_state, fci_table, 'sparse', default=.true.)
              call aot_table_close(lua_state, fci_table)
          end if
  
  