lattice
logical function is_periodic_x(this) class(lattice) :: this is_periodic_x = this%t_periodic_x end function is_periodic_x