lattice
logical function is_periodic_y(this) class(lattice) :: this is_periodic_y = this%t_periodic_y end function is_periodic_y