作诗取法