{"id":365855,"date":"2024-05-21T02:46:55","date_gmt":"2024-05-21T02:46:55","guid":{"rendered":"http:\/\/savepearlharbor.com\/?p=365855"},"modified":"-0001-11-30T00:00:00","modified_gmt":"-0001-11-29T21:00:00","slug":"","status":"publish","type":"post","link":"https:\/\/savepearlharbor.com\/?p=365855","title":{"rendered":"<span>\u0412\u0435\u043b\u043e\u0441\u0438\u043f\u0435\u0434\u0438\u043c \u0441\u0432\u044f\u0437\u0430\u043d\u043d\u044b\u0439 \u0441\u043f\u0438\u0441\u043e\u043a \u043d\u0430 Wolfram<\/span>"},"content":{"rendered":"<div><!--[--><!--]--><\/div>\n<div id=\"post-content-body\">\n<div>\n<div class=\"article-formatted-body article-formatted-body article-formatted-body_version-2\">\n<div xmlns=\"http:\/\/www.w3.org\/1999\/xhtml\">\n<figure class=\"full-width\"><img loading=\"lazy\" decoding=\"async\" src=\"https:\/\/habrastorage.org\/r\/w1560\/getpro\/habr\/upload_files\/7fd\/b33\/8d8\/7fdb338d8eb3a0a04c684105191c02ed.png\" alt=\"\u0413\u0435\u043e\u0440\u0433\u0438\u0439 \u0412\u0438\u0446\u0438\u043d \u043f\u044b\u0442\u0430\u0435\u0442\u0441\u044f \u043e\u0441\u0432\u043e\u0431\u043e\u0434\u0438\u0442\u044c\u0441\u044f \u0437\u0430 O(1)\" title=\"\u0413\u0435\u043e\u0440\u0433\u0438\u0439 \u0412\u0438\u0446\u0438\u043d \u043f\u044b\u0442\u0430\u0435\u0442\u0441\u044f \u043e\u0441\u0432\u043e\u0431\u043e\u0434\u0438\u0442\u044c\u0441\u044f \u0437\u0430 O(1)\" width=\"800\" height=\"444\" data-src=\"https:\/\/habrastorage.org\/getpro\/habr\/upload_files\/7fd\/b33\/8d8\/7fdb338d8eb3a0a04c684105191c02ed.png\"\/><\/p>\n<div><figcaption><em>\u0413\u0435\u043e\u0440\u0433\u0438\u0439 \u0412\u0438\u0446\u0438\u043d \u043f\u044b\u0442\u0430\u0435\u0442\u0441\u044f \u043e\u0441\u0432\u043e\u0431\u043e\u0434\u0438\u0442\u044c\u0441\u044f \u0437\u0430 O(1)<\/em><\/figcaption><\/div>\n<\/figure>\n<p>\u0412\u043e\u0437\u043c\u043e\u0436\u043d\u043e 11 \u043f\u043e\u0434\u043f\u0438\u0441\u0447\u0438\u043a\u043e\u0432 \u043c\u043e\u0435\u0433\u043e \u0431\u043b\u043e\u0433\u0430 \u043e\u0431\u0440\u0430\u0442\u0438\u043b\u0438 \u0432\u043d\u0438\u043c\u0430\u043d\u0438\u0435 \u043d\u0430 \u0442\u043e\u0442 \u0444\u0430\u043a\u0442, \u0447\u0442\u043e \u0432\u0441\u0435 \u043c\u043e\u0438 \u0441\u0442\u0430\u0442\u044c\u0438 \u043a\u0430\u0441\u0430\u044e\u0442\u0441\u044f \u044f\u0437\u044b\u043a\u0430 Wolfram, \u0430 \u043d\u0435\u0441\u043a\u043e\u043b\u044c\u043a\u043e \u043f\u043e\u0441\u043b\u0435\u0434\u043d\u0438\u0445 \u0441\u0442\u0430\u0442\u0435\u0439 \u0432\u044b\u0448\u043b\u0438 \u0434\u043e\u0432\u043e\u043b\u044c\u043d\u043e \u0433\u0440\u043e\u043c\u043e\u0437\u0434\u043a\u0438\u043c\u0438. <a href=\"https:\/\/habr.com\/ru\/articles\/779550\/\" rel=\"noopener noreferrer nofollow\">\u041e\u0434\u043d\u0430 \u0438\u0437 \u043f\u043e\u0441\u043b\u0435\u0434\u043d\u0438\u0445<\/a> \u0441\u0442\u0430\u0442\u0435\u0439 \u0431\u044b\u043b\u0430 \u043f\u043e\u043c\u0435\u0447\u0435\u043d\u0430 \u0425\u0430\u0431\u0440\u043e\u043c \u043a\u0430\u043a \u0442\u0440\u0435\u0431\u0443\u044e\u0449\u0430\u044f \u0432 \u0441\u0440\u0435\u0434\u043d\u0435\u043c 32 \u043c\u0438\u043d\u0443\u0442\u044b \u043d\u0430 \u043f\u0440\u043e\u0447\u0442\u0435\u043d\u0438\u0435. \u042f \u043f\u043e\u0441\u0447\u0438\u0442\u0430\u043b, \u0447\u0442\u043e \u044d\u0442\u043e \u043c\u043e\u0436\u0435\u0442 \u043e\u0442\u043f\u0443\u0433\u043d\u0443\u0442\u044c \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u0435\u043b\u0435\u0439 (\u0432\u0441\u0435 11 \u0447\u0435\u043b\u043e\u0432\u0435\u043a \u0438 \u043d\u0435 \u0444\u0430\u043a\u0442, \u0447\u0442\u043e \u0432\u0441\u0435 \u043e\u043d\u0438 \u0434\u043e \u0441\u0438\u0445 \u043f\u043e\u0440 \u0447\u0438\u0442\u0430\u044e\u0442 \u0425\u0430\u0431\u0440) \u0438 \u0440\u0435\u0448\u0438\u043b \u043f\u043e\u043f\u0440\u043e\u0431\u043e\u0432\u0430\u0442\u044c \u043f\u0438\u0441\u0430\u0442\u044c \u0431\u043e\u043b\u0435\u0435 \u043a\u043e\u0440\u043e\u0442\u043a\u0438\u0435 \u0441\u0442\u0430\u0442\u044c\u0438. \u041f\u043b\u044e\u0441 \u044f \u0441\u0430\u043c \u043f\u0435\u0440\u0435\u0441\u0442\u0430\u043d\u0443 \u0442\u0435\u0440\u044f\u0442\u044c\u0441\u044f \u0432 \u0431\u043e\u043b\u044c\u0448\u043e\u043c \u043a\u043e\u043b\u0438\u0447\u0435\u0441\u0442\u0432\u0435 \u0442\u0435\u043a\u0441\u0442\u0430. <\/p>\n<p>\u0414\u0430\u043d\u043d\u0430\u044f \u0441\u0442\u0430\u0442\u044c\u044f \u044f\u0432\u043b\u044f\u0435\u0442\u0441\u044f \u043f\u043e\u043b\u043d\u043e\u0441\u0442\u044c\u044e \u0441\u0430\u043c\u043e\u0441\u0442\u043e\u044f\u0442\u0435\u043b\u044c\u043d\u043e\u0439 \u0438 \u0446\u0435\u043d\u043d\u0430 \u0434\u043b\u044f \u043c\u0435\u043d\u044f \u0441\u0430\u043c\u0430 \u043f\u043e \u0441\u0435\u0431\u0435, \u043d\u043e \u043e\u043d\u0430 \u0442\u0430\u043a \u0436\u0435 \u044f\u0432\u043b\u044f\u0435\u0442\u0441\u044f \u043f\u043e\u0434\u0433\u043e\u0442\u043e\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u043e\u0439 \u0447\u0430\u0441\u0442\u044c\u044e \u043a \u0434\u0440\u0443\u0433\u043e\u0439 \u0441\u0442\u0430\u0442\u044c\u0435, \u043a\u043e\u0442\u043e\u0440\u0430\u044f \u0441\u0432\u044f\u0437\u0430\u043d\u0430 \u0441 \u043e\u0434\u043d\u043e\u0439 \u043d\u0435\u0441\u043b\u043e\u0436\u043d\u043e\u0439 \u0430\u043b\u0433\u043e\u0440\u0438\u0442\u043c\u0438\u0447\u0435\u0441\u043a\u043e\u0439 \u0437\u0430\u0434\u0430\u0447\u0435\u0439 \u0438 \u043f\u043e\u043a\u0430 \u0447\u0442\u043e \u043d\u0430\u0445\u043e\u0434\u0438\u0442\u0441\u044f \u0432 \u0447\u0435\u0440\u043d\u043e\u0432\u0438\u043a\u0430\u0445. \u041f\u043e\u043a\u0430 \u044f \u043f\u0438\u0441\u0430\u043b \u0435\u0435 &#8212; \u044f \u043f\u043e\u043d\u044f\u043b, \u0447\u0442\u043e \u0432\u044b\u0439\u0434\u0435\u0442 \u043c\u043d\u043e\u0433\u043e \u0442\u0435\u043a\u0441\u0442\u0430 \u0438 \u043a\u043e\u0434\u0430, \u043f\u043e\u044d\u0442\u043e\u043c\u0443 \u044f \u0440\u0435\u0448\u0438\u043b \u0440\u0430\u0437\u0431\u0438\u0442\u044c \u0435\u0435 \u043d\u0430 \u043d\u0435\u0441\u043a\u043e\u043b\u044c\u043a\u043e \u0447\u0430\u0441\u0442\u0435\u0439. <\/p>\n<p>\u041d\u0438\u0436\u0435 \u0440\u0435\u0430\u043b\u0438\u0437\u0430\u0446\u0438\u044f \u0441\u0442\u0440\u0443\u043a\u0442\u0443\u0440\u044b \u0434\u0430\u043d\u043d\u044b\u0445 <strong>LinkedList<\/strong> \u043d\u0430 <em>Wolfram Language<\/em>. <\/p>\n<h2>\u041e \u0441\u0432\u044f\u0437\u0430\u043d\u043d\u043e\u043c \u0441\u043f\u0438\u0441\u043a\u0435<\/h2>\n<p>\u041d\u0435 \u0434\u0443\u043c\u0430\u044e, \u0447\u0442\u043e \u044d\u0442\u043e \u0442\u0440\u0435\u0431\u0443\u0435\u0442 \u0434\u043b\u0438\u043d\u043d\u044b\u0445 \u043e\u0431\u044a\u044f\u0441\u043d\u0435\u043d\u0438\u0439, \u043d\u043e \u0435\u0441\u043b\u0438 \u0441\u043e\u0432\u0441\u0435\u043c \u043a\u043e\u0440\u043e\u0442\u043a\u043e, \u0442\u043e \u0442\u0430\u043a\u0430\u044f \u0441\u0442\u0440\u0443\u043a\u0442\u0443\u0440\u0430 \u0434\u0430\u043d\u043d\u044b\u0445 \u0446\u0435\u043d\u043d\u0430 \u0442\u0435\u043c, \u0447\u0442\u043e: <\/p>\n<ul>\n<li>\n<p>\u0414\u043e\u0431\u0430\u0432\u043b\u0435\u043d\u0438\u0435 \u0432 \u043a\u043e\u043d\u0435\u0446\/\u043d\u0430\u0447\u0430\u043b\u043e \u0437\u0430 <strong>O(1)<\/strong><\/p>\n<\/li>\n<li>\n<p>\u0423\u0434\u0430\u043b\u0435\u043d\u0438\u0435 \u0438\u0437 \u043d\u0430\u0447\u0430\u043b\u0430 \u0437\u0430 <strong>O(1)<\/strong><\/p>\n<\/li>\n<li>\n<p>\u041f\u043e\u0438\u0441\u043a \u0438\u043b\u0438 \u043f\u043e\u043b\u0443\u0447\u0435\u043d\u0438\u0435 \u043f\u043e \u0438\u043d\u0434\u0435\u043a\u0441\u0443 \u0437\u0430 <strong>O(n)<\/strong> &#8212; <em>\u044d\u0442\u043e \u043d\u0435 \u043e\u0447\u0435\u043d\u044c \u0446\u0435\u043d\u043d\u043e<\/em><\/p>\n<\/li>\n<li>\n<p>\u0412\u0441\u0442\u0430\u0432\u043a\u0430 \u0432 \u0441\u0435\u0440\u0435\u0434\u0438\u043d\u0443 \u0437\u0430 <strong>O(1)<\/strong>, \u043d\u043e \u043f\u043e\u0438\u0441\u043a-\u0442\u043e \u0434\u043e\u043b\u0433\u0438\u0439<\/p>\n<\/li>\n<li>\n<p>\u041f\u043e\u043b\u0443\u0447\u0435\u043d\u0438\u0435 \u0432\u0441\u0435\u0445 \u044d\u043b\u0435\u043c\u0435\u043d\u0442\u043e\u0432 \u0437\u0430 <strong>O(n)<\/strong> &#8212; \u043a\u0430\u043a \u0443 \u0431\u043e\u043b\u044c\u0448\u0438\u043d\u0441\u0442\u0432\u0430 \u0441\u0442\u0440\u0443\u043a\u0442\u0443\u0440<\/p>\n<\/li>\n<\/ul>\n<p>\u042d\u0442\u0430 \u0441\u0442\u0440\u0443\u043a\u0442\u0443\u0440\u0430 \u0434\u0430\u043d\u043d\u044b\u0445 \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u0443\u0435\u0442\u0441\u044f \u0434\u043b\u044f \u0440\u0435\u0430\u043b\u0438\u0437\u0430\u0446\u0438\u0438 \u0441\u0442\u0435\u043a\u0430 \u0438 \u043e\u0447\u0435\u0440\u0435\u0434\u0438, \u0442\u0430\u043a \u043a\u0430\u043a \u043e\u043d\u0430 \u043e\u043f\u0442\u0438\u043c\u0438\u0437\u0438\u0440\u043e\u0432\u0430\u043d\u043d\u043e \u0434\u043e\u0431\u0430\u0432\u043b\u044f\u0435\u0442 \u044d\u043b\u0435\u043c\u0435\u043d\u0442\u044b \u0432 \u043d\u0430\u0447\u0430\u043b\u043e \u0438 \u043a\u043e\u043d\u0435\u0446. \u0412 Wolfram Language \u043d\u0430\u0447\u0438\u043d\u0430\u044f \u0441 \u0432\u0435\u0440\u0441\u0438\u0438 12.1 \u0435\u0441\u0442\u044c \u0442\u0430\u043a\u0438\u0435 \u0441\u0442\u0440\u0443\u043a\u0442\u0443\u0440\u044b \u0434\u0430\u043d\u043d\u044b\u0445 \u043a\u0430\u043a \u0441\u0432\u044f\u0437\u0430\u043d\u043d\u044b\u0439 \u0441\u043f\u0438\u0441\u043e\u043a \u0438 \u0434\u0432\u0443\u043d\u0430\u043f\u0440\u0430\u0432\u043b\u0435\u043d\u043d\u044b\u0439 \u0441\u0432\u044f\u0437\u0430\u043d\u043d\u044b\u0439 \u0441\u043f\u0438\u0441\u043e\u043a, \u0430 \u0442\u0430\u043a\u0436\u0435 \u0441\u0442\u0435\u043a, \u043e\u0447\u0435\u0440\u0435\u0434\u044c, \u043a\u043e\u043b\u044c\u0446\u0435\u0432\u043e\u0439 \u0431\u0443\u0444\u0435\u0440 \u0438 \u043d\u0435\u043a\u043e\u0442\u043e\u0440\u044b\u0435 \u0434\u0440\u0443\u0433\u0438\u0435. \u041d\u043e \u043d\u0430\u0441 \u043d\u0435 \u0438\u043d\u0442\u0435\u0440\u0435\u0441\u0443\u0435\u0442 \u0432\u0441\u0442\u0440\u043e\u0435\u043d\u043d\u0430\u044f \u0440\u0435\u0430\u043b\u0438\u0437\u0430\u0446\u0438\u044f, \u0442\u0430\u043a \u043a\u0430\u043a \u0437\u0434\u0435\u0441\u044c \u043a\u043b\u0443\u0431 \u0432\u0435\u043b\u043e-\u043b\u044e\u0431\u0438\u0442\u0435\u043b\u0435\u0439. \u041d\u043e \u0435\u0441\u043b\u0438 \u0447\u0442\u043e, \u0432\u043e\u0442 \u0442\u0430\u043a \u0441\u043e\u0437\u0434\u0430\u044e\u0442\u0441\u044f \u0441\u0432\u044f\u0437\u0430\u043d\u043d\u044b\u0435 \u0441\u043f\u0438\u0441\u043a\u0438 \u0432 WL:<\/p>\n<pre><code class=\"haskell\">linkedList = CreateDataStructure[\"LinkedList\"]; Do[linkedList[\"Append\", i], {i, 1000}] linkedList[\"Visualization\"]<\/code><\/pre>\n<pre><code class=\"haskell\">doublyLinkedList = CreateDataStructure[\"DoublyLinkedList\"]; Do[doublyLinkedList[\"Append\", i], {i, 1000}] doublyLinkedList[\"Visualization\"]<\/code><\/pre>\n<figure class=\"full-width\"><img loading=\"lazy\" decoding=\"async\" src=\"https:\/\/habrastorage.org\/r\/w1560\/getpro\/habr\/upload_files\/21c\/aa4\/99e\/21caa499e66597d664c9a03c9ba7242a.png\" alt=\"\u0412\u0438\u0437\u0443\u0430\u043b\u0438\u0437\u0430\u0446\u0438\u044f \u0441\u0432\u044f\u0437\u0430\u043d\u043d\u043e\u0433\u043e \u0441\u043f\u0438\u0441\u043a\u0430 \u0438 \u0434\u0432\u0443\u043d\u0430\u043f\u0440\u0430\u0432\u043b\u0435\u043d\u043d\u043e\u0433\u043e \u0441\u0432\u044f\u0437\u0430\u043d\u043d\u043e\u0433\u043e \u0441\u043f\u0438\u0441\u043a\u0430\" title=\"\u0412\u0438\u0437\u0443\u0430\u043b\u0438\u0437\u0430\u0446\u0438\u044f \u0441\u0432\u044f\u0437\u0430\u043d\u043d\u043e\u0433\u043e \u0441\u043f\u0438\u0441\u043a\u0430 \u0438 \u0434\u0432\u0443\u043d\u0430\u043f\u0440\u0430\u0432\u043b\u0435\u043d\u043d\u043e\u0433\u043e \u0441\u0432\u044f\u0437\u0430\u043d\u043d\u043e\u0433\u043e \u0441\u043f\u0438\u0441\u043a\u0430\" width=\"642\" height=\"318\" data-src=\"https:\/\/habrastorage.org\/getpro\/habr\/upload_files\/21c\/aa4\/99e\/21caa499e66597d664c9a03c9ba7242a.png\"\/><\/p>\n<div><figcaption><em>\u0412\u0438\u0437\u0443\u0430\u043b\u0438\u0437\u0430\u0446\u0438\u044f \u0441\u0432\u044f\u0437\u0430\u043d\u043d\u043e\u0433\u043e \u0441\u043f\u0438\u0441\u043a\u0430 \u0438 \u0434\u0432\u0443\u043d\u0430\u043f\u0440\u0430\u0432\u043b\u0435\u043d\u043d\u043e\u0433\u043e \u0441\u0432\u044f\u0437\u0430\u043d\u043d\u043e\u0433\u043e \u0441\u043f\u0438\u0441\u043a\u0430<\/em><\/figcaption><\/div>\n<\/figure>\n<h2>\u0423\u0437\u0435\u043b \u0441\u043f\u0438\u0441\u043a\u0430<\/h2>\n<p>\u0427\u0442\u043e \u0436, \u043f\u0440\u0438\u0441\u0442\u0443\u043f\u0438\u043c! \u0412 \u043f\u0435\u0440\u0432\u0443\u044e \u043e\u0447\u0435\u0440\u0435\u0434\u044c \u0440\u0435\u0430\u043b\u0438\u0437\u0443\u0435\u043c \u043d\u0435 \u0441\u0430\u043c \u0441\u043f\u0438\u0441\u043e\u043a \u0446\u0435\u043b\u0438\u043a\u043e\u043c, \u0430 \u0442\u043e\u043b\u044c\u043a\u043e \u043e\u0434\u0438\u043d \u0443\u0437\u0435\u043b \u044d\u0442\u043e\u0433\u043e \u0441\u043f\u0438\u0441\u043a\u0430. \u0421\u043d\u0430\u0447\u0430\u043b\u0430 \u043b\u0435\u0433\u043a\u0430\u044f \u043f\u043e\u0434\u0433\u043e\u0442\u043e\u0432\u043a\u0430: <\/p>\n<pre><code class=\"haskell\">$HistoryLength = 0;  ClearAll[LinkedListNode];  SetAttributes[LinkedListNode, HoldFirst]; <\/code><\/pre>\n<p><code>HoldFirst<\/code> &#8212; \u043f\u043e\u0437\u0432\u043e\u043b\u0438\u0442 \u0434\u0435\u0440\u0436\u0430\u0442\u044c \u043f\u0435\u0440\u0432\u044b\u0439 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442 \u043d\u0435\u0432\u044b\u043f\u043e\u043b\u043d\u0435\u043d\u043d\u044b\u043c. \u0412 WL &#8212; \u044d\u0442\u043e \u043e\u0434\u0438\u043d \u0438\u0437 \u0441\u043f\u043e\u0441\u043e\u0431\u043e\u0432 \u0445\u0440\u0430\u043d\u0435\u043d\u0438\u044f <em>&#171;\u0441\u0441\u044b\u043b\u043a\u0438&#187;<\/em> \u043d\u0430 \u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435, \u0432\u043c\u0435\u0441\u0442\u043e \u0441\u0430\u043c\u043e\u0433\u043e \u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u044f, \u0442.\u0435. \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u044f. \u0422\u0435\u043f\u0435\u0440\u044c \u0441\u043e\u0437\u0434\u0430\u0435\u043c <em>&#171;\u043a\u043e\u043d\u0441\u0442\u0440\u0443\u043a\u0442\u043e\u0440&#187;<\/em> \u0434\u043b\u044f \u0443\u0437\u043b\u0430 \u0441\u043f\u0438\u0441\u043a\u0430 (\u043d\u0430 \u0441\u0430\u043c\u043e\u043c \u0434\u0435\u043b\u0435 \u044d\u0442\u043e \u043f\u0440\u043e\u0441\u0442\u043e \u0444\u0443\u043d\u043a\u0446\u0438\u044f): <\/p>\n<pre><code class=\"haskell\">LinkedListNode[ref_Symbol, value_, next_] :=  With[{uuid = CreateUUID[\"LINKEDLISTNODE-\"]},  If[Not[AssociationQ[ref]], ref = &lt;|\"Nodes\" -> &lt;||>|>];  ref[\"Nodes\", uuid] = &lt;| \"Value\" -> value,  \"Next\" -> next |>;  LinkedListNode[ref, uuid] ]; <\/code><\/pre>\n<ul>\n<li>\n<p><strong>ref<\/strong> &#8212; \u0442\u0430 \u0441\u0430\u043c\u0430\u044f <em>&#171;\u0441\u0441\u044b\u043b\u043a\u0430&#187;<\/em>, \u0432 \u043a\u043e\u0442\u043e\u0440\u043e\u0439 \u0445\u0440\u0430\u043d\u044f\u0442\u0441\u044f \u0434\u0430\u043d\u043d\u044b\u0435 \u0441\u043f\u0438\u0441\u043a\u0430 \u0438 \u0443\u0437\u043b\u0430. \u0415\u0441\u043b\u0438 \u044d\u0442\u0430 \u0441\u0441\u044b\u043b\u043a\u0430 \u043d\u0435 \u044f\u0432\u043b\u044f\u0435\u0442\u0441\u044f \u0430\u0441\u0441\u043e\u0446\u0438\u0430\u0446\u0438\u0435\u0439, \u0442\u043e \u0435\u0439 \u0437\u0430\u0434\u0430\u0435\u0442\u0441\u044f \u043d\u043e\u0432\u043e\u0435 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435. <\/p>\n<\/li>\n<li>\n<p><strong>uuid<\/strong> &#8212; \u0443\u043d\u0438\u043a\u0430\u043b\u044c\u043d\u044b\u0439 \u043d\u043e\u043c\u0435\u0440 \u0443\u0437\u043b\u0430<\/p>\n<\/li>\n<li>\n<p><strong>value<\/strong> &#8212; \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435<\/p>\n<\/li>\n<li>\n<p><strong>next<\/strong> &#8212; \u0441\u043b\u0435\u0434\u0443\u044e\u0449\u0438\u0439 \u0443\u0437\u0435\u043b<\/p>\n<\/li>\n<\/ul>\n<p>\u0412\u043e\u0442 \u043f\u0440\u0438\u043c\u0435\u0440 \u0443\u0437\u043b\u0430: <\/p>\n<pre><code class=\"haskell\">ClearAll[ref];  node1 = LinkedListNode[ref, 1, Null] (*LinkedListNode[ref, \"LINKEDLISTNODE-ad484b44-803b-436f-966a-b359ac961235\"]*)<\/code><\/pre>\n<p>\u0412\u043e\u0442 \u043a\u0430\u043a\u043e\u0435 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435 \u0431\u0443\u0434\u0435\u0442 \u0445\u0440\u0430\u043d\u0438\u0442\u044c \u0441\u0441\u044b\u043b\u043a\u0430-\u0441\u0438\u043c\u0432\u043e\u043b, \u043f\u043e\u0441\u043b\u0435 \u0432\u044b\u0437\u043e\u0432\u0430 \u043a\u043e\u043d\u0441\u0442\u0440\u0443\u043a\u0442\u043e\u0440\u0430:<\/p>\n<pre><code class=\"haskell\">ref (*&lt;|   \"Nodes\" -> &lt;|     \"LINKEDLISTNODE-ad484b44-803b-436f-966a-b359ac961235\" -> &lt;|       \"Value\" -> 1, \"Next\" -> Null     |>   |> |>*)<\/code><\/pre>\n<p>\u041e\u0431\u0440\u0430\u0442\u0438\u0442\u0435 \u0432\u043d\u0438\u043c\u0430\u043d\u0438\u0435, \u0447\u0442\u043e \u0441\u0438\u043c\u0432\u043e\u043b <code>ref<\/code> \u0438\u043c\u0435\u0435\u0442 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435, \u043d\u043e \u0432\u043d\u0443\u0442\u0440\u0438 \u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u044f \u0441 \u0437\u0430\u0433\u043e\u043b\u043e\u0432\u043a\u043e\u043c <code>LinkedListNode<\/code> \u0431\u043b\u0430\u0433\u043e\u0434\u0430\u0440\u044f \u0430\u0442\u0440\u0438\u0431\u0443\u0442\u0443 \u043e\u043d\u043e \u0432\u0441\u0435 \u0435\u0449\u0435 \u043e\u0441\u0442\u0430\u0435\u0442\u0441\u044f \u0432 \u0432\u0438\u0434\u0435 \u043d\u0435\u0432\u044b\u0447\u0438\u0441\u043b\u0435\u043d\u043d\u043e\u0433\u043e \u0441\u0438\u043c\u0432\u043e\u043b\u0430. \u041b\u0443\u0447\u0448\u0435 \u043f\u043e\u043d\u044f\u0442\u044c \u0441\u043c\u044b\u0441\u043b &#171;\u0443\u0434\u0435\u0440\u0436\u0438\u0432\u0430\u043d\u0438\u044f&#187; \u043c\u043e\u0436\u043d\u043e \u043d\u0430 \u043f\u0440\u043e\u0441\u0442\u043e\u043c \u043f\u0440\u0438\u043c\u0435\u0440\u0435: <\/p>\n<pre><code class=\"haskell\">x = 1;   f[x]  SetAttributes[g, HoldFirst]  g[x]<\/code><\/pre>\n<figure class=\"full-width\"><img loading=\"lazy\" decoding=\"async\" src=\"https:\/\/habrastorage.org\/r\/w1560\/getpro\/habr\/upload_files\/905\/95e\/32a\/90595e32a53cf762289d8a1377b33c8d.png\" alt=\"\u041a\u0430\u043a \u0440\u0430\u0431\u043e\u0442\u0430\u0435\u0442 HoldFirst\" title=\"\u041a\u0430\u043a \u0440\u0430\u0431\u043e\u0442\u0430\u0435\u0442 HoldFirst\" width=\"700\" height=\"201\" data-src=\"https:\/\/habrastorage.org\/getpro\/habr\/upload_files\/905\/95e\/32a\/90595e32a53cf762289d8a1377b33c8d.png\"\/><\/p>\n<div><figcaption><em>\u041a\u0430\u043a \u0440\u0430\u0431\u043e\u0442\u0430\u0435\u0442 HoldFirst<\/em><\/figcaption><\/div>\n<\/figure>\n<p>\u0422\u0435\u043f\u0435\u0440\u044c \u0434\u043e\u0431\u0430\u0432\u0438\u043c \u0443\u0437\u043b\u0443 \u043c\u0435\u0442\u043e\u0434\u044b. \u0418\u0437\u0432\u043b\u0435\u0447\u0435\u043d\u0438\u0435 \u0435\u0433\u043e \u0441\u0432\u043e\u0439\u0441\u0442\u0432: <\/p>\n<pre><code class=\"haskell\">LinkedListNode[ref_Symbol, uuid_String][key_] :=  ref[\"Nodes\", uuid, key]<\/code><\/pre>\n<p>\u0423\u043d\u0438\u043a\u0430\u043b\u044c\u043d\u043e\u0433\u043e \u043d\u043e\u043c\u0435\u0440\u0430: <\/p>\n<pre><code class=\"haskell\">LinkedListNode[ref_Symbol, uuid_String][\"UUID\"] :=  uuid; <\/code><\/pre>\n<p>\u0418 \u0438\u0437\u043c\u0435\u043d\u0435\u043d\u0438\u0435 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0439 \u0441\u0432\u043e\u0439\u0441\u0442\u0432: <\/p>\n<pre><code class=\"haskell\">LinkedListNode \/: Set[LinkedListNode[ref_Symbol, uuid_String][key_], value_] :=  ref[\"Nodes\", uuid, key] = value; <\/code><\/pre>\n<p>\u0412\u044b\u0448\u0435 \u043c\u044b \u043f\u043e \u0441\u0443\u0442\u0438 \u043f\u0435\u0440\u0435\u043e\u043f\u0440\u0435\u0434\u0435\u043b\u044f\u0435\u043c <em>&#171;\u043e\u043f\u0435\u0440\u0430\u0442\u043e\u0440 \u043f\u0440\u0438\u0441\u0432\u0430\u0438\u0432\u0430\u043d\u0438\u044f&#187;<\/em>, \u0442.\u0435. &#171;=&#187;. \u0421\u0434\u0435\u043b\u0430\u043d\u043e \u044d\u0442\u043e \u043f\u0440\u0438 \u043f\u043e\u043c\u043e\u0449\u0438 \u0442\u0430\u043a \u043d\u0430\u0437\u044b\u0432\u0430\u0435\u043c\u043e\u0433\u043e <code>UpSet<\/code> (<code>obj \/: func[obj] := expr[obj]<\/code>), \u043a\u043e\u0433\u0434\u0430 \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u0435\u043d\u0438\u0435 \u0441\u0432\u044f\u0437\u044b\u0432\u0430\u0435\u0442\u0441\u044f \u043d\u0435 \u0441 \u0444\u0443\u043d\u043a\u0446\u0438\u0435\u0439, \u0430 \u0441 \u0441\u0430\u043c\u0438\u043c \u043e\u0431\u044a\u0435\u043a\u0442\u043e\u043c, \u043d\u0430 \u043a\u043e\u0442\u043e\u0440\u043e\u043c \u0432\u044b\u0437\u044b\u0432\u0430\u0435\u0442\u0441\u044f \u0444\u0443\u043d\u043a\u0446\u0438\u044f. \u0415\u0449\u0435 \u0434\u043e\u0431\u0430\u0432\u0438\u043c \u043c\u0435\u0442\u043e\u0434 \u0441\u0432\u044f\u0437\u044b\u0432\u0430\u043d\u0438\u044f \u0434\u0432\u0443\u0445 \u0443\u0437\u043b\u043e\u0432: <\/p>\n<pre><code class=\"haskell\">LinkedListNode \/: link[node_LinkedListNode, next_LinkedListNode] := ( If[node[\"Next\"] =!= Null, next[\"Next\"] = node[\"Next\"]];  node[\"Next\"] = next ); <\/code><\/pre>\n<p>\u0421\u0434\u0435\u043b\u0430\u0435\u043c \u0442\u0430\u043a, \u0447\u0442\u043e \u044d\u0442\u043e\u0442 \u043c\u0435\u0442\u043e\u0434 \u043c\u043e\u0436\u0435\u0442 \u043e\u0431\u044a\u0435\u0434\u0438\u043d\u0438\u0442\u044c \u0446\u0435\u043b\u044b\u0439 \u0441\u043f\u0438\u0441\u043e\u043a \u0443\u0437\u043b\u043e\u0432: <\/p>\n<pre><code class=\"haskell\">link[list_List] := Fold[link, First[list], Rest[list]]; <\/code><\/pre>\n<p>\u041a\u0430\u043a \u044d\u0442\u043e \u0440\u0430\u0431\u043e\u0442\u0430\u0435\u0442: <\/p>\n<pre><code class=\"haskell\">node2 = LinkedListNode[ref, 2, Null];  node3 = LinkedListNode[ref, 3, Null];  link[{node1, node2, node3}] (* => node3 *)  (* node1 -> node2 -> node3 *)<\/code><\/pre>\n<p>\u041f\u043e\u043a\u0430 \u0447\u0442\u043e \u0440\u0435\u0430\u043b\u0438\u0437\u043e\u0432\u0430\u043d\u043d\u044b\u0445 \u043c\u0435\u0442\u043e\u0434\u043e\u0432 \u0434\u043e\u0441\u0442\u0430\u0442\u043e\u0447\u043d\u043e. \u041f\u0435\u0440\u0435\u0439\u0434\u0435\u043c \u043a \u0440\u0435\u0430\u043b\u0438\u0437\u0430\u0446\u0438\u0438 \u0441\u0430\u043c\u043e\u0433\u043e \u0441\u043f\u0438\u0441\u043a\u0430. <\/p>\n<h2>\u0420\u0435\u0430\u043b\u0438\u0437\u0430\u0446\u0438\u044f \u0441\u043f\u0438\u0441\u043a\u0430<\/h2>\n<p>\u041a\u0430\u043a \u043e\u0431\u044b\u0447\u043d\u043e \u043f\u043e\u0434\u0433\u043e\u0442\u043e\u0432\u043a\u0430: <\/p>\n<pre><code class=\"haskell\">ClearAll[LinkedList];  SetAttributes[LinkedList, HoldFirst]; <\/code><\/pre>\n<p>\u0418 \u043a\u043e\u043d\u0441\u0442\u0440\u0443\u043a\u0442\u043e\u0440 \u0441\u043f\u0438\u0441\u043a\u0430. \u041e\u0441\u043e\u0431\u0435\u043d\u043d\u043e\u0441\u0442\u044c \u044d\u0442\u043e\u0439 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 \u0432 \u0442\u043e\u043c, \u0447\u0442\u043e \u043e\u043d\u0430 \u043f\u0440\u043e\u0432\u0435\u0440\u044f\u0435\u0442 &#171;\u0441\u0441\u044b\u043b\u043a\u0443&#187; \u0438 \u0435\u0441\u043b\u0438 \u043e\u043d\u0430 \u043d\u0435\u043f\u043e\u0434\u0445\u043e\u0434\u044f\u0449\u0430\u044f, \u0442\u043e \u043c\u0435\u043d\u044f\u0435\u0442 \u0435\u0435 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435, \u0430 \u0435\u0441\u043b\u0438 \u043f\u043e\u0434\u0445\u043e\u0434\u044f\u0449\u0430\u044f \u0442\u043e \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435 \u043a\u0430\u043a \u0435\u0441\u0442\u044c: <\/p>\n<pre><code class=\"haskell\">LinkedList[ref: _Symbol?(Not@*AssociationQ): Automatic] :=  Which[ ref === Automatic,  With[{$ref = Unique[\"LINKEDLIST`$\"]}, LinkedList[$ref]],  True,  Clear[ref];  ref = &lt;|\"Nodes\" -> &lt;||>, \"Size\" -> 0, \"Head\" -> Null, \"Tail\" -> Null|>;  LinkedList[ref] ]; <\/code><\/pre>\n<p><code>ref: _Symbol?(Not@*AssociationQ): Automatic<\/code> \u0441\u043b\u0435\u0432\u0430 \u043d\u0430\u043f\u0440\u0430\u0432\u043e \u0434\u0435\u043b\u0430\u0435\u0442 \u0441\u043b\u0435\u0434\u0443\u044e\u0449\u0435\u0435: <\/p>\n<ul>\n<li>\n<p><code>ref: _Symbol<\/code> &#8212; \u0437\u043d\u0430\u0447\u0438\u0442 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442 \u0434\u043e\u043b\u0436\u0435\u043d \u0438\u043c\u0435\u0442\u044c \u0442\u0438\u043f <code>Symbol<\/code> (\u0442.\u0435. \u0441\u0441\u044b\u043b\u043a\u0430)<\/p>\n<\/li>\n<li>\n<p><code>?(Not@*AssociationQ)<\/code> &#8212; \u043f\u0440\u043e\u0432\u0435\u0440\u044f\u0435\u0442 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442 \u043f\u0440\u0438\u043c\u0435\u043d\u044f\u044f \u0444\u0443\u043d\u043a\u0446\u0438\u044e \u0441\u043f\u0440\u0430\u0432\u0430 \u043e\u0442 \u0437\u043d\u0430\u043a\u0430 \u0432\u043e\u043f\u0440\u043e\u0441\u0430<\/p>\n<\/li>\n<li>\n<p><code>Not@*AssociationQ<\/code> &#8212; \u043a\u043e\u043c\u043f\u043e\u0437\u0438\u0446\u0438\u044f \u0434\u0432\u0443\u0445 \u0444\u0443\u043d\u043a\u0446\u0438\u0439<\/p>\n<\/li>\n<li>\n<p><code>: Automatic<\/code> &#8212; \u043f\u043e\u0441\u043b\u0435 \u0432\u0442\u043e\u0440\u043e\u0433\u043e \u0434\u0432\u043e\u0435\u0442\u043e\u0447\u0438\u044f \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435 \u043f\u043e \u0443\u043c\u043e\u043b\u0447\u0430\u043d\u0438\u044e. \u0418\u043d\u0442\u0435\u0440\u0435\u0441\u043d\u043e, \u0447\u0442\u043e \u043e\u043d\u043e \u043c\u043e\u0436\u0435\u0442 \u043d\u0435 \u043f\u0440\u043e\u0445\u043e\u0434\u0438\u0442\u044c \u043f\u0440\u043e\u0432\u0435\u0440\u043a\u0443 \u0441\u043b\u0435\u0432\u0430<\/p>\n<\/li>\n<\/ul>\n<p>\u0422\u0435\u043f\u0435\u0440\u044c \u043c\u0435\u0442\u043e\u0434 \u0434\u043e\u0431\u0430\u0432\u043b\u0435\u043d\u0438\u044f \u0432 \u043a\u043e\u043d\u0435\u0446. \u041c\u044b \u0441\u043e\u0437\u0434\u0430\u0434\u0438\u043c \u0444\u0443\u043d\u043a\u0446\u0438\u044e <code>append<\/code>. \u041e\u043d\u0430 \u0431\u0443\u0434\u0435\u0442 \u0431\u0440\u0430\u0442\u044c \u0445\u0432\u043e\u0441\u0442 \u0441\u043f\u0438\u0441\u043a\u0430 \u0438 \u0435\u0441\u043b\u0438 \u0435\u0433\u043e \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435 \u044d\u0442\u043e <code>Null<\/code>, \u0442\u043e \u0434\u043e\u0431\u0430\u0432\u043b\u044f\u0442\u044c \u0438 \u0445\u0432\u043e\u0441\u0442 \u0438 \u0433\u043e\u043b\u043e\u0432\u0443. \u041d\u043e \u0435\u0441\u043b\u0438 \u0445\u0432\u043e\u0441\u0442 \u0443\u0436\u0435 \u0443\u043a\u0430\u0437\u044b\u0432\u0430\u0435\u0442 \u043d\u0430 \u0441\u0443\u0449\u0435\u0441\u0442\u0432\u0443\u044e\u0449\u0438\u0439 \u0443\u0437\u0435\u043b, \u0442\u043e \u043a \u044d\u0442\u043e\u043c\u0443 \u0443\u0437\u043b\u0443 \u043f\u0440\u0438\u0432\u044f\u0437\u044b\u0432\u0430\u0435\u0442\u0441\u044f \u043d\u043e\u0432\u044b\u0439 \u0443\u0437\u0435\u043b, \u0430 \u0445\u0432\u043e\u0441\u0442 \u0443\u043a\u0430\u0437\u044b\u0432\u0430\u0435\u0442 \u043d\u0430 \u043d\u043e\u0432\u044b\u0439 \u0443\u0437\u0435\u043b. \u0412\u0441\u0435 \u0442\u043e\u0436\u0435 \u0441\u0430\u043c\u043e\u0435, \u043d\u043e \u0441 \u0434\u0440\u0443\u0433\u043e\u0439 \u0441\u0442\u043e\u0440\u043e\u043d\u044b \u0441\u0434\u0435\u043b\u0430\u0435\u043c \u0434\u043b\u044f <code>prepend<\/code>: <\/p>\n<pre><code class=\"haskell\">LinkedList \/: append[LinkedList[ref_Symbol], item_] :=  With[{node = LinkedListNode[ref, item, Null]},  ref[\"Size\"] = ref[\"Size\"] + 1;  If[ref[\"Tail\"] === Null,  ref[\"Head\"] = node;  ref[\"Tail\"] = node; ,  (*Else*) link[ref[\"Tail\"], node];  ref[\"Tail\"] = node;  ];  ]; <\/code><\/pre>\n<pre><code class=\"haskell\">LinkedList \/: prepend[LinkedList[ref_Symbol], item_] :=  With[{node = LinkedListNode[ref, item, Null]},  ref[\"Size\"] = ref[\"Size\"] + 1;  If[ref[\"Head\"] === Null,  ref[\"Head\"] = node;  ref[\"Tail\"] = node; ,  (*Else*) link[node, ref[\"Head\"]];  ref[\"Head\"] = node;  ];  ]; <\/code><\/pre>\n<p>\u0414\u043b\u044f \u043e\u0431\u044b\u0447\u043d\u044b\u0445 \u0441\u043f\u0438\u0441\u043a\u043e\u0432 \u0432 WL \u0435\u0441\u0442\u044c \u0444\u0443\u043d\u043a\u0446\u0438\u0438 First \u0438 Last, \u043a\u043e\u0442\u043e\u0440\u044b\u0435 \u043f\u043e\u043b\u0443\u0447\u0430\u044e\u0442 \u043f\u0435\u0440\u0432\u044b\u0439 \u0438 \u043f\u043e\u0441\u043b\u0435\u0434\u043d\u0438\u0439 \u044d\u043b\u0435\u043c\u0435\u043d\u0442. \u041d\u043e \u043c\u044b \u0434\u043b\u044f \u0441\u043f\u0438\u0441\u043a\u0430 \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u0438\u043c \u043e\u0442\u0434\u0435\u043b\u044c\u043d\u044b\u0435 <em>&#171;\u0441\u0432\u043e\u0439\u0441\u0442\u0432\u0430&#187;<\/em>, \u043a\u043e\u0442\u043e\u0440\u044b\u0435 \u043f\u043e\u043b\u0443\u0447\u0430\u044e\u0442 \u0433\u043e\u043b\u043e\u0432\u0443 \u0438 \u0445\u0432\u043e\u0441\u0442: <\/p>\n<pre><code class=\"haskell\">LinkedList[ref_Symbol][\"Head\"] :=  If[ref[\"Size\"] > 0, ref[\"Head\"][\"Value\"]]; <\/code><\/pre>\n<pre><code class=\"haskell\">LinkedList[ref_Symbol][\"Tail\"] :=  If[ref[\"Size\"] > 0, ref[\"Tail\"][\"Value\"]]; <\/code><\/pre>\n<p>\u0422\u0430\u043a \u0436\u0435 \u043f\u0435\u0440\u0435\u043e\u043f\u0440\u0435\u0434\u0435\u043b\u0438\u043c \u0444\u0443\u043d\u043a\u0446\u0438\u044e, \u043a\u043e\u0442\u043e\u0440\u0430\u044f \u043f\u043e\u043b\u0443\u0447\u0430\u0435\u0442 \u044d\u043b\u0435\u043c\u0435\u043d\u0442 \u043f\u043e \u0438\u043d\u0434\u0435\u043a\u0441\u0443 (\u0442\u043e\u0442 \u0441\u0430\u043c\u044b\u0439 \u043c\u0435\u0442\u043e\u0434, \u043a\u043e\u0442\u043e\u0440\u044b\u0439 \u0437\u0430\u043d\u0438\u043c\u0430\u0435\u0442 <strong>O(n)<\/strong>): <\/p>\n<pre><code class=\"haskell\">LinkedList \/: Part[LinkedList[ref_Symbol], i_Integer] \/; Abs[i] &lt;= ref[\"Size\"]:=  Block[{$node},  Which[i === 0, LinkedList,  i === 1, ref[\"Head\"],  i === -1, ref[\"Tail\"],  i > 0,  $node = ref[\"Head\"];  Do[$node = $node[\"Next\"], {j, 2, i}];  $node,  i &lt; 0,  $node = ref[\"Head\"];  Do[$node = $node[\"Next\"], {j, -ref[\"Size\"] + 1, i, 1}];  $node ][\"Value\"] ]; <\/code><\/pre>\n<p>\u0418 \u0443\u0434\u0430\u043b\u0435\u043d\u0438\u0435 \u0433\u043e\u043b\u043e\u0432\u044b \u0441 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0435\u043d\u0438\u0435\u043c \u0443\u0437\u043b\u0430. \u0417\u0434\u0435\u0441\u044c \u044f \u0441\u043e\u0437\u0434\u0430\u043c \u0444\u0443\u043d\u043a\u0446\u0438\u044e <code>pop<\/code> : <\/p>\n<pre><code class=\"haskell\">LinkedList \/: pop[LinkedList[ref_Symbol]] :=  With[{head = ref[\"Head\"]},  ref[\"Head\"] = head[\"Next\"];  head[\"Next\"] = Null;  head[\"Value\"] ]; <\/code><\/pre>\n<p>\u0418 \u043f\u043e\u0441\u043b\u0435\u0434\u043d\u0435\u0435, \u0447\u0442\u043e \u043d\u0430\u043c \u043f\u043e\u0442\u0440\u0435\u0431\u0443\u0435\u0442\u0441\u044f &#8212; \u0444\u0443\u043d\u043a\u0446\u0438\u044f, \u043a\u043e\u0442\u043e\u0440\u0430\u044f \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0432\u0441\u0435 \u044d\u043b\u0435\u043c\u0435\u043d\u0442\u044b \u0441\u0432\u044f\u0437\u0430\u043d\u043d\u043e\u0433\u043e \u0441\u043f\u0438\u0441\u043a\u0430 \u0432 \u0432\u0438\u0434\u0435 \u043e\u0431\u044b\u0447\u043d\u043e\u0433\u043e \u0441\u043f\u0438\u0441\u043a\u0430. \u041e\u0431\u044b\u0447\u043d\u043e \u0434\u043b\u044f \u044d\u0442\u0438\u0445 \u0446\u0435\u043b\u0435\u0439 \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u0443\u044e\u0442 \u0432\u0441\u0442\u0440\u043e\u0435\u043d\u043d\u0443\u044e \u0444\u0443\u043d\u043a\u0446\u0438\u044e <code>Normal<\/code>: <\/p>\n<pre><code class=\"haskell\">LinkedList \/: Normal[LinkedList[ref_Symbol]] :=  Block[{node = ref[\"Head\"], value},      Table[         value = node[\"Value\"];          node = node[\"Next\"];          value,          {i, 1, ref[\"Size\"]}     ] ]; <\/code><\/pre>\n<h2>\u041f\u0440\u0438\u043c\u0435\u0440\u044b<\/h2>\n<p>\u041c\u0438\u043d\u0438\u043c\u0430\u043b\u044c\u043d\u0430\u044f \u0440\u0435\u0430\u043b\u0438\u0437\u0430\u0446\u0438\u044f \u0441\u0432\u044f\u0437\u0430\u043d\u043d\u043e\u0433\u043e \u0441\u043f\u0438\u0441\u043a\u0430 \u0433\u043e\u0442\u043e\u0432\u0430. \u0421\u043e\u0437\u0434\u0430\u0442\u044c \u0435\u0433\u043e \u043c\u043e\u0436\u043d\u043e \u0432\u043e\u0442 \u0442\u0430\u043a: <\/p>\n<pre><code class=\"haskell\">linkedList = LinkedList[]<\/code><\/pre>\n<p>\u0417\u0430\u0442\u0435\u043c \u0435\u0433\u043e \u043c\u043e\u0436\u043d\u043e \u0437\u0430\u043f\u043e\u043b\u043d\u0438\u0442\u044c: <\/p>\n<pre><code class=\"haskell\">Do[append[linkedList, i], {i, 10}] Do[prepend[linkedList, i], {i, 10}]<\/code><\/pre>\n<p>\u0423\u0434\u0430\u043b\u0438\u0442\u044c \u0447\u0430\u0441\u0442\u044c \u0438\u0437 \u043d\u0430\u0447\u0430\u043b\u0430: <\/p>\n<pre><code class=\"haskell\">Table[pop[linkedList], {5}] (* {10, 9, 8, 7, 6} *)<\/code><\/pre>\n<p>\u041f\u043e\u0441\u043c\u043e\u0442\u0440\u0435\u0442\u044c \u0441\u043e\u0434\u0435\u0440\u0436\u0438\u043c\u043e\u0435: <\/p>\n<pre><code class=\"haskell\">Normal[linkedList] (* {5, 4, 3, 2, 1, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10} *)<\/code><\/pre>\n<h2>\u041f\u0440\u043e\u0438\u0437\u0432\u043e\u0434\u0438\u0442\u0435\u043b\u044c\u043d\u043e\u0441\u0442\u044c<\/h2>\n<p>\u041c\u043e\u044f \u0440\u0435\u0430\u043b\u0438\u0437\u0430\u0446\u0438\u044f \u043d\u0435 \u0441\u0430\u043c\u0430\u044f \u043e\u043f\u0442\u0438\u043c\u0430\u043b\u044c\u043d\u0430\u044f, \u043f\u043b\u044e\u0441 WL &#8212; \u044d\u0442\u043e \u0438\u043d\u0442\u0435\u0440\u043f\u0440\u0435\u0442\u0438\u0440\u0443\u0435\u043c\u044b\u0439 \u044f\u0437\u044b\u043a \u0438 \u043a\u0430\u0436\u0434\u0443\u044e \u043a\u043e\u043c\u0430\u043d\u0434\u0443 \u043e\u043d \u043e\u0442\u043f\u0440\u0430\u0432\u043b\u044f\u0435\u0442 \u0432 \u044f\u0434\u0440\u043e \u043f\u043e \u043e\u0442\u0434\u0435\u043b\u044c\u043d\u043e\u0441\u0442\u0438. \u041d\u0430 \u0441\u0430\u043c\u043e\u043c \u0434\u0435\u043b\u0435 \u043c\u043e\u0436\u043d\u043e \u043d\u0430\u043c\u043d\u043e\u0433\u043e \u043b\u0443\u0447\u0448\u0435, \u043d\u043e \u044d\u0442\u043e \u0431\u0443\u0434\u0435\u0442 \u0431\u043e\u043b\u0435\u0435 \u0433\u0440\u043e\u043c\u043e\u0437\u0434\u043a\u043e \u0438 \u043c\u0430\u043b\u043e\u0438\u043d\u0444\u043e\u0440\u043c\u0430\u0442\u0438\u0432\u043d\u043e. \u041d\u043e \u0432 \u043a\u043e\u043d\u0446\u0435 \u043a\u043e\u043d\u0446\u043e\u0432 \u043d\u0430\u043c \u0432\u0430\u0436\u043d\u0430 \u043d\u0435 \u0441\u0430\u043c\u0430 \u0441\u043a\u043e\u0440\u043e\u0441\u0442\u044c \u0432\u044b\u043f\u043e\u043b\u043d\u0435\u043d\u0438\u044f \u043e\u043f\u0435\u0440\u0430\u0446\u0438\u0439, \u0430 \u0438\u0445 \u0432\u0440\u0435\u043c\u0435\u043d\u043d\u0430\u044f \u0441\u043b\u043e\u0436\u043d\u043e\u0441\u0442\u044c. \u0427\u0442\u043e \u0436, \u0434\u043e\u043a\u0430\u0436\u0435\u043c, \u0447\u0442\u043e \u0434\u043e\u0431\u0430\u0432\u043b\u0435\u043d\u0438\u0435 \u0432 \u043d\u0430\u0447\u0430\u043b\u043e \u0438 \u043a\u043e\u043d\u0435\u0446 \u043d\u0435 \u0437\u0430\u0432\u0438\u0441\u044f\u0442 \u043e\u0442 \u0440\u0430\u0437\u043c\u0435\u0440\u0430 \u0441\u043f\u0438\u0441\u043a\u0430: <\/p>\n<pre><code class=\"haskell\">linkedList = LinkedList[];  appendTime = Table[{i, AbsoluteTiming[append[linkedList, i]][[1]]}, {i, 1, 10000}]; <\/code><\/pre>\n<pre><code class=\"haskell\">linkedList = LinkedList[];  prependTime = Table[{i, AbsoluteTiming[prepend[linkedList, i]][[1]]}, {i, 1, 10000}]; <\/code><\/pre>\n<pre><code class=\"haskell\">linkedList = LinkedList[];  popTime = Table[{i,  append[linkedList, i];  prepend[linkedList, i];  AbsoluteTiming[pop[linkedList]][[1]] }, {i, 1, 10000}]; <\/code><\/pre>\n<p>\u0418 \u043f\u043e\u0441\u0442\u0440\u043e\u0438\u043c \u0433\u0440\u0430\u0444\u0438\u043a \u0437\u0430\u0432\u0438\u0441\u0438\u043c\u043e\u0441\u0442\u0438 \u0432\u0440\u0435\u043c\u0435\u043d\u0438 \u043e\u043f\u0435\u0440\u0430\u0446\u0438\u0438 \u043e\u0442 \u0440\u0430\u0437\u043c\u0435\u0440\u0430 \u0441\u043f\u0438\u0441\u043a\u0430: <\/p>\n<pre><code class=\"haskell\">ListPlot[{appendTime, prependTime, popTime},  ImageSize -> Large,  PlotTheme -> \"Detailed\",  PlotLegends -> {\"append\", \"prepend\", \"pop\"} ]<\/code><\/pre>\n<figure class=\"full-width\"><img loading=\"lazy\" decoding=\"async\" src=\"https:\/\/habrastorage.org\/r\/w1560\/getpro\/habr\/upload_files\/7d7\/0db\/3dd\/7d70db3ddae8e35c68e9d8042b430aa0.png\" alt=\"\u0412\u0440\u0435\u043c\u044f \u043e\u043f\u0435\u0440\u0430\u0446\u0438\u0438 \u0432 \u0437\u0430\u0432\u0438\u0441\u0438\u043c\u043e\u0441\u0442\u0438 \u043e\u0442 \u0440\u0430\u0437\u043c\u0435\u0440\u0430 \u0441\u0432\u044f\u0437\u0430\u043d\u043d\u043e\u0433\u043e \u0441\u043f\u0438\u0441\u043a\u0430\" title=\"\u0412\u0440\u0435\u043c\u044f \u043e\u043f\u0435\u0440\u0430\u0446\u0438\u0438 \u0432 \u0437\u0430\u0432\u0438\u0441\u0438\u043c\u043e\u0441\u0442\u0438 \u043e\u0442 \u0440\u0430\u0437\u043c\u0435\u0440\u0430 \u0441\u0432\u044f\u0437\u0430\u043d\u043d\u043e\u0433\u043e \u0441\u043f\u0438\u0441\u043a\u0430\" width=\"803\" height=\"435\" data-src=\"https:\/\/habrastorage.org\/getpro\/habr\/upload_files\/7d7\/0db\/3dd\/7d70db3ddae8e35c68e9d8042b430aa0.png\"\/><\/p>\n<div><figcaption><em>\u0412\u0440\u0435\u043c\u044f \u043e\u043f\u0435\u0440\u0430\u0446\u0438\u0438 \u0432 \u0437\u0430\u0432\u0438\u0441\u0438\u043c\u043e\u0441\u0442\u0438 \u043e\u0442 \u0440\u0430\u0437\u043c\u0435\u0440\u0430 \u0441\u0432\u044f\u0437\u0430\u043d\u043d\u043e\u0433\u043e \u0441\u043f\u0438\u0441\u043a\u0430<\/em><\/figcaption><\/div>\n<\/figure>\n<p>\u041d\u0443 \u0438 \u0434\u043e\u043a\u0430\u0436\u0435\u043c, \u0447\u0442\u043e \u0432\u0440\u0435\u043c\u044f \u043f\u043e\u043b\u0443\u0447\u0435\u043d\u0438\u044f \u043f\u043e \u0438\u043d\u0434\u0435\u043a\u0441\u0443 \u0438 \u0438\u0437\u0432\u043b\u0435\u0447\u0435\u043d\u0438\u044f \u0432\u0441\u0435\u0445 \u044d\u043b\u0435\u043c\u0435\u043d\u0442\u043e\u0432 \u043b\u0438\u043d\u0435\u0439\u043d\u043e \u0440\u0430\u0441\u0442\u0435\u0442 \u0441 \u0440\u043e\u0441\u0442\u043e\u043c \u0447\u0438\u0441\u043b\u0430 \u044d\u043b\u0435\u043c\u0435\u043d\u0442\u043e\u0432: <\/p>\n<pre><code class=\"haskell\">linkedList = LinkedList[];  partTime = Table[{i,  append[linkedList, i];  index = RandomInteger[{1, First[linkedList][\"Size\"]}]; AbsoluteTiming[linkedList[[index]]][[1]] }, {i, 1, 2000}]; <\/code><\/pre>\n<pre><code class=\"haskell\">linkedList = LinkedList[];  normalTime = Table[{i,  append[linkedList, i];  AbsoluteTiming[Normal[linkedList]][[1]] }, {i, 1, 2000}]; <\/code><\/pre>\n<p>\u0418 \u043f\u043e\u0441\u0442\u0440\u043e\u0438\u043c \u0433\u0440\u0430\u0444\u0438\u043a: <\/p>\n<pre><code class=\"haskell\">ListPlot[{partTime, normalTime},  ImageSize -> Large,  PlotTheme -> \"Detailed\",  PlotLegends -> {\"part\", \"Normal\"} ]<\/code><\/pre>\n<figure class=\"full-width\"><img loading=\"lazy\" decoding=\"async\" src=\"https:\/\/habrastorage.org\/r\/w1560\/getpro\/habr\/upload_files\/3b8\/ef1\/1a3\/3b8ef11a3c1f176b9ffdc6db3c4c4a35.png\" alt=\"\u0412\u0440\u0435\u043c\u044f \u043f\u043e\u043b\u0443\u0447\u0435\u043d\u0438\u044f \u044d\u043b\u0435\u043c\u0435\u043d\u0442\u0430 \u043f\u043e \u0438\u043d\u0434\u0435\u043a\u0441\u0443 \u0438 \u043f\u043e\u043b\u0443\u0447\u0435\u043d\u0438\u044f \u0432\u0441\u0435\u0445 \u044d\u043b\u0435\u043c\u0435\u043d\u0442\u043e\u0432 \u0432 \u0437\u0430\u0432\u0438\u0441\u0438\u043c\u043e\u0441\u0442\u0438 \u043e\u0442 \u0440\u0430\u0437\u043c\u0435\u0440\u0430 \u0441\u043f\u0438\u0441\u043a\u0430\" title=\"\u0412\u0440\u0435\u043c\u044f \u043f\u043e\u043b\u0443\u0447\u0435\u043d\u0438\u044f \u044d\u043b\u0435\u043c\u0435\u043d\u0442\u0430 \u043f\u043e \u0438\u043d\u0434\u0435\u043a\u0441\u0443 \u0438 \u043f\u043e\u043b\u0443\u0447\u0435\u043d\u0438\u044f \u0432\u0441\u0435\u0445 \u044d\u043b\u0435\u043c\u0435\u043d\u0442\u043e\u0432 \u0432 \u0437\u0430\u0432\u0438\u0441\u0438\u043c\u043e\u0441\u0442\u0438 \u043e\u0442 \u0440\u0430\u0437\u043c\u0435\u0440\u0430 \u0441\u043f\u0438\u0441\u043a\u0430\" width=\"796\" height=\"448\" data-src=\"https:\/\/habrastorage.org\/getpro\/habr\/upload_files\/3b8\/ef1\/1a3\/3b8ef11a3c1f176b9ffdc6db3c4c4a35.png\"\/><\/p>\n<div><figcaption><em>\u0412\u0440\u0435\u043c\u044f \u043f\u043e\u043b\u0443\u0447\u0435\u043d\u0438\u044f \u044d\u043b\u0435\u043c\u0435\u043d\u0442\u0430 \u043f\u043e \u0438\u043d\u0434\u0435\u043a\u0441\u0443 \u0438 \u043f\u043e\u043b\u0443\u0447\u0435\u043d\u0438\u044f \u0432\u0441\u0435\u0445 \u044d\u043b\u0435\u043c\u0435\u043d\u0442\u043e\u0432 \u0432 \u0437\u0430\u0432\u0438\u0441\u0438\u043c\u043e\u0441\u0442\u0438 \u043e\u0442 \u0440\u0430\u0437\u043c\u0435\u0440\u0430 \u0441\u043f\u0438\u0441\u043a\u0430<\/em><\/figcaption><\/div>\n<\/figure>\n<p>\u0421\u043e\u0431\u0441\u0442\u0432\u0435\u043d\u043d\u043e \u043d\u0430 \u044d\u0442\u043e\u043c \u043d\u0430 \u0441\u0435\u0433\u043e\u0434\u043d\u044f \u0432\u0441\u0435! \u0421\u0432\u044f\u0437\u0430\u043d\u043d\u044b\u0439 \u0441\u043f\u0438\u0441\u043e\u043a \u0433\u043e\u0442\u043e\u0432, \u0430 \u0440\u0435\u0430\u043b\u0438\u0437\u0430\u0446\u0438\u044f \u0434\u0432\u0443\u043d\u0430\u043f\u0440\u0430\u0432\u043b\u0435\u043d\u043d\u043e\u0433\u043e \u0441\u0432\u044f\u0437\u0430\u043d\u043d\u043e \u0441\u043f\u0438\u0441\u043a\u0430 \u0438 \u0434\u043e\u043f\u043e\u043b\u043d\u0438\u0442\u0435\u043b\u044c\u043d\u044b\u0435 \u043c\u0435\u0442\u043e\u0434\u044b \u0441\u043f\u0438\u0441\u043a\u043e\u0432, \u043d\u0430\u043f\u0440\u0438\u043c\u0435\u0440, \u0432\u0441\u0442\u0430\u0432\u043a\u0430 \u0432 \u0441\u0435\u0440\u0435\u0434\u0438\u043d\u0443 \u0438 \u043f\u043e\u043b\u0443\u0447\u0435\u043d\u0438\u0435 \u0441\u0430\u043c\u043e\u0433\u043e \u0443\u0437\u043b\u0430 \u0432\u043c\u0435\u0441\u0442\u043e \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u044f \u043d\u0430\u043c \u0434\u043b\u044f \u0434\u0435\u043c\u043e\u043d\u0441\u0442\u0440\u0430\u0446\u0438\u0438 \u0441\u043e\u0437\u0434\u0430\u043d\u0438\u044f \u044d\u0442\u043e\u0439 \u0441\u0442\u0440\u0443\u043a\u0442\u0443\u0440\u044b \u0435 \u043f\u043e\u0442\u0440\u0435\u0431\u043e\u0432\u0430\u043b\u0438\u0441\u044c. <\/p>\n<h2>\u041a\u0440\u0430\u0441\u0438\u0432\u0430\u044f \u043f\u043b\u0430\u0448\u043a\u0430<\/h2>\n<p>\u0418 \u043f\u043e\u0441\u043b\u0435\u0434\u043d\u044f\u044f \u0441\u043e\u0432\u0435\u0440\u0448\u0435\u043d\u043d\u043e \u043d\u0435\u043e\u0431\u044f\u0437\u0430\u0442\u0435\u043b\u044c\u043d\u0430\u044f \u0447\u0430\u0441\u0442\u044c. \u0421\u0434\u0435\u043b\u0430\u0435\u043c \u0442\u0430\u043a, \u0447\u0442\u043e\u0431\u044b \u0432 \u0438\u043d\u0442\u0435\u0440\u0444\u0435\u0439\u0441\u0435 Mathematica \u043d\u0430\u0448\u0430 \u0441\u0442\u0440\u0443\u043a\u0442\u0443\u0440\u0430 \u0434\u0430\u043d\u043d\u044b\u0445 \u043a\u0440\u0430\u0441\u0438\u0432\u043e \u043e\u0442\u043e\u0431\u0440\u0430\u0436\u0430\u043b\u0430\u0441\u044c. \u0422.\u0435. \u043d\u0435 \u0432 \u0432\u0438\u0434\u0435 LinkedList[ref], \u0430 \u0442\u0430\u043a, \u043a\u0430\u043a \u043e\u0442\u043e\u0431\u0440\u0430\u0436\u0430\u044e\u0442\u0441\u044f \u0434\u0440\u0443\u0433\u0438\u0435 \u0441\u043b\u043e\u0436\u043d\u044b\u0435 \u043e\u0431\u044a\u0435\u043a\u0442\u044b. \u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440 \u0440\u0430\u0437\u0440\u0435\u0436\u0435\u043d\u043d\u044b\u0439 \u043c\u0430\u0441\u0441\u0438\u0432: <\/p>\n<pre><code class=\"haskell\">SparseArray[{{1, 1} -> 2, {100, 100} -> 101, {5, 66} -> 1243}]<\/code><\/pre>\n<figure class=\"full-width\"><img loading=\"lazy\" decoding=\"async\" src=\"https:\/\/habrastorage.org\/r\/w1560\/getpro\/habr\/upload_files\/e84\/d44\/743\/e84d44743db643bd3a5c6bf5787466b2.png\" alt=\"\u0420\u0430\u0437\u0440\u0435\u0436\u0435\u043d\u043d\u044b\u0439 \u043c\u0430\u0441\u0441\u0438\u0432 \u0441 \u0442\u0440\u0435\u043c\u044f \u043d\u0435\u043d\u0443\u043b\u0435\u0432\u044b\u043c\u0438 \u044d\u043b\u0435\u043c\u0435\u043d\u0442\u0430\u043c\u0438\" title=\"\u0420\u0430\u0437\u0440\u0435\u0436\u0435\u043d\u043d\u044b\u0439 \u043c\u0430\u0441\u0441\u0438\u0432 \u0441 \u0442\u0440\u0435\u043c\u044f \u043d\u0435\u043d\u0443\u043b\u0435\u0432\u044b\u043c\u0438 \u044d\u043b\u0435\u043c\u0435\u043d\u0442\u0430\u043c\u0438\" width=\"661\" height=\"95\" data-src=\"https:\/\/habrastorage.org\/getpro\/habr\/upload_files\/e84\/d44\/743\/e84d44743db643bd3a5c6bf5787466b2.png\"\/><\/p>\n<div><figcaption><em>\u0420\u0430\u0437\u0440\u0435\u0436\u0435\u043d\u043d\u044b\u0439 \u043c\u0430\u0441\u0441\u0438\u0432 \u0441 \u0442\u0440\u0435\u043c\u044f \u043d\u0435\u043d\u0443\u043b\u0435\u0432\u044b\u043c\u0438 \u044d\u043b\u0435\u043c\u0435\u043d\u0442\u0430\u043c\u0438<\/em><\/figcaption><\/div>\n<\/figure>\n<p>\u0427\u0442\u043e\u0431\u044b \u0441\u0434\u0435\u043b\u0430\u0442\u044c \u043d\u0435\u0447\u0442\u043e \u043f\u043e\u0445\u043e\u0436\u0435\u0435 &#8212; \u043d\u0430\u0434\u043e \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c \u0432\u043d\u0443\u0442\u0440\u0435\u043d\u043d\u044e\u044e \u0444\u0443\u043d\u043a\u0446\u0438\u044e \u0434\u043b\u044f <code>SummaryBox<\/code> :<\/p>\n<pre><code class=\"haskell\">$linkedListIcon = ImageResize[Import[\"https:\/\/wolfr.am\/1jBx5PyAQ\"], 1920 \/ 5];    LinkedList \/: MakeBoxes[linkedList: LinkedList[ref_Symbol?AssociationQ],  form: (StandardForm | TraditionalForm)] :=  Module[{above, below},  above = { {BoxForm`SummaryItem[{\"Ref: \", Defer[ref]}], SpanFromLeft},  {BoxForm`SummaryItem[{\"Size: \", ref[\"Size\"]}], SpanFromLeft},  {BoxForm`SummaryItem[{\"Head: \", linkedList[\"Head\"]}], SpanFromLeft},  {BoxForm`SummaryItem[{\"Tail: \", linkedList[\"Tail\"]}], SpanFromLeft} };  below = {};   (*Return*) BoxForm`ArrangeSummaryBox[ LinkedList,  linkedList,  $linkedListIcon,  above,  below,  form,  \"Interpretable\" -> Automatic ] ];<\/code><\/pre>\n<ul>\n<li>\n<p><code>MakeBoxes<\/code> &#8212; \u0444\u0443\u043d\u043a\u0446\u0438\u044f, \u043a\u043e\u0442\u043e\u0440\u0430\u044f \u043f\u0435\u0440\u0435\u043e\u043f\u0440\u0435\u0434\u0435\u043b\u044f\u0435\u0442 \u043e\u0442\u043e\u0431\u0440\u0430\u0436\u0435\u043d\u0438\u0435 \u043d\u0435\u043a\u043e\u0442\u043e\u0440\u043e\u0433\u043e \u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u044f \u0432 \u0438\u043d\u0442\u0435\u0440\u0444\u0435\u0439\u0441\u0435 Wolfram Mathematica<\/p>\n<\/li>\n<li>\n<p><code>(StandardForm | TraditionalForm)<\/code> &#8212; \u0434\u0432\u0430 \u0430\u043b\u044c\u0442\u0435\u0440\u043d\u0430\u0442\u0438\u0432\u043d\u044b\u0445 \u0444\u043e\u0440\u043c\u0430\u0442\u0430 \u043d\u0430 \u043a\u043e\u0442\u043e\u0440\u044b\u0445 \u0441\u0440\u0430\u0431\u043e\u0442\u0430\u0435\u0442 \u044d\u0442\u043e \u043e\u0442\u043e\u0431\u0440\u0430\u0436\u0435\u043d\u0438\u0435. \u0415\u0441\u0442\u044c \u0435\u0449\u0435 \u043d\u0430\u043f\u0440\u0438\u043c\u0435\u0440 FullForm &#8212; \u043e\u043d \u043d\u0435 \u043f\u0435\u0440\u0435\u043e\u043f\u0440\u0435\u0434\u0435\u043b\u0435\u043d \u0438 \u043f\u043e\u043a\u0430\u0436\u0435\u0442 \u0441\u043f\u0438\u0441\u043e\u043a <em>&#171;\u043a\u0430\u043a \u0435\u0441\u0442\u044c&#187;<\/em><\/p>\n<\/li>\n<li>\n<p><code>BoxForm`ArrangeSummaryBox<\/code> \u0438 <code>BoxForm`SummaryItem<\/code> &#8212; \u0442\u0435 \u0441\u0430\u043c\u044b\u0435 \u0432\u043d\u0443\u0442\u0440\u0435\u043d\u043d\u0438\u0435 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0434\u043b\u044f \u0441\u043e\u0437\u0434\u0430\u043d\u0438\u044f &#171;\u043f\u043b\u0430\u0448\u0435\u043a&#187;<\/p>\n<\/li>\n<li>\n<p><code>$linkedListIcon<\/code> &#8212; \u0438\u043a\u043e\u043d\u043a\u0430, \u043a\u043e\u0442\u043e\u0440\u0443\u044e \u044f \u0441\u043a\u0430\u0447\u0430\u043b \u043f\u0440\u044f\u043c\u043e \u0438\u0437 \u0438\u043d\u0442\u0435\u0440\u043d\u0435\u0442\u0430 \u043f\u043e \u043a\u043e\u0440\u043e\u0442\u043a\u043e\u0439 \u0441\u0441\u044b\u043b\u043a\u0435<\/p>\n<\/li>\n<\/ul>\n<figure class=\"full-width\"><img loading=\"lazy\" decoding=\"async\" src=\"https:\/\/habrastorage.org\/r\/w1560\/getpro\/habr\/upload_files\/b8d\/dd0\/a24\/b8ddd0a24623fb07a73b994d14a6bd3b.png\" alt=\"\u0412\u0438\u0437\u0443\u0430\u043b\u044c\u043d\u043e\u0435 \u043e\u0442\u043e\u0431\u0440\u0430\u0436\u0435\u043d\u0438\u0435 \u0441\u0432\u044f\u0437\u0430\u043d\u043d\u043e\u0433\u043e \u0441\u043f\u0438\u0441\u043a\u0430 \u0432 \u0431\u043b\u043e\u043a\u043d\u043e\u0442\u0435\" title=\"\u0412\u0438\u0437\u0443\u0430\u043b\u044c\u043d\u043e\u0435 \u043e\u0442\u043e\u0431\u0440\u0430\u0436\u0435\u043d\u0438\u0435 \u0441\u0432\u044f\u0437\u0430\u043d\u043d\u043e\u0433\u043e \u0441\u043f\u0438\u0441\u043a\u0430 \u0432 \u0431\u043b\u043e\u043a\u043d\u043e\u0442\u0435\" width=\"866\" height=\"389\" data-src=\"https:\/\/habrastorage.org\/getpro\/habr\/upload_files\/b8d\/dd0\/a24\/b8ddd0a24623fb07a73b994d14a6bd3b.png\"\/><\/p>\n<div><figcaption><em>\u0412\u0438\u0437\u0443\u0430\u043b\u044c\u043d\u043e\u0435 \u043e\u0442\u043e\u0431\u0440\u0430\u0436\u0435\u043d\u0438\u0435 \u0441\u0432\u044f\u0437\u0430\u043d\u043d\u043e\u0433\u043e \u0441\u043f\u0438\u0441\u043a\u0430 \u0432 \u0431\u043b\u043e\u043a\u043d\u043e\u0442\u0435<\/em><\/figcaption><\/div>\n<\/figure>\n<h2>\u0417\u0430\u043a\u043b\u044e\u0447\u0435\u043d\u0438\u0435<\/h2>\n<p>\u0412 \u044d\u0442\u043e\u0439 \u0441\u0442\u0430\u0442\u044c\u0435 \u044f \u043f\u043e\u0441\u0442\u0430\u0440\u0430\u043b\u0441\u044f \u043f\u043e\u043a\u0430\u0437\u0430\u0442\u044c \u043a\u0430\u043a\u0438\u043c \u043e\u0431\u0440\u0430\u0437\u043e\u043c \u043c\u043e\u0436\u043d\u043e \u0441\u0430\u043c\u043e\u0441\u0442\u043e\u044f\u0442\u0435\u043b\u044c\u043d\u043e \u0440\u0435\u0430\u043b\u0438\u0437\u043e\u0432\u0430\u0442\u044c \u043d\u0435\u043a\u0443\u044e \u0441\u0442\u0440\u0443\u043a\u0442\u0443\u0440\u0443 \u0434\u0430\u043d\u043d\u044b\u0445 \u043d\u0430 Wolrfam Language. \u042f \u043e\u0441\u043e\u0431\u0435\u043d\u043d\u043e \u0445\u043e\u0447\u0443 \u043e\u0442\u043c\u0435\u0442\u0438\u0442\u044c \u0442\u043e, \u043a\u0430\u043a \u044f \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u043b \u0443\u0434\u0435\u0440\u0436\u0438\u0432\u0430\u044e\u0449\u0438\u0439 \u0430\u0442\u0440\u0438\u0431\u0443\u0442 HoldFirst, \u0430 \u0442\u0430\u043a \u0436\u0435 \u043a\u043e\u043d\u0441\u0442\u0440\u0443\u043a\u0446\u0438\u044e With \u0434\u043b\u044f \u0442\u043e\u0433\u043e \u0447\u0442\u043e\u0431\u044b \u0432 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 \u0441 HoldFirst \u043f\u0435\u0440\u0435\u0434\u0430\u0432\u0430\u0442\u044c \u043d\u0435 \u0441\u0441\u044b\u043b\u043a\u0443 \u0430 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435. \u041d\u0430\u0434\u0435\u044e\u0441\u044c \u0432\u0430\u043c \u0441\u0442\u0430\u0442\u044c\u044f \u043f\u043e\u043a\u0430\u0437\u0430\u043b\u0430\u0441\u044c \u0438\u043d\u0442\u0435\u0440\u0435\u0441\u043d\u043e\u0439! \u0412 \u0441\u043b\u0435\u0434\u0443\u044e\u0449\u0438\u0439 \u0440\u0430\u0437 \u043c\u044b \u0440\u0435\u0430\u043b\u0438\u0437\u0443\u0435\u043c \u0435\u0449\u0435 \u043a\u0430\u043a\u0443\u044e-\u043d\u0438\u0431\u0443\u0434\u044c \u0441\u0442\u0440\u0443\u043a\u0442\u0443\u0440\u0443 \u0434\u0430\u043d\u043d\u044b\u0445 \u0441 \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u043d\u0438\u0435\u043c \u043e\u0441\u043e\u0431\u0435\u043d\u043d\u043e\u0441\u0442\u0435\u0439 WL. <\/p>\n<p><em>\u0412\u0441\u0435\u043c \u0441\u043f\u0430\u0441\u0438\u0431\u043e \u0437\u0430 \u0432\u043d\u0438\u043c\u0430\u043d\u0438\u0435!<\/em><\/p>\n<\/p>\n<\/div>\n<\/div>\n<\/div>\n<p><!----><!----><\/div>\n<p><!----><!----><br \/> \u0441\u0441\u044b\u043b\u043a\u0430 \u043d\u0430 \u043e\u0440\u0438\u0433\u0438\u043d\u0430\u043b \u0441\u0442\u0430\u0442\u044c\u0438 <a href=\"https:\/\/habr.com\/ru\/articles\/787784\/\"> https:\/\/habr.com\/ru\/articles\/787784\/<\/a><\/p>\n","protected":false},"excerpt":{"rendered":"<div><!--[--><!--]--><\/div>\n<div id=\"post-content-body\">\n<div>\n<div class=\"article-formatted-body article-formatted-body article-formatted-body_version-2\">\n<div xmlns=\"http:\/\/www.w3.org\/1999\/xhtml\">\n<figure class=\"full-width\">\n<div><figcaption><em>\u0413\u0435\u043e\u0440\u0433\u0438\u0439 \u0412\u0438\u0446\u0438\u043d \u043f\u044b\u0442\u0430\u0435\u0442\u0441\u044f \u043e\u0441\u0432\u043e\u0431\u043e\u0434\u0438\u0442\u044c\u0441\u044f \u0437\u0430 O(1)<\/em><\/figcaption><\/div>\n<\/figure>\n<p>\u0412\u043e\u0437\u043c\u043e\u0436\u043d\u043e 11 \u043f\u043e\u0434\u043f\u0438\u0441\u0447\u0438\u043a\u043e\u0432 \u043c\u043e\u0435\u0433\u043e \u0431\u043b\u043e\u0433\u0430 \u043e\u0431\u0440\u0430\u0442\u0438\u043b\u0438 \u0432\u043d\u0438\u043c\u0430\u043d\u0438\u0435 \u043d\u0430 \u0442\u043e\u0442 \u0444\u0430\u043a\u0442, \u0447\u0442\u043e \u0432\u0441\u0435 \u043c\u043e\u0438 \u0441\u0442\u0430\u0442\u044c\u0438 \u043a\u0430\u0441\u0430\u044e\u0442\u0441\u044f \u044f\u0437\u044b\u043a\u0430 Wolfram, \u0430 \u043d\u0435\u0441\u043a\u043e\u043b\u044c\u043a\u043e \u043f\u043e\u0441\u043b\u0435\u0434\u043d\u0438\u0445 \u0441\u0442\u0430\u0442\u0435\u0439 \u0432\u044b\u0448\u043b\u0438 \u0434\u043e\u0432\u043e\u043b\u044c\u043d\u043e \u0433\u0440\u043e\u043c\u043e\u0437\u0434\u043a\u0438\u043c\u0438. <a href=\"https:\/\/habr.com\/ru\/articles\/779550\/\" rel=\"noopener noreferrer nofollow\">\u041e\u0434\u043d\u0430 \u0438\u0437 \u043f\u043e\u0441\u043b\u0435\u0434\u043d\u0438\u0445<\/a> \u0441\u0442\u0430\u0442\u0435\u0439 \u0431\u044b\u043b\u0430 \u043f\u043e\u043c\u0435\u0447\u0435\u043d\u0430 \u0425\u0430\u0431\u0440\u043e\u043c \u043a\u0430\u043a \u0442\u0440\u0435\u0431\u0443\u044e\u0449\u0430\u044f \u0432 \u0441\u0440\u0435\u0434\u043d\u0435\u043c 32 \u043c\u0438\u043d\u0443\u0442\u044b \u043d\u0430 \u043f\u0440\u043e\u0447\u0442\u0435\u043d\u0438\u0435. \u042f \u043f\u043e\u0441\u0447\u0438\u0442\u0430\u043b, \u0447\u0442\u043e \u044d\u0442\u043e \u043c\u043e\u0436\u0435\u0442 \u043e\u0442\u043f\u0443\u0433\u043d\u0443\u0442\u044c \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u0435\u043b\u0435\u0439 (\u0432\u0441\u0435 11 \u0447\u0435\u043b\u043e\u0432\u0435\u043a \u0438 \u043d\u0435 \u0444\u0430\u043a\u0442, \u0447\u0442\u043e \u0432\u0441\u0435 \u043e\u043d\u0438 \u0434\u043e \u0441\u0438\u0445 \u043f\u043e\u0440 \u0447\u0438\u0442\u0430\u044e\u0442 \u0425\u0430\u0431\u0440) \u0438 \u0440\u0435\u0448\u0438\u043b \u043f\u043e\u043f\u0440\u043e\u0431\u043e\u0432\u0430\u0442\u044c \u043f\u0438\u0441\u0430\u0442\u044c \u0431\u043e\u043b\u0435\u0435 \u043a\u043e\u0440\u043e\u0442\u043a\u0438\u0435 \u0441\u0442\u0430\u0442\u044c\u0438. \u041f\u043b\u044e\u0441 \u044f \u0441\u0430\u043c \u043f\u0435\u0440\u0435\u0441\u0442\u0430\u043d\u0443 \u0442\u0435\u0440\u044f\u0442\u044c\u0441\u044f \u0432 \u0431\u043e\u043b\u044c\u0448\u043e\u043c \u043a\u043e\u043b\u0438\u0447\u0435\u0441\u0442\u0432\u0435 \u0442\u0435\u043a\u0441\u0442\u0430. <\/p>\n<p>\u0414\u0430\u043d\u043d\u0430\u044f \u0441\u0442\u0430\u0442\u044c\u044f \u044f\u0432\u043b\u044f\u0435\u0442\u0441\u044f \u043f\u043e\u043b\u043d\u043e\u0441\u0442\u044c\u044e \u0441\u0430\u043c\u043e\u0441\u0442\u043e\u044f\u0442\u0435\u043b\u044c\u043d\u043e\u0439 \u0438 \u0446\u0435\u043d\u043d\u0430 \u0434\u043b\u044f \u043c\u0435\u043d\u044f \u0441\u0430\u043c\u0430 \u043f\u043e \u0441\u0435\u0431\u0435, \u043d\u043e \u043e\u043d\u0430 \u0442\u0430\u043a \u0436\u0435 \u044f\u0432\u043b\u044f\u0435\u0442\u0441\u044f \u043f\u043e\u0434\u0433\u043e\u0442\u043e\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u043e\u0439 \u0447\u0430\u0441\u0442\u044c\u044e \u043a \u0434\u0440\u0443\u0433\u043e\u0439 \u0441\u0442\u0430\u0442\u044c\u0435, \u043a\u043e\u0442\u043e\u0440\u0430\u044f \u0441\u0432\u044f\u0437\u0430\u043d\u0430 \u0441 \u043e\u0434\u043d\u043e\u0439 \u043d\u0435\u0441\u043b\u043e\u0436\u043d\u043e\u0439 \u0430\u043b\u0433\u043e\u0440\u0438\u0442\u043c\u0438\u0447\u0435\u0441\u043a\u043e\u0439 \u0437\u0430\u0434\u0430\u0447\u0435\u0439 \u0438 \u043f\u043e\u043a\u0430 \u0447\u0442\u043e \u043d\u0430\u0445\u043e\u0434\u0438\u0442\u0441\u044f \u0432 \u0447\u0435\u0440\u043d\u043e\u0432\u0438\u043a\u0430\u0445. \u041f\u043e\u043a\u0430 \u044f \u043f\u0438\u0441\u0430\u043b \u0435\u0435 &#8212; \u044f \u043f\u043e\u043d\u044f\u043b, \u0447\u0442\u043e \u0432\u044b\u0439\u0434\u0435\u0442 \u043c\u043d\u043e\u0433\u043e \u0442\u0435\u043a\u0441\u0442\u0430 \u0438 \u043a\u043e\u0434\u0430, \u043f\u043e\u044d\u0442\u043e\u043c\u0443 \u044f \u0440\u0435\u0448\u0438\u043b \u0440\u0430\u0437\u0431\u0438\u0442\u044c \u0435\u0435 \u043d\u0430 \u043d\u0435\u0441\u043a\u043e\u043b\u044c\u043a\u043e \u0447\u0430\u0441\u0442\u0435\u0439. <\/p>\n<p>\u041d\u0438\u0436\u0435 \u0440\u0435\u0430\u043b\u0438\u0437\u0430\u0446\u0438\u044f \u0441\u0442\u0440\u0443\u043a\u0442\u0443\u0440\u044b \u0434\u0430\u043d\u043d\u044b\u0445 <strong>LinkedList<\/strong> \u043d\u0430 <em>Wolfram Language<\/em>. <\/p>\n<h2>\u041e \u0441\u0432\u044f\u0437\u0430\u043d\u043d\u043e\u043c \u0441\u043f\u0438\u0441\u043a\u0435<\/h2>\n<p>\u041d\u0435 \u0434\u0443\u043c\u0430\u044e, \u0447\u0442\u043e \u044d\u0442\u043e \u0442\u0440\u0435\u0431\u0443\u0435\u0442 \u0434\u043b\u0438\u043d\u043d\u044b\u0445 \u043e\u0431\u044a\u044f\u0441\u043d\u0435\u043d\u0438\u0439, \u043d\u043e \u0435\u0441\u043b\u0438 \u0441\u043e\u0432\u0441\u0435\u043c \u043a\u043e\u0440\u043e\u0442\u043a\u043e, \u0442\u043e \u0442\u0430\u043a\u0430\u044f \u0441\u0442\u0440\u0443\u043a\u0442\u0443\u0440\u0430 \u0434\u0430\u043d\u043d\u044b\u0445 \u0446\u0435\u043d\u043d\u0430 \u0442\u0435\u043c, \u0447\u0442\u043e: <\/p>\n<ul>\n<li>\n<p>\u0414\u043e\u0431\u0430\u0432\u043b\u0435\u043d\u0438\u0435 \u0432 \u043a\u043e\u043d\u0435\u0446\/\u043d\u0430\u0447\u0430\u043b\u043e \u0437\u0430 <strong>O(1)<\/strong><\/p>\n<\/li>\n<li>\n<p>\u0423\u0434\u0430\u043b\u0435\u043d\u0438\u0435 \u0438\u0437 \u043d\u0430\u0447\u0430\u043b\u0430 \u0437\u0430 <strong>O(1)<\/strong><\/p>\n<\/li>\n<li>\n<p>\u041f\u043e\u0438\u0441\u043a \u0438\u043b\u0438 \u043f\u043e\u043b\u0443\u0447\u0435\u043d\u0438\u0435 \u043f\u043e \u0438\u043d\u0434\u0435\u043a\u0441\u0443 \u0437\u0430 <strong>O(n)<\/strong> &#8212; <em>\u044d\u0442\u043e \u043d\u0435 \u043e\u0447\u0435\u043d\u044c \u0446\u0435\u043d\u043d\u043e<\/em><\/p>\n<\/li>\n<li>\n<p>\u0412\u0441\u0442\u0430\u0432\u043a\u0430 \u0432 \u0441\u0435\u0440\u0435\u0434\u0438\u043d\u0443 \u0437\u0430 <strong>O(1)<\/strong>, \u043d\u043e \u043f\u043e\u0438\u0441\u043a-\u0442\u043e \u0434\u043e\u043b\u0433\u0438\u0439<\/p>\n<\/li>\n<li>\n<p>\u041f\u043e\u043b\u0443\u0447\u0435\u043d\u0438\u0435 \u0432\u0441\u0435\u0445 \u044d\u043b\u0435\u043c\u0435\u043d\u0442\u043e\u0432 \u0437\u0430 <strong>O(n)<\/strong> &#8212; \u043a\u0430\u043a \u0443 \u0431\u043e\u043b\u044c\u0448\u0438\u043d\u0441\u0442\u0432\u0430 \u0441\u0442\u0440\u0443\u043a\u0442\u0443\u0440<\/p>\n<\/li>\n<\/ul>\n<p>\u042d\u0442\u0430 \u0441\u0442\u0440\u0443\u043a\u0442\u0443\u0440\u0430 \u0434\u0430\u043d\u043d\u044b\u0445 \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u0443\u0435\u0442\u0441\u044f \u0434\u043b\u044f \u0440\u0435\u0430\u043b\u0438\u0437\u0430\u0446\u0438\u0438 \u0441\u0442\u0435\u043a\u0430 \u0438 \u043e\u0447\u0435\u0440\u0435\u0434\u0438, \u0442\u0430\u043a \u043a\u0430\u043a \u043e\u043d\u0430 \u043e\u043f\u0442\u0438\u043c\u0438\u0437\u0438\u0440\u043e\u0432\u0430\u043d\u043d\u043e \u0434\u043e\u0431\u0430\u0432\u043b\u044f\u0435\u0442 \u044d\u043b\u0435\u043c\u0435\u043d\u0442\u044b \u0432 \u043d\u0430\u0447\u0430\u043b\u043e \u0438 \u043a\u043e\u043d\u0435\u0446. \u0412 Wolfram Language \u043d\u0430\u0447\u0438\u043d\u0430\u044f \u0441 \u0432\u0435\u0440\u0441\u0438\u0438 12.1 \u0435\u0441\u0442\u044c \u0442\u0430\u043a\u0438\u0435 \u0441\u0442\u0440\u0443\u043a\u0442\u0443\u0440\u044b \u0434\u0430\u043d\u043d\u044b\u0445 \u043a\u0430\u043a \u0441\u0432\u044f\u0437\u0430\u043d\u043d\u044b\u0439 \u0441\u043f\u0438\u0441\u043e\u043a \u0438 \u0434\u0432\u0443\u043d\u0430\u043f\u0440\u0430\u0432\u043b\u0435\u043d\u043d\u044b\u0439 \u0441\u0432\u044f\u0437\u0430\u043d\u043d\u044b\u0439 \u0441\u043f\u0438\u0441\u043e\u043a, \u0430 \u0442\u0430\u043a\u0436\u0435 \u0441\u0442\u0435\u043a, \u043e\u0447\u0435\u0440\u0435\u0434\u044c, \u043a\u043e\u043b\u044c\u0446\u0435\u0432\u043e\u0439 \u0431\u0443\u0444\u0435\u0440 \u0438 \u043d\u0435\u043a\u043e\u0442\u043e\u0440\u044b\u0435 \u0434\u0440\u0443\u0433\u0438\u0435. \u041d\u043e \u043d\u0430\u0441 \u043d\u0435 \u0438\u043d\u0442\u0435\u0440\u0435\u0441\u0443\u0435\u0442 \u0432\u0441\u0442\u0440\u043e\u0435\u043d\u043d\u0430\u044f \u0440\u0435\u0430\u043b\u0438\u0437\u0430\u0446\u0438\u044f, \u0442\u0430\u043a \u043a\u0430\u043a \u0437\u0434\u0435\u0441\u044c \u043a\u043b\u0443\u0431 \u0432\u0435\u043b\u043e-\u043b\u044e\u0431\u0438\u0442\u0435\u043b\u0435\u0439. \u041d\u043e \u0435\u0441\u043b\u0438 \u0447\u0442\u043e, \u0432\u043e\u0442 \u0442\u0430\u043a \u0441\u043e\u0437\u0434\u0430\u044e\u0442\u0441\u044f \u0441\u0432\u044f\u0437\u0430\u043d\u043d\u044b\u0435 \u0441\u043f\u0438\u0441\u043a\u0438 \u0432 WL:<\/p>\n<pre><code class=\"haskell\">linkedList = CreateDataStructure[\"LinkedList\"]; Do[linkedList[\"Append\", i], {i, 1000}] linkedList[\"Visualization\"]<\/code><\/pre>\n<pre><code class=\"haskell\">doublyLinkedList = CreateDataStructure[\"DoublyLinkedList\"]; Do[doublyLinkedList[\"Append\", i], {i, 1000}] doublyLinkedList[\"Visualization\"]<\/code><\/pre>\n<figure class=\"full-width\">\n<div><figcaption><em>\u0412\u0438\u0437\u0443\u0430\u043b\u0438\u0437\u0430\u0446\u0438\u044f \u0441\u0432\u044f\u0437\u0430\u043d\u043d\u043e\u0433\u043e \u0441\u043f\u0438\u0441\u043a\u0430 \u0438 \u0434\u0432\u0443\u043d\u0430\u043f\u0440\u0430\u0432\u043b\u0435\u043d\u043d\u043e\u0433\u043e \u0441\u0432\u044f\u0437\u0430\u043d\u043d\u043e\u0433\u043e \u0441\u043f\u0438\u0441\u043a\u0430<\/em><\/figcaption><\/div>\n<\/figure>\n<h2>\u0423\u0437\u0435\u043b \u0441\u043f\u0438\u0441\u043a\u0430<\/h2>\n<p>\u0427\u0442\u043e \u0436, \u043f\u0440\u0438\u0441\u0442\u0443\u043f\u0438\u043c! \u0412 \u043f\u0435\u0440\u0432\u0443\u044e \u043e\u0447\u0435\u0440\u0435\u0434\u044c \u0440\u0435\u0430\u043b\u0438\u0437\u0443\u0435\u043c \u043d\u0435 \u0441\u0430\u043c \u0441\u043f\u0438\u0441\u043e\u043a \u0446\u0435\u043b\u0438\u043a\u043e\u043c, \u0430 \u0442\u043e\u043b\u044c\u043a\u043e \u043e\u0434\u0438\u043d \u0443\u0437\u0435\u043b \u044d\u0442\u043e\u0433\u043e \u0441\u043f\u0438\u0441\u043a\u0430. \u0421\u043d\u0430\u0447\u0430\u043b\u0430 \u043b\u0435\u0433\u043a\u0430\u044f \u043f\u043e\u0434\u0433\u043e\u0442\u043e\u0432\u043a\u0430: <\/p>\n<pre><code class=\"haskell\">$HistoryLength = 0;  ClearAll[LinkedListNode];  SetAttributes[LinkedListNode, HoldFirst]; <\/code><\/pre>\n<p><code>HoldFirst<\/code> &#8212; \u043f\u043e\u0437\u0432\u043e\u043b\u0438\u0442 \u0434\u0435\u0440\u0436\u0430\u0442\u044c \u043f\u0435\u0440\u0432\u044b\u0439 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442 \u043d\u0435\u0432\u044b\u043f\u043e\u043b\u043d\u0435\u043d\u043d\u044b\u043c. \u0412 WL &#8212; \u044d\u0442\u043e \u043e\u0434\u0438\u043d \u0438\u0437 \u0441\u043f\u043e\u0441\u043e\u0431\u043e\u0432 \u0445\u0440\u0430\u043d\u0435\u043d\u0438\u044f <em>&#171;\u0441\u0441\u044b\u043b\u043a\u0438&#187;<\/em> \u043d\u0430 \u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435, \u0432\u043c\u0435\u0441\u0442\u043e \u0441\u0430\u043c\u043e\u0433\u043e \u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u044f, \u0442.\u0435. \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u044f. \u0422\u0435\u043f\u0435\u0440\u044c \u0441\u043e\u0437\u0434\u0430\u0435\u043c <em>&#171;\u043a\u043e\u043d\u0441\u0442\u0440\u0443\u043a\u0442\u043e\u0440&#187;<\/em> \u0434\u043b\u044f \u0443\u0437\u043b\u0430 \u0441\u043f\u0438\u0441\u043a\u0430 (\u043d\u0430 \u0441\u0430\u043c\u043e\u043c \u0434\u0435\u043b\u0435 \u044d\u0442\u043e \u043f\u0440\u043e\u0441\u0442\u043e \u0444\u0443\u043d\u043a\u0446\u0438\u044f): <\/p>\n<pre><code class=\"haskell\">LinkedListNode[ref_Symbol, value_, next_] :=  With[{uuid = CreateUUID[\"LINKEDLISTNODE-\"]},  If[Not[AssociationQ[ref]], ref = &lt;|\"Nodes\" -> &lt;||>|>];  ref[\"Nodes\", uuid] = &lt;| \"Value\" -> value,  \"Next\" -> next |>;  LinkedListNode[ref, uuid] ]; <\/code><\/pre>\n<ul>\n<li>\n<p><strong>ref<\/strong> &#8212; \u0442\u0430 \u0441\u0430\u043c\u0430\u044f <em>&#171;\u0441\u0441\u044b\u043b\u043a\u0430&#187;<\/em>, \u0432 \u043a\u043e\u0442\u043e\u0440\u043e\u0439 \u0445\u0440\u0430\u043d\u044f\u0442\u0441\u044f \u0434\u0430\u043d\u043d\u044b\u0435 \u0441\u043f\u0438\u0441\u043a\u0430 \u0438 \u0443\u0437\u043b\u0430. \u0415\u0441\u043b\u0438 \u044d\u0442\u0430 \u0441\u0441\u044b\u043b\u043a\u0430 \u043d\u0435 \u044f\u0432\u043b\u044f\u0435\u0442\u0441\u044f \u0430\u0441\u0441\u043e\u0446\u0438\u0430\u0446\u0438\u0435\u0439, \u0442\u043e \u0435\u0439 \u0437\u0430\u0434\u0430\u0435\u0442\u0441\u044f \u043d\u043e\u0432\u043e\u0435 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435. <\/p>\n<\/li>\n<li>\n<p><strong>uuid<\/strong> &#8212; \u0443\u043d\u0438\u043a\u0430\u043b\u044c\u043d\u044b\u0439 \u043d\u043e\u043c\u0435\u0440 \u0443\u0437\u043b\u0430<\/p>\n<\/li>\n<li>\n<p><strong>value<\/strong> &#8212; \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435<\/p>\n<\/li>\n<li>\n<p><strong>next<\/strong> &#8212; \u0441\u043b\u0435\u0434\u0443\u044e\u0449\u0438\u0439 \u0443\u0437\u0435\u043b<\/p>\n<\/li>\n<\/ul>\n<p>\u0412\u043e\u0442 \u043f\u0440\u0438\u043c\u0435\u0440 \u0443\u0437\u043b\u0430: <\/p>\n<pre><code class=\"haskell\">ClearAll[ref];  node1 = LinkedListNode[ref, 1, Null] (*LinkedListNode[ref, \"LINKEDLISTNODE-ad484b44-803b-436f-966a-b359ac961235\"]*)<\/code><\/pre>\n<p>\u0412\u043e\u0442 \u043a\u0430\u043a\u043e\u0435 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435 \u0431\u0443\u0434\u0435\u0442 \u0445\u0440\u0430\u043d\u0438\u0442\u044c \u0441\u0441\u044b\u043b\u043a\u0430-\u0441\u0438\u043c\u0432\u043e\u043b, \u043f\u043e\u0441\u043b\u0435 \u0432\u044b\u0437\u043e\u0432\u0430 \u043a\u043e\u043d\u0441\u0442\u0440\u0443\u043a\u0442\u043e\u0440\u0430:<\/p>\n<pre><code class=\"haskell\">ref (*&lt;|   \"Nodes\" -> &lt;|     \"LINKEDLISTNODE-ad484b44-803b-436f-966a-b359ac961235\" -> &lt;|       \"Value\" -> 1, \"Next\" -> Null     |>   |> |>*)<\/code><\/pre>\n<p>\u041e\u0431\u0440\u0430\u0442\u0438\u0442\u0435 \u0432\u043d\u0438\u043c\u0430\u043d\u0438\u0435, \u0447\u0442\u043e \u0441\u0438\u043c\u0432\u043e\u043b <code>ref<\/code> \u0438\u043c\u0435\u0435\u0442 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435, \u043d\u043e \u0432\u043d\u0443\u0442\u0440\u0438 \u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u044f \u0441 \u0437\u0430\u0433\u043e\u043b\u043e\u0432\u043a\u043e\u043c <code>LinkedListNode<\/code> \u0431\u043b\u0430\u0433\u043e\u0434\u0430\u0440\u044f \u0430\u0442\u0440\u0438\u0431\u0443\u0442\u0443 \u043e\u043d\u043e \u0432\u0441\u0435 \u0435\u0449\u0435 \u043e\u0441\u0442\u0430\u0435\u0442\u0441\u044f \u0432 \u0432\u0438\u0434\u0435 \u043d\u0435\u0432\u044b\u0447\u0438\u0441\u043b\u0435\u043d\u043d\u043e\u0433\u043e \u0441\u0438\u043c\u0432\u043e\u043b\u0430. \u041b\u0443\u0447\u0448\u0435 \u043f\u043e\u043d\u044f\u0442\u044c \u0441\u043c\u044b\u0441\u043b &#171;\u0443\u0434\u0435\u0440\u0436\u0438\u0432\u0430\u043d\u0438\u044f&#187; \u043c\u043e\u0436\u043d\u043e \u043d\u0430 \u043f\u0440\u043e\u0441\u0442\u043e\u043c \u043f\u0440\u0438\u043c\u0435\u0440\u0435: <\/p>\n<pre><code class=\"haskell\">x = 1;   f[x]  SetAttributes[g, HoldFirst]  g[x]<\/code><\/pre>\n<figure class=\"full-width\">\n<div><figcaption><em>\u041a\u0430\u043a \u0440\u0430\u0431\u043e\u0442\u0430\u0435\u0442 HoldFirst<\/em><\/figcaption><\/div>\n<\/figure>\n<p>\u0422\u0435\u043f\u0435\u0440\u044c \u0434\u043e\u0431\u0430\u0432\u0438\u043c \u0443\u0437\u043b\u0443 \u043c\u0435\u0442\u043e\u0434\u044b. \u0418\u0437\u0432\u043b\u0435\u0447\u0435\u043d\u0438\u0435 \u0435\u0433\u043e \u0441\u0432\u043e\u0439\u0441\u0442\u0432: <\/p>\n<pre><code class=\"haskell\">LinkedListNode[ref_Symbol, uuid_String][key_] :=  ref[\"Nodes\", uuid, key]<\/code><\/pre>\n<p>\u0423\u043d\u0438\u043a\u0430\u043b\u044c\u043d\u043e\u0433\u043e \u043d\u043e\u043c\u0435\u0440\u0430: <\/p>\n<pre><code class=\"haskell\">LinkedListNode[ref_Symbol, uuid_String][\"UUID\"] :=  uuid; <\/code><\/pre>\n<p>\u0418 \u0438\u0437\u043c\u0435\u043d\u0435\u043d\u0438\u0435 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0439 \u0441\u0432\u043e\u0439\u0441\u0442\u0432: <\/p>\n<pre><code class=\"haskell\">LinkedListNode \/: Set[LinkedListNode[ref_Symbol, uuid_String][key_], value_] :=  ref[\"Nodes\", uuid, key] = value; <\/code><\/pre>\n<p>\u0412\u044b\u0448\u0435 \u043c\u044b \u043f\u043e \u0441\u0443\u0442\u0438 \u043f\u0435\u0440\u0435\u043e\u043f\u0440\u0435\u0434\u0435\u043b\u044f\u0435\u043c <em>&#171;\u043e\u043f\u0435\u0440\u0430\u0442\u043e\u0440 \u043f\u0440\u0438\u0441\u0432\u0430\u0438\u0432\u0430\u043d\u0438\u044f&#187;<\/em>, \u0442.\u0435. &#171;=&#187;. \u0421\u0434\u0435\u043b\u0430\u043d\u043e \u044d\u0442\u043e \u043f\u0440\u0438 \u043f\u043e\u043c\u043e\u0449\u0438 \u0442\u0430\u043a \u043d\u0430\u0437\u044b\u0432\u0430\u0435\u043c\u043e\u0433\u043e <code>UpSet<\/code> (<code>obj \/: func[obj] := expr[obj]<\/code>), \u043a\u043e\u0433\u0434\u0430 \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u0435\u043d\u0438\u0435 \u0441\u0432\u044f\u0437\u044b\u0432\u0430\u0435\u0442\u0441\u044f \u043d\u0435 \u0441 \u0444\u0443\u043d\u043a\u0446\u0438\u0435\u0439, \u0430 \u0441 \u0441\u0430\u043c\u0438\u043c \u043e\u0431\u044a\u0435\u043a\u0442\u043e\u043c, \u043d\u0430 \u043a\u043e\u0442\u043e\u0440\u043e\u043c \u0432\u044b\u0437\u044b\u0432\u0430\u0435\u0442\u0441\u044f \u0444\u0443\u043d\u043a\u0446\u0438\u044f. \u0415\u0449\u0435 \u0434\u043e\u0431\u0430\u0432\u0438\u043c \u043c\u0435\u0442\u043e\u0434 \u0441\u0432\u044f\u0437\u044b\u0432\u0430\u043d\u0438\u044f \u0434\u0432\u0443\u0445 \u0443\u0437\u043b\u043e\u0432: <\/p>\n<pre><code class=\"haskell\">LinkedListNode \/: link[node_LinkedListNode, next_LinkedListNode] := ( If[node[\"Next\"] =!= Null, next[\"Next\"] = node[\"Next\"]];  node[\"Next\"] = next ); <\/code><\/pre>\n<p>\u0421\u0434\u0435\u043b\u0430\u0435\u043c \u0442\u0430\u043a, \u0447\u0442\u043e \u044d\u0442\u043e\u0442 \u043c\u0435\u0442\u043e\u0434 \u043c\u043e\u0436\u0435\u0442 \u043e\u0431\u044a\u0435\u0434\u0438\u043d\u0438\u0442\u044c \u0446\u0435\u043b\u044b\u0439 \u0441\u043f\u0438\u0441\u043e\u043a \u0443\u0437\u043b\u043e\u0432: <\/p>\n<pre><code class=\"haskell\">link[list_List] := Fold[link, First[list], Rest[list]]; <\/code><\/pre>\n<p>\u041a\u0430\u043a \u044d\u0442\u043e \u0440\u0430\u0431\u043e\u0442\u0430\u0435\u0442: <\/p>\n<pre><code class=\"haskell\">node2 = LinkedListNode[ref, 2, Null];  node3 = LinkedListNode[ref, 3, Null];  link[{node1, node2, node3}] (* => node3 *)  (* node1 -> node2 -> node3 *)<\/code><\/pre>\n<p>\u041f\u043e\u043a\u0430 \u0447\u0442\u043e \u0440\u0435\u0430\u043b\u0438\u0437\u043e\u0432\u0430\u043d\u043d\u044b\u0445 \u043c\u0435\u0442\u043e\u0434\u043e\u0432 \u0434\u043e\u0441\u0442\u0430\u0442\u043e\u0447\u043d\u043e. \u041f\u0435\u0440\u0435\u0439\u0434\u0435\u043c \u043a \u0440\u0435\u0430\u043b\u0438\u0437\u0430\u0446\u0438\u0438 \u0441\u0430\u043c\u043e\u0433\u043e \u0441\u043f\u0438\u0441\u043a\u0430. <\/p>\n<h2>\u0420\u0435\u0430\u043b\u0438\u0437\u0430\u0446\u0438\u044f \u0441\u043f\u0438\u0441\u043a\u0430<\/h2>\n<p>\u041a\u0430\u043a \u043e\u0431\u044b\u0447\u043d\u043e \u043f\u043e\u0434\u0433\u043e\u0442\u043e\u0432\u043a\u0430: <\/p>\n<pre><code class=\"haskell\">ClearAll[LinkedList];  SetAttributes[LinkedList, HoldFirst]; <\/code><\/pre>\n<p>\u0418 \u043a\u043e\u043d\u0441\u0442\u0440\u0443\u043a\u0442\u043e\u0440 \u0441\u043f\u0438\u0441\u043a\u0430. \u041e\u0441\u043e\u0431\u0435\u043d\u043d\u043e\u0441\u0442\u044c \u044d\u0442\u043e\u0439 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 \u0432 \u0442\u043e\u043c, \u0447\u0442\u043e \u043e\u043d\u0430 \u043f\u0440\u043e\u0432\u0435\u0440\u044f\u0435\u0442 &#171;\u0441\u0441\u044b\u043b\u043a\u0443&#187; \u0438 \u0435\u0441\u043b\u0438 \u043e\u043d\u0430 \u043d\u0435\u043f\u043e\u0434\u0445\u043e\u0434\u044f\u0449\u0430\u044f, \u0442\u043e \u043c\u0435\u043d\u044f\u0435\u0442 \u0435\u0435 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435, \u0430 \u0435\u0441\u043b\u0438 \u043f\u043e\u0434\u0445\u043e\u0434\u044f\u0449\u0430\u044f \u0442\u043e \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435 \u043a\u0430\u043a \u0435\u0441\u0442\u044c: <\/p>\n<pre><code class=\"haskell\">LinkedList[ref: _Symbol?(Not@*AssociationQ): Automatic] :=  Which[ ref === Automatic,  With[{$ref = Unique[\"LINKEDLIST`$\"]}, LinkedList[$ref]],  True,  Clear[ref];  ref = &lt;|\"Nodes\" -> &lt;||>, \"Size\" -> 0, \"Head\" -> Null, \"Tail\" -> Null|>;  LinkedList[ref] ]; <\/code><\/pre>\n<p><code>ref: _Symbol?(Not@*AssociationQ): Automatic<\/code> \u0441\u043b\u0435\u0432\u0430 \u043d\u0430\u043f\u0440\u0430\u0432\u043e \u0434\u0435\u043b\u0430\u0435\u0442 \u0441\u043b\u0435\u0434\u0443\u044e\u0449\u0435\u0435: <\/p>\n<ul>\n<li>\n<p><code>ref: _Symbol<\/code> &#8212; \u0437\u043d\u0430\u0447\u0438\u0442 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442 \u0434\u043e\u043b\u0436\u0435\u043d \u0438\u043c\u0435\u0442\u044c \u0442\u0438\u043f <code>Symbol<\/code> (\u0442.\u0435. \u0441\u0441\u044b\u043b\u043a\u0430)<\/p>\n<\/li>\n<li>\n<p><code>?(Not@*AssociationQ)<\/code> &#8212; \u043f\u0440\u043e\u0432\u0435\u0440\u044f\u0435\u0442 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442 \u043f\u0440\u0438\u043c\u0435\u043d\u044f\u044f \u0444\u0443\u043d\u043a\u0446\u0438\u044e \u0441\u043f\u0440\u0430\u0432\u0430 \u043e\u0442 \u0437\u043d\u0430\u043a\u0430 \u0432\u043e\u043f\u0440\u043e\u0441\u0430<\/p>\n<\/li>\n<li>\n<p><code>Not@*AssociationQ<\/code> &#8212; \u043a\u043e\u043c\u043f\u043e\u0437\u0438\u0446\u0438\u044f \u0434\u0432\u0443\u0445 \u0444\u0443\u043d\u043a\u0446\u0438\u0439<\/p>\n<\/li>\n<li>\n<p><code>: Automatic<\/code> &#8212; \u043f\u043e\u0441\u043b\u0435 \u0432\u0442\u043e\u0440\u043e\u0433\u043e \u0434\u0432\u043e\u0435\u0442\u043e\u0447\u0438\u044f \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435 \u043f\u043e \u0443\u043c\u043e\u043b\u0447\u0430\u043d\u0438\u044e. \u0418\u043d\u0442\u0435\u0440\u0435\u0441\u043d\u043e, \u0447\u0442\u043e \u043e\u043d\u043e \u043c\u043e\u0436\u0435\u0442 \u043d\u0435 \u043f\u0440\u043e\u0445\u043e\u0434\u0438\u0442\u044c \u043f\u0440\u043e\u0432\u0435\u0440\u043a\u0443 \u0441\u043b\u0435\u0432\u0430<\/p>\n<\/li>\n<\/ul>\n<p>\u0422\u0435\u043f\u0435\u0440\u044c \u043c\u0435\u0442\u043e\u0434 \u0434\u043e\u0431\u0430\u0432\u043b\u0435\u043d\u0438\u044f \u0432 \u043a\u043e\u043d\u0435\u0446. \u041c\u044b \u0441\u043e\u0437\u0434\u0430\u0434\u0438\u043c \u0444\u0443\u043d\u043a\u0446\u0438\u044e <code>append<\/code>. \u041e\u043d\u0430 \u0431\u0443\u0434\u0435\u0442 \u0431\u0440\u0430\u0442\u044c \u0445\u0432\u043e\u0441\u0442 \u0441\u043f\u0438\u0441\u043a\u0430 \u0438 \u0435\u0441\u043b\u0438 \u0435\u0433\u043e \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435 \u044d\u0442\u043e <code>Null<\/code>, \u0442\u043e \u0434\u043e\u0431\u0430\u0432\u043b\u044f\u0442\u044c \u0438 \u0445\u0432\u043e\u0441\u0442 \u0438 \u0433\u043e\u043b\u043e\u0432\u0443. \u041d\u043e \u0435\u0441\u043b\u0438 \u0445\u0432\u043e\u0441\u0442 \u0443\u0436\u0435 \u0443\u043a\u0430\u0437\u044b\u0432\u0430\u0435\u0442 \u043d\u0430 \u0441\u0443\u0449\u0435\u0441\u0442\u0432\u0443\u044e\u0449\u0438\u0439 \u0443\u0437\u0435\u043b, \u0442\u043e \u043a \u044d\u0442\u043e\u043c\u0443 \u0443\u0437\u043b\u0443 \u043f\u0440\u0438\u0432\u044f\u0437\u044b\u0432\u0430\u0435\u0442\u0441\u044f \u043d\u043e\u0432\u044b\u0439 \u0443\u0437\u0435\u043b, \u0430 \u0445\u0432\u043e\u0441\u0442 \u0443\u043a\u0430\u0437\u044b\u0432\u0430\u0435\u0442 \u043d\u0430 \u043d\u043e\u0432\u044b\u0439 \u0443\u0437\u0435\u043b. \u0412\u0441\u0435 \u0442\u043e\u0436\u0435 \u0441\u0430\u043c\u043e\u0435, \u043d\u043e \u0441 \u0434\u0440\u0443\u0433\u043e\u0439 \u0441\u0442\u043e\u0440\u043e\u043d\u044b \u0441\u0434\u0435\u043b\u0430\u0435\u043c \u0434\u043b\u044f <code>prepend<\/code>: <\/p>\n<pre><code class=\"haskell\">LinkedList \/: append[LinkedList[ref_Symbol], item_] :=  With[{node = LinkedListNode[ref, item, Null]},  ref[\"Size\"] = ref[\"Size\"] + 1;  If[ref[\"Tail\"] === Null,  ref[\"Head\"] = node;  ref[\"Tail\"] = node; ,  (*Else*) link[ref[\"Tail\"], node];  ref[\"Tail\"] = node;  ];  ]; <\/code><\/pre>\n<pre><code class=\"haskell\">LinkedList \/: prepend[LinkedList[ref_Symbol], item_] :=  With[{node = LinkedListNode[ref, item, Null]},  ref[\"Size\"] = ref[\"Size\"] + 1;  If[ref[\"Head\"] === Null,  ref[\"Head\"] = node;  ref[\"Tail\"] = node; ,  (*Else*) link[node, ref[\"Head\"]];  ref[\"Head\"] = node;  ];  ]; <\/code><\/pre>\n<p>\u0414\u043b\u044f \u043e\u0431\u044b\u0447\u043d\u044b\u0445 \u0441\u043f\u0438\u0441\u043a\u043e\u0432 \u0432 WL \u0435\u0441\u0442\u044c \u0444\u0443\u043d\u043a\u0446\u0438\u0438 First \u0438 Last, \u043a\u043e\u0442\u043e\u0440\u044b\u0435 \u043f\u043e\u043b\u0443\u0447\u0430\u044e\u0442 \u043f\u0435\u0440\u0432\u044b\u0439 \u0438 \u043f\u043e\u0441\u043b\u0435\u0434\u043d\u0438\u0439 \u044d\u043b\u0435\u043c\u0435\u043d\u0442. \u041d\u043e \u043c\u044b \u0434\u043b\u044f \u0441\u043f\u0438\u0441\u043a\u0430 \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u0438\u043c \u043e\u0442\u0434\u0435\u043b\u044c\u043d\u044b\u0435 <em>&#171;\u0441\u0432\u043e\u0439\u0441\u0442\u0432\u0430&#187;<\/em>, \u043a\u043e\u0442\u043e\u0440\u044b\u0435 \u043f\u043e\u043b\u0443\u0447\u0430\u044e\u0442 \u0433\u043e\u043b\u043e\u0432\u0443 \u0438 \u0445\u0432\u043e\u0441\u0442: <\/p>\n<pre><code class=\"haskell\">LinkedList[ref_Symbol][\"Head\"] :=  If[ref[\"Size\"] > 0, ref[\"Head\"][\"Value\"]]; <\/code><\/pre>\n<pre><code class=\"haskell\">LinkedList[ref_Symbol][\"Tail\"] :=  If[ref[\"Size\"] > 0, ref[\"Tail\"][\"Value\"]]; <\/code><\/pre>\n<p>\u0422\u0430\u043a \u0436\u0435 \u043f\u0435\u0440\u0435\u043e\u043f\u0440\u0435\u0434\u0435\u043b\u0438\u043c \u0444\u0443\u043d\u043a\u0446\u0438\u044e, \u043a\u043e\u0442\u043e\u0440\u0430\u044f \u043f\u043e\u043b\u0443\u0447\u0430\u0435\u0442 \u044d\u043b\u0435\u043c\u0435\u043d\u0442 \u043f\u043e \u0438\u043d\u0434\u0435\u043a\u0441\u0443 (\u0442\u043e\u0442 \u0441\u0430\u043c\u044b\u0439 \u043c\u0435\u0442\u043e\u0434, \u043a\u043e\u0442\u043e\u0440\u044b\u0439 \u0437\u0430\u043d\u0438\u043c\u0430\u0435\u0442 <strong>O(n)<\/strong>): <\/p>\n<pre><code class=\"haskell\">LinkedList \/: Part[LinkedList[ref_Symbol], i_Integer] \/; Abs[i] &lt;= ref[\"Size\"]:=  Block[{$node},  Which[i === 0, LinkedList,  i === 1, ref[\"Head\"],  i === -1, ref[\"Tail\"],  i > 0,  $node = ref[\"Head\"];  Do[$node = $node[\"Next\"], {j, 2, i}];  $node,  i &lt; 0,  $node = ref[\"Head\"];  Do[$node = $node[\"Next\"], {j, -ref[\"Size\"] + 1, i, 1}];  $node ][\"Value\"] ]; <\/code><\/pre>\n<p>\u0418 \u0443\u0434\u0430\u043b\u0435\u043d\u0438\u0435 \u0433\u043e\u043b\u043e\u0432\u044b \u0441 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0435\u043d\u0438\u0435\u043c \u0443\u0437\u043b\u0430. \u0417\u0434\u0435\u0441\u044c \u044f \u0441\u043e\u0437\u0434\u0430\u043c \u0444\u0443\u043d\u043a\u0446\u0438\u044e <code>pop<\/code> : <\/p>\n<pre><code class=\"haskell\">LinkedList \/: pop[LinkedList[ref_Symbol]] :=  With[{head = ref[\"Head\"]},  ref[\"Head\"] = head[\"Next\"];  head[\"Next\"] = Null;  head[\"Value\"] ]; <\/code><\/pre>\n<p>\u0418 \u043f\u043e\u0441\u043b\u0435\u0434\u043d\u0435\u0435, \u0447\u0442\u043e \u043d\u0430\u043c \u043f\u043e\u0442\u0440\u0435\u0431\u0443\u0435\u0442\u0441\u044f &#8212; \u0444\u0443\u043d\u043a\u0446\u0438\u044f, \u043a\u043e\u0442\u043e\u0440\u0430\u044f \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0432\u0441\u0435 \u044d\u043b\u0435\u043c\u0435\u043d\u0442\u044b \u0441\u0432\u044f\u0437\u0430\u043d\u043d\u043e\u0433\u043e \u0441\u043f\u0438\u0441\u043a\u0430 \u0432 \u0432\u0438\u0434\u0435 \u043e\u0431\u044b\u0447\u043d\u043e\u0433\u043e \u0441\u043f\u0438\u0441\u043a\u0430. \u041e\u0431\u044b\u0447\u043d\u043e \u0434\u043b\u044f \u044d\u0442\u0438\u0445 \u0446\u0435\u043b\u0435\u0439 \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u0443\u044e\u0442 \u0432\u0441\u0442\u0440\u043e\u0435\u043d\u043d\u0443\u044e \u0444\u0443\u043d\u043a\u0446\u0438\u044e <code>Normal<\/code>: <\/p>\n<pre><code class=\"haskell\">LinkedList \/: Normal[LinkedList[ref_Symbol]] :=  Block[{node = ref[\"Head\"], value},      Table[         value = node[\"Value\"];          node = node[\"Next\"];          value,          {i, 1, ref[\"Size\"]}     ] ]; <\/code><\/pre>\n<h2>\u041f\u0440\u0438\u043c\u0435\u0440\u044b<\/h2>\n<p>\u041c\u0438\u043d\u0438\u043c\u0430\u043b\u044c\u043d\u0430\u044f \u0440\u0435\u0430\u043b\u0438\u0437\u0430\u0446\u0438\u044f \u0441\u0432\u044f\u0437\u0430\u043d\u043d\u043e\u0433\u043e \u0441\u043f\u0438\u0441\u043a\u0430 \u0433\u043e\u0442\u043e\u0432\u0430. \u0421\u043e\u0437\u0434\u0430\u0442\u044c \u0435\u0433\u043e \u043c\u043e\u0436\u043d\u043e \u0432\u043e\u0442 \u0442\u0430\u043a: <\/p>\n<pre><code class=\"haskell\">linkedList = LinkedList[]<\/code><\/pre>\n<p>\u0417\u0430\u0442\u0435\u043c \u0435\u0433\u043e \u043c\u043e\u0436\u043d\u043e \u0437\u0430\u043f\u043e\u043b\u043d\u0438\u0442\u044c: <\/p>\n<pre><code class=\"haskell\">Do[append[linkedList, i], {i, 10}] Do[prepend[linkedList, i], {i, 10}]<\/code><\/pre>\n<p>\u0423\u0434\u0430\u043b\u0438\u0442\u044c \u0447\u0430\u0441\u0442\u044c \u0438\u0437 \u043d\u0430\u0447\u0430\u043b\u0430: <\/p>\n<pre><code class=\"haskell\">Table[pop[linkedList], {5}] (* {10, 9, 8, 7, 6} *)<\/code><\/pre>\n<p>\u041f\u043e\u0441\u043c\u043e\u0442\u0440\u0435\u0442\u044c \u0441\u043e\u0434\u0435\u0440\u0436\u0438\u043c\u043e\u0435: <\/p>\n<pre><code class=\"haskell\">Normal[linkedList] (* {5, 4, 3, 2, 1, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10} *)<\/code><\/pre>\n<h2>\u041f\u0440\u043e\u0438\u0437\u0432\u043e\u0434\u0438\u0442\u0435\u043b\u044c\u043d\u043e\u0441\u0442\u044c<\/h2>\n<p>\u041c\u043e\u044f \u0440\u0435\u0430\u043b\u0438\u0437\u0430\u0446\u0438\u044f \u043d\u0435 \u0441\u0430\u043c\u0430\u044f \u043e\u043f\u0442\u0438\u043c\u0430\u043b\u044c\u043d\u0430\u044f, \u043f\u043b\u044e\u0441 WL &#8212; \u044d\u0442\u043e \u0438\u043d\u0442\u0435\u0440\u043f\u0440\u0435\u0442\u0438\u0440\u0443\u0435\u043c\u044b\u0439 \u044f\u0437\u044b\u043a \u0438 \u043a\u0430\u0436\u0434\u0443\u044e \u043a\u043e\u043c\u0430\u043d\u0434\u0443 \u043e\u043d \u043e\u0442\u043f\u0440\u0430\u0432\u043b\u044f\u0435\u0442 \u0432 \u044f\u0434\u0440\u043e \u043f\u043e \u043e\u0442\u0434\u0435\u043b\u044c\u043d\u043e\u0441\u0442\u0438. \u041d\u0430 \u0441\u0430\u043c\u043e\u043c \u0434\u0435\u043b\u0435 \u043c\u043e\u0436\u043d\u043e \u043d\u0430\u043c\u043d\u043e\u0433\u043e \u043b\u0443\u0447\u0448\u0435, \u043d\u043e \u044d\u0442\u043e \u0431\u0443\u0434\u0435\u0442 \u0431\u043e\u043b\u0435\u0435 \u0433\u0440\u043e\u043c\u043e\u0437\u0434\u043a\u043e \u0438 \u043c\u0430\u043b\u043e\u0438\u043d\u0444\u043e\u0440\u043c\u0430\u0442\u0438\u0432\u043d\u043e. \u041d\u043e \u0432 \u043a\u043e\u043d\u0446\u0435 \u043a\u043e\u043d\u0446\u043e\u0432 \u043d\u0430\u043c \u0432\u0430\u0436\u043d\u0430 \u043d\u0435 \u0441\u0430\u043c\u0430 \u0441\u043a\u043e\u0440\u043e\u0441\u0442\u044c \u0432\u044b\u043f\u043e\u043b\u043d\u0435\u043d\u0438\u044f \u043e\u043f\u0435\u0440\u0430\u0446\u0438\u0439, \u0430 \u0438\u0445 \u0432\u0440\u0435\u043c\u0435\u043d\u043d\u0430\u044f \u0441\u043b\u043e\u0436\u043d\u043e\u0441\u0442\u044c. \u0427\u0442\u043e \u0436, \u0434\u043e\u043a\u0430\u0436\u0435\u043c, \u0447\u0442\u043e \u0434\u043e\u0431\u0430\u0432\u043b\u0435\u043d\u0438\u0435 \u0432 \u043d\u0430\u0447\u0430\u043b\u043e \u0438 \u043a\u043e\u043d\u0435\u0446 \u043d\u0435 \u0437\u0430\u0432\u0438\u0441\u044f\u0442 \u043e\u0442 \u0440\u0430\u0437\u043c\u0435\u0440\u0430 \u0441\u043f\u0438\u0441\u043a\u0430: <\/p>\n<pre><code class=\"haskell\">linkedList = LinkedList[];  appendTime = Table[{i, AbsoluteTiming[append[linkedList, i]][[1]]}, {i, 1, 10000}]; <\/code><\/pre>\n<pre><code class=\"haskell\">linkedList = LinkedList[];  prependTime = Table[{i, AbsoluteTiming[prepend[linkedList, i]][[1]]}, {i, 1, 10000}]; <\/code><\/pre>\n<pre><code class=\"haskell\">linkedList = LinkedList[];  popTime = Table[{i,  append[linkedList, i];  prepend[linkedList, i];  AbsoluteTiming[pop[linkedList]][[1]] }, {i, 1, 10000}]; <\/code><\/pre>\n<p>\u0418 \u043f\u043e\u0441\u0442\u0440\u043e\u0438\u043c \u0433\u0440\u0430\u0444\u0438\u043a \u0437\u0430\u0432\u0438\u0441\u0438\u043c\u043e\u0441\u0442\u0438 \u0432\u0440\u0435\u043c\u0435\u043d\u0438 \u043e\u043f\u0435\u0440\u0430\u0446\u0438\u0438 \u043e\u0442 \u0440\u0430\u0437\u043c\u0435\u0440\u0430 \u0441\u043f\u0438\u0441\u043a\u0430: <\/p>\n<pre><code class=\"haskell\">ListPlot[{appendTime, prependTime, popTime},  ImageSize -> Large,  PlotTheme -> \"Detailed\",  PlotLegends -> {\"append\", \"prepend\", \"pop\"} ]<\/code><\/pre>\n<figure class=\"full-width\">\n<div><figcaption><em>\u0412\u0440\u0435\u043c\u044f \u043e\u043f\u0435\u0440\u0430\u0446\u0438\u0438 \u0432 \u0437\u0430\u0432\u0438\u0441\u0438\u043c\u043e\u0441\u0442\u0438 \u043e\u0442 \u0440\u0430\u0437\u043c\u0435\u0440\u0430 \u0441\u0432\u044f\u0437\u0430\u043d\u043d\u043e\u0433\u043e \u0441\u043f\u0438\u0441\u043a\u0430<\/em><\/figcaption><\/div>\n<\/figure>\n<p>\u041d\u0443 \u0438 \u0434\u043e\u043a\u0430\u0436\u0435\u043c, \u0447\u0442\u043e \u0432\u0440\u0435\u043c\u044f \u043f\u043e\u043b\u0443\u0447\u0435\u043d\u0438\u044f \u043f\u043e \u0438\u043d\u0434\u0435\u043a\u0441\u0443 \u0438 \u0438\u0437\u0432\u043b\u0435\u0447\u0435\u043d\u0438\u044f \u0432\u0441\u0435\u0445 \u044d\u043b\u0435\u043c\u0435\u043d\u0442\u043e\u0432 \u043b\u0438\u043d\u0435\u0439\u043d\u043e \u0440\u0430\u0441\u0442\u0435\u0442 \u0441 \u0440\u043e\u0441\u0442\u043e\u043c \u0447\u0438\u0441\u043b\u0430 \u044d\u043b\u0435\u043c\u0435\u043d\u0442\u043e\u0432: <\/p>\n<pre><code class=\"haskell\">linkedList = LinkedList[];  partTime = Table[{i,  append[linkedList, i];  index = RandomInteger[{1, First[linkedList][\"Size\"]}]; AbsoluteTiming[linkedList[[index]]][[1]] }, {i, 1, 2000}]; <\/code><\/pre>\n<pre><code class=\"haskell\">linkedList = LinkedList[];  normalTime = Table[{i,  append[linkedList, i];  AbsoluteTiming[Normal[linkedList]][[1]] }, {i, 1, 2000}]; <\/code><\/pre>\n<p>\u0418 \u043f\u043e\u0441\u0442\u0440\u043e\u0438\u043c \u0433\u0440\u0430\u0444\u0438\u043a: <\/p>\n<pre><code class=\"haskell\">ListPlot[{partTime, normalTime},  ImageSize -> Large,  PlotTheme -> \"Detailed\",  PlotLegends -> {\"part\", \"Normal\"} ]<\/code><\/pre>\n<figure class=\"full-width\">\n<div><figcaption><em>\u0412\u0440\u0435\u043c\u044f<\/em><\/figcaption><\/div>\n<\/figure>\n<\/div>\n<\/div>\n<\/div>\n<\/div>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[],"tags":[],"class_list":["post-365855","post","type-post","status-publish","format-standard","hentry"],"_links":{"self":[{"href":"https:\/\/savepearlharbor.com\/index.php?rest_route=\/wp\/v2\/posts\/365855","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/savepearlharbor.com\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/savepearlharbor.com\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/savepearlharbor.com\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/savepearlharbor.com\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=365855"}],"version-history":[{"count":0,"href":"https:\/\/savepearlharbor.com\/index.php?rest_route=\/wp\/v2\/posts\/365855\/revisions"}],"wp:attachment":[{"href":"https:\/\/savepearlharbor.com\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=365855"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/savepearlharbor.com\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=365855"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/savepearlharbor.com\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=365855"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}