lattice
logical function is_k_space(this) class(lattice) :: this is_k_space = this%t_momentum_space end function is_k_space