{"id":282317,"date":"2016-12-11T21:50:03","date_gmt":"2016-12-11T18:50:03","guid":{"rendered":"http:\/\/savepearlharbor.com\/?p=282317"},"modified":"-0001-11-30T00:00:00","modified_gmt":"-0001-11-29T21:00:00","slug":"","status":"publish","type":"post","link":"https:\/\/savepearlharbor.com\/?p=282317","title":{"rendered":"\u041f\u0430\u0440\u0430\u043b\u043b\u0435\u043b\u044c\u043d\u0430\u044f \u0431\u044b\u0441\u0442\u0440\u0430\u044f \u0441\u043e\u0440\u0442\u0438\u0440\u043e\u0432\u043a\u0430 \u043d\u0430 \u0425\u0430\u0441\u043a\u0435\u043b\u0435"},"content":{"rendered":"<p><i>\u041f\u0440\u0438\u043c. \u043f\u0435\u0440\u0435\u0432.: \u042d\u0442\u043e \u043f\u0435\u0440\u0435\u0432\u043e\u0434 <a href=\"http:\/\/flyingfrogblog.blogspot.de\/2010\/08\/parallel-generic-quicksort-in-haskell.html\">\u0438\u0441\u0442\u043e\u0440\u0438\u0438<\/a> \u043e \u0442\u043e\u043c, \u043a\u0430\u043a \u043d\u0435\u043b\u0435\u0433\u043a\u043e \u043e\u043a\u0430\u0437\u0430\u043b\u043e\u0441\u044c \u043d\u0430\u043f\u0438\u0441\u0430\u0442\u044c \u043f\u0430\u0440\u0430\u043b\u043b\u0435\u043b\u044c\u043d\u0443\u044e \u0431\u044b\u0441\u0442\u0440\u0443\u044e \u0441\u043e\u0440\u0442\u0438\u0440\u043e\u0432\u043a\u0443 (quicksort) \u043d\u0430 \u0425\u0430\u0441\u043a\u0435\u043b\u0435. \u041e\u0440\u0438\u0433\u0438\u043d\u0430\u043b \u0441\u0442\u0430\u0442\u044c\u0438 \u043d\u0430\u043f\u0438\u0441\u0430\u043d \u0432 2010 \u0433\u043e\u0434\u0443, \u043d\u043e, \u043c\u043d\u0435 \u043a\u0430\u0436\u0435\u0442\u0441\u044f, \u043e\u043d \u0434\u043e \u0441\u0438\u0445 \u043f\u043e\u0440 \u043f\u043e\u0443\u0447\u0438\u0442\u0435\u043b\u044c\u043d\u044b\u0439 \u0438 \u0432\u043e \u043c\u043d\u043e\u0433\u043e\u043c \u0430\u043a\u0442\u0443\u0430\u043b\u044c\u043d\u044b\u0439.<\/i><\/p>\n<p>  \u0415\u0441\u0442\u044c \u043c\u043d\u043e\u0433\u043e \u043f\u0440\u0438\u043c\u0435\u0440\u043e\u0432 \u0442\u043e\u0433\u043e, \u043a\u0430\u043a \u0425\u0430\u0441\u043a\u0435\u043b\u044c \u0434\u0435\u043b\u0430\u0435\u0442 \u043f\u0440\u043e\u0441\u0442\u044b\u0435 \u043f\u0440\u043e\u0431\u043b\u0435\u043c\u044b \u0441\u043b\u043e\u0436\u043d\u044b\u043c\u0438. \u0412\u0435\u0440\u043e\u044f\u0442\u043d\u043e, \u0441\u0430\u043c\u044b\u0439 \u0438\u0437\u0432\u0435\u0441\u0442\u043d\u044b\u0439 \u0438\u0437 \u043d\u0438\u0445\u2014\u044d\u0442\u043e \u0440\u0435\u0448\u0435\u0442\u043e \u042d\u0440\u0430\u0442\u043e\u0441\u0444\u0435\u043d\u0430, \u043a\u043e\u0442\u043e\u0440\u043e\u0435 \u043b\u0435\u0433\u043a\u043e \u043d\u0430\u043f\u0438\u0441\u0430\u0442\u044c \u043d\u0430 \u043b\u044e\u0431\u043e\u043c \u0438\u043c\u043f\u0435\u0440\u0430\u0442\u0438\u0432\u043d\u043e\u043c \u044f\u0437\u044b\u043a\u0435, \u043d\u043e \u043d\u0430\u0441\u0442\u043e\u043b\u044c\u043a\u043e \u0441\u043b\u043e\u0436\u043d\u043e \u043d\u0430\u043f\u0438\u0441\u0430\u0442\u044c \u043d\u0430 \u0425\u0430\u0441\u043a\u0435\u043b\u0435, \u0447\u0442\u043e \u043f\u043e\u0447\u0442\u0438 \u0432\u0441\u0435 \u0440\u0435\u0448\u0435\u043d\u0438\u044f, \u043a\u043e\u0442\u043e\u0440\u044b\u0435 \u043f\u0440\u0435\u043f\u043e\u0434\u0430\u0432\u0430\u043b\u0438\u0441\u044c \u0432 \u0443\u043d\u0438\u0432\u0435\u0440\u0441\u0438\u0442\u0435\u0442\u0430\u0445 \u0438 \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u043b\u0438\u0441\u044c \u0432 \u0438\u0441\u0441\u043b\u0435\u0434\u043e\u0432\u0430\u043d\u0438\u044f\u0445 \u043f\u043e\u0441\u043b\u0435\u0434\u043d\u0438\u0435 18 \u043b\u0435\u0442, \u043e\u043a\u0430\u0437\u0430\u043b\u0438\u0441\u044c \u043d\u0435\u043f\u0440\u0430\u0432\u0438\u043b\u044c\u043d\u044b\u043c\u0438. \u041d\u0430 \u0438\u0445 \u043d\u0435\u0441\u043e\u0441\u0442\u043e\u044f\u0442\u0435\u043b\u044c\u043d\u043e\u0441\u0442\u044c \u043e\u0431\u0440\u0430\u0442\u0438\u043b\u0430 \u0432\u043d\u0438\u043c\u0430\u043d\u0438\u0435 \u041c\u0435\u043b\u0438\u0441\u0441\u0430 \u041e&#8217;\u041d\u0438\u043b [Melissa O&#8217;Neill] \u0432 \u0441\u0432\u043e\u0435\u0439 \u0432\u0430\u0436\u043d\u043e\u0439 \u043d\u0430\u0443\u0447\u043d\u043e\u0439 \u0440\u0430\u0431\u043e\u0442\u0435 &quot;<a href=\"http:\/\/www.cs.hmc.edu\/~oneill\/papers\/Sieve-JFP.pdf\">\u041d\u0430\u0441\u0442\u043e\u044f\u0449\u0435\u0435 \u0440\u0435\u0448\u0435\u0442\u043e \u042d\u0440\u0430\u0442\u043e\u0441\u0444\u0435\u043d\u0430<\/a>&quot;. \u0412 \u043d\u0435\u0439 \u043f\u0440\u0438\u0432\u043e\u0434\u0438\u0442\u0441\u044f \u043f\u0440\u0435\u043a\u0440\u0430\u0441\u043d\u043e\u0435 \u043e\u043f\u0438\u0441\u0430\u043d\u0438\u0435 \u0442\u043e\u0433\u043e, \u0447\u0442\u043e \u043d\u0435 \u0442\u0430\u043a \u0432 \u0441\u0442\u0430\u0440\u044b\u0445 \u043f\u043e\u0434\u0445\u043e\u0434\u0430\u0445, \u0438 \u043a\u0430\u043a \u0438\u0445 \u043d\u0430\u0434\u043e \u0438\u0441\u043f\u0440\u0430\u0432\u0438\u0442\u044c. \u0420\u0435\u0448\u0435\u043d\u0438\u0435\u043c \u041c\u0435\u043b\u0438\u0441\u0441\u044b \u0431\u044b\u043b\u043e \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c \u043e\u0447\u0435\u0440\u0435\u0434\u044c \u0441 \u043f\u0440\u0438\u043e\u0440\u0438\u0442\u0435\u0442\u043e\u043c [priority queue] \u0434\u043b\u044f \u0440\u0435\u0430\u043b\u0438\u0437\u0430\u0446\u0438\u0438 \u0440\u0435\u0448\u0435\u0442\u0430. \u041f\u0440\u0430\u0432\u0438\u043b\u044c\u043d\u043e\u0435 \u0440\u0435\u0448\u0435\u043d\u0438\u0435 \u043e\u043a\u0430\u0437\u0430\u043b\u043e\u0441\u044c \u0432 10 \u0440\u0430\u0437 \u0434\u043b\u0438\u043d\u043d\u0435\u0435, \u0447\u0435\u043c <a href=\"http:\/\/fsharpnews.blogspot.com\/2010\/02\/sieve-of-eratosthenes.html\">\u043d\u0430\u043c\u043d\u043e\u0433\u043e \u0431\u043e\u043b\u0435\u0435 \u043f\u0440\u043e\u0441\u0442\u043e\u0435 \u0440\u0435\u0448\u0435\u043d\u0438\u0435 \u043d\u0430 F#<\/a> \u0438 \u0432 \u0446\u0435\u043b\u044b\u0445 100 \u0440\u0430\u0437 \u0434\u043b\u0438\u043d\u043d\u0435\u0435, \u0447\u0435\u043c \u043e\u0440\u0438\u0433\u0438\u043d\u0430\u043b\u044c\u043d\u044b\u0439 \u0438\u0437\u0443\u0440\u043e\u0434\u043e\u0432\u0430\u043d\u043d\u044b\u0439 \u0430\u043b\u0433\u043e\u0440\u0438\u0442\u043c \u043d\u0430 \u0425\u0430\u0441\u043a\u0435\u043b\u0435.<br \/>  <a name=\"habracut\"><\/a><\/p>\n<p>  \u0421\u0435\u0433\u043e\u0434\u043d\u044f \u0431\u044b\u0441\u0442\u0440\u0430\u044f \u0441\u043e\u0440\u0442\u0438\u0440\u043e\u0432\u043a\u0430\u2014\u044d\u0442\u043e \u043d\u043e\u0432\u043e\u0435 \u0440\u0435\u0448\u0435\u0442\u043e \u042d\u0440\u0430\u0442\u043e\u0441\u0444\u0435\u043d\u0430. \u0418 \u043f\u0440\u043e\u0433\u0440\u0430\u043c\u043c\u0438\u0441\u0442\u044b \u043d\u0430 \u0425\u0430\u0441\u043a\u0435\u043b\u0435 \u0441\u043d\u043e\u0432\u0430 \u043e\u0431\u043e\u0448\u043b\u0438 \u043d\u0435\u0441\u043f\u043e\u0441\u043e\u0431\u043d\u043e\u0441\u0442\u044c \u044f\u0437\u044b\u043a\u0430 \u0432\u044b\u0440\u0430\u0437\u0438\u0442\u044c \u044d\u0442\u043e\u0442 \u0430\u043b\u0433\u043e\u0440\u0438\u0442\u043c <a href=\"http:\/\/www.haskell.org\/haskellwiki\/Introduction#Quicksort_in_Haskell\">\u0443\u0440\u043e\u0434\u043e\u0432\u0430\u043d\u0438\u0435\u043c \u043f\u043e\u0441\u043b\u0435\u0434\u043d\u0435\u0433\u043e<\/a>. \u041d\u043e\u0432\u044b\u0439 \u0432\u0430\u0440\u0438\u0430\u043d\u0442 \u043c\u0435\u0434\u043b\u0435\u043d\u043d\u0435\u0435 \u043d\u0430 \u043f\u043e\u0440\u044f\u0434\u043a\u0438, \u043d\u043e \u0437\u0430\u0442\u043e \u0435\u0433\u043e \u043c\u043e\u0436\u043d\u043e \u043b\u0435\u0433\u043a\u043e \u0437\u0430\u043f\u0438\u0441\u0430\u0442\u044c \u043d\u0430 \u0425\u0430\u0441\u043a\u0435\u043b\u0435.  <\/p>\n<pre><code class=\"haskell\">qsort []     = [] qsort (x:xs) = qsort (filter (&lt; x) xs) ++ [x] ++ qsort (filter (&gt;= x) xs) <\/code><\/pre>\n<p>  \u042d\u0442\u043e\u0442 \u043a\u043e\u0434 \u0441\u043e\u0432\u0435\u0440\u0448\u0435\u043d\u043d\u043e \u043d\u0435 \u0441\u043e\u043e\u0442\u043d\u043e\u0441\u0438\u0442\u0441\u044f \u0441 \u0441\u0443\u0449\u043d\u043e\u0441\u0442\u044c\u044e \u043d\u0430\u0441\u0442\u043e\u044f\u0449\u0435\u0433\u043e \u0430\u043b\u0433\u043e\u0440\u0438\u0442\u043c\u0430 \u0431\u044b\u0441\u0442\u0440\u043e\u0439 \u0441\u043e\u0440\u0442\u0438\u0440\u043e\u0432\u043a\u0438, \u043a\u043e\u0442\u043e\u0440\u0430\u044f \u0434\u0435\u043b\u0430\u0435\u0442 \u0435\u0433\u043e \u0442\u0430\u043a\u0438\u043c \u044d\u0444\u0444\u0435\u043a\u0442\u0438\u0432\u043d\u044b\u043c (\u0441\u043c. <a href=\"http:\/\/comjnl.oxfordjournals.org\/cgi\/content\/short\/5\/1\/10\">\u043e\u0440\u0438\u0433\u0438\u043d\u0430\u043b\u044c\u043d\u0443\u044e \u0441\u0442\u0430\u0442\u044c\u044e \u0422\u043e\u043d\u0438 \u0425\u043e\u0430\u0440\u0430 1962 \u0433\u043e\u0434\u0430<\/a> \u043e \u0431\u044b\u0441\u0442\u0440\u043e\u0439 \u0441\u043e\u0440\u0442\u0438\u0440\u043e\u0432\u043a\u0435). \u0410 \u0438\u043c\u0435\u043d\u043d\u043e, \u043f\u0435\u0440\u0435\u0433\u0440\u0443\u043f\u043f\u0438\u0440\u043e\u0432\u043a\u0430 [partitioning] \u043c\u0430\u0441\u0441\u0438\u0432\u0430 \u0431\u0435\u0437 \u0434\u043e\u043f\u043e\u043b\u043d\u0438\u0442\u0435\u043b\u044c\u043d\u043e\u0433\u043e \u0432\u044b\u0434\u0435\u043b\u0435\u043d\u0438\u044f \u043f\u0430\u043c\u044f\u0442\u0438 [in-place partitioning using swaps].<\/p>\n<p>  \u0421\u0442\u043e\u043b\u043a\u043d\u0443\u0432\u0448\u0438\u0441\u044c \u0441 \u043f\u0440\u043e\u0431\u043b\u0435\u043c\u043e\u0439 \u043d\u0430\u043f\u0438\u0441\u0430\u043d\u0438\u044f \u043f\u0430\u0440\u0430\u043b\u0435\u043b\u043b\u044c\u043d\u043e\u0439 \u0431\u044b\u0441\u0442\u0440\u043e\u0439 \u0441\u043e\u0440\u0442\u0438\u0440\u043e\u0432\u043a\u0438 \u043e\u0431\u0449\u0435\u0433\u043e \u043d\u0430\u0437\u043d\u0430\u0447\u0435\u043d\u0438\u044f \u043d\u0430 \u0425\u0430\u0441\u043a\u0435\u043b\u0435, \u0414\u0436\u0438\u043c \u042d\u043f\u043f\u043b [Jim Apple] (\u043a\u043e\u0442\u043e\u0440\u044b\u0439 \u043f\u0438\u0448\u0435\u0442 \u043a\u0430\u043d\u0434\u0438\u0434\u0430\u0442\u0441\u043a\u0443\u044e \u043f\u043e \u0425\u0430\u0441\u043a\u0435\u043b\u044e \u0432 \u041a\u0430\u043b\u0438\u0444\u043e\u0440\u043d\u0438\u0439\u0441\u043a\u043e\u043c \u0443\u043d\u0438\u0432\u0435\u0440\u0441\u0438\u0442\u0435\u0442\u0435 \u0432 \u0414\u0435\u0439\u0432\u0438\u0441\u0435, UC Davis) \u0434\u0430\u043b \u0441\u0442\u0430\u0440\u0442 \u0434\u0435\u043b\u0443, <a href=\"http:\/\/www.reddit.com\/r\/coding\/comments\/codqo\/engineering_large_projects_in_a_functional\/c0ur3li\">\u043d\u0430\u043f\u0438\u0441\u0430\u0432<\/a> \u0441\u043b\u0435\u0434\u0443\u044e\u0449\u0438\u0439 \u043a\u043e\u0434:  <\/p>\n<pre><code class=\"haskell\">import Data.HashTable as H import Data.Array.IO import Control.Parallel.Strategies import Control.Monad import System  exch a i r =     do tmpi &lt;- readArray a i        tmpr &lt;- readArray a r        writeArray a i tmpr        writeArray a i tmpi  bool a b c = if c then a else b  quicksort arr l r =   if r &lt;= l then return () else do     i &lt;- loop (l-1) r =&lt;&lt; readArray arr r     exch arr i r     withStrategy rpar $ quicksort arr l (i-1)     quicksort arr (i+1) r   where     loop i j v = do       (i', j') &lt;- liftM2 (,) (find (&gt;=v) (+1) (i+1)) (find (&lt;=v) (subtract 1) (j-1))       if (i' &lt; j') then exch arr i' j' &gt;&gt; loop i' j' v                    else return i'     find p f i = if i == l then return i                  else bool (return i) (find p f (f i)) . p =&lt;&lt; readArray arr i  main =      do [testSize] &lt;- fmap (fmap read) getArgs        arr &lt;- testPar testSize        ans &lt;- readArray arr  (testSize `div` 2)        print ans  testPar testSize =     do x &lt;- testArray testSize        quicksort x 0 (testSize - 1)        return x  testArray :: Int -&gt; IO (IOArray Int Double) testArray testSize =      do ans &lt;- newListArray (0,testSize-1) [fromIntegral $ H.hashString $ show i | i &lt;- [1..testSize]]        return ans <\/code><\/pre>\n<p>  \u042d\u0442\u043e\u0442 \u0430\u043b\u0433\u043e\u0440\u0438\u0442\u043c \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u0443\u0435\u0442 \u043f\u0430\u0440\u0430\u043b\u043b\u0435\u043b\u044c\u043d\u044b\u0435 &quot;<a href=\"http:\/\/hackage.haskell.org\/packages\/archive\/parallel\/2.2.0.1\/doc\/html\/Control-Parallel-Strategies.html\">\u0441\u0442\u0440\u0430\u0442\u0435\u0433\u0438\u0438<\/a>&quot; \u0425\u0430\u0441\u043a\u0435\u043b\u044f. \u042d\u0442\u0430 \u043a\u043e\u043d\u0446\u0435\u043f\u0446\u0438\u044f \u0431\u044b\u043b\u0430 \u0440\u0430\u0437\u0440\u0430\u0431\u043e\u0442\u0430\u043d\u0430, \u0447\u0442\u043e\u0431 \u0434\u0430\u0442\u044c \u043f\u0440\u043e\u0433\u0440\u0430\u043c\u043c\u0438\u0441\u0442\u0430\u043c \u043d\u0430 \u0425\u0430\u0441\u043a\u0435\u043b\u0435 \u0431\u043e\u043b\u044c\u0448\u0435 \u043a\u043e\u043d\u0442\u0440\u043e\u043b\u044f \u043d\u0430\u0434 \u043f\u0430\u0440\u0430\u043b\u043b\u0435\u043b\u0438\u0437\u0430\u0446\u0438\u0435\u0439, \u043d\u043e \u043e\u043a\u0430\u0437\u0430\u043b\u043e\u0441\u044c, \u0447\u0442\u043e <a href=\"http:\/\/www.haskell.org\/~simonmar\/papers\/multicore-ghc.pdf\">\u0432 \u0435\u0434\u0438\u043d\u0441\u0442\u0432\u0435\u043d\u043d\u043e\u0439 \u0434\u043e\u0441\u0442\u0443\u043f\u043d\u043e\u0439 \u0438\u043c\u043f\u043b\u0435\u043c\u0435\u043d\u0442\u0430\u0446\u0438\u0438 \u0442\u0435\u0447\u0451\u0442 \u043f\u0430\u043c\u044f\u0442\u044c<\/a> \u0438 \u043d\u0438\u043a\u043e\u043c\u0443 \u043d\u0435 \u0443\u0434\u0430\u043b\u043e\u0441\u044c \u0437\u0430\u0441\u0442\u0430\u0432\u0438\u0442\u044c \u0435\u0451 \u0440\u0430\u0431\u043e\u0442\u0430\u0442\u044c \u0432 \u044d\u0442\u043e\u043c \u043a\u043e\u0434\u0435: \u0440\u0435\u0448\u0435\u043d\u0438\u0435 \u0414\u0436\u0438\u043c\u0430 \u0441\u043e\u0434\u0435\u0440\u0436\u0438\u0442 \u043e\u0448\u0438\u0431\u043a\u0443 \u043c\u043d\u043e\u0433\u043e\u043f\u043e\u0442\u043e\u0447\u043d\u043e\u0441\u0442\u0438 [concurrency], \u0438\u0437-\u0437\u0430 \u043a\u043e\u0442\u043e\u0440\u043e\u0439 \u043e\u043d\u043e \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u043d\u0435\u043f\u0440\u0430\u0432\u0438\u043b\u044c\u043d\u044b\u0435 \u0440\u0435\u0437\u0443\u043b\u044c\u0442\u0430\u0442\u044b \u043f\u043e\u0447\u0442\u0438 \u043f\u0440\u0438 \u043a\u0430\u0436\u0434\u043e\u043c \u0432\u044b\u0437\u043e\u0432\u0435.<\/p>\n<p>  \u0422\u043e\u0433\u0434\u0430 \u041f\u0438\u043a\u0435\u0440 [Peaker] \u043f\u0440\u0435\u0434\u043b\u043e\u0436\u0438\u043b <a href=\"http:\/\/www.reddit.com\/r\/coding\/comments\/codqo\/engineering_large_projects_in_a_functional\/c0ur6yx\">\u0441\u0432\u043e\u0435 \u0440\u0435\u0448\u0435\u043d\u0438\u0435<\/a> \u043d\u0430 \u0425\u0430\u0441\u043a\u0435\u043b\u0435:  <\/p>\n<pre><code class=\"haskell\">import Data.Array.IO import Control.Monad import Control.Concurrent  bool t _f True = t bool _t f False = f  swap arr i j = do   (iv, jv) &lt;- liftM2 (,) (readArray arr i) (readArray arr j)   writeArray arr i jv   writeArray arr j iv  parallel fg bg = do   m &lt;- newEmptyMVar   forkIO (bg &gt;&gt; putMVar m ())   fg &gt;&gt; takeMVar m  sort arr left right = when (left &lt; right) $ do   pivot &lt;- read right   loop pivot left (right - 1) (left - 1) right   where     read = readArray arr     sw = swap arr     find n pred i = bool (find n pred (n i)) (return i) . pred i =&lt;&lt; read i     move op d i pivot = bool (return op)                         (sw (d op) i &gt;&gt; return (d op)) =&lt;&lt;                         liftM (\/=pivot) (read i)     loop pivot oi oj op oq = do       i &lt;- find (+1) (const (&lt;pivot)) oi       j &lt;- find (subtract 1) (\\idx cell -&gt; cell&gt;pivot && idx\/=left) oj       if i &lt; j         then do           sw i j           p &lt;- move op (+1) i pivot           q &lt;- move oq (subtract 1) j pivot           loop pivot (i + 1) (j - 1) p q         else do           sw i right           forM_ (zip [left..op-1] [i-1,i-2..]) $ uncurry sw           forM_ (zip [right-1,right-2..oq+1] [i+1..]) $ uncurry sw           let ni = if left &gt;= op then i + 1 else right + i - oq               nj = if right-1 &lt;= oq then i - 1 else left + i - op           let thresh = 1024               strat = if nj - left &lt; thresh || right - ni &lt; thresh                       then (&gt;&gt;)                       else parallel           sort arr left nj `strat` sort arr ni right  main = do   arr &lt;- newListArray (0, 5) [3,1,7,2,4,8]   getElems arr &gt;&gt;= print   sort (arr :: IOArray Int Int) 0 5   getElems arr &gt;&gt;= print <\/code><\/pre>\n<p>  \u042d\u0442\u043e \u0440\u0435\u0448\u0435\u043d\u0438\u0435 \u0442\u043e\u0436\u0435 \u043e\u043a\u0430\u0437\u0430\u043b\u043e\u0441\u044c \u0441 \u0431\u0430\u0433\u0430\u043c\u0438. \u0412\u043e-\u043f\u0435\u0440\u0432\u044b\u0445, \u043e\u043d\u043e \u0441\u043e\u0434\u0435\u0440\u0436\u0438\u0442 \u0431\u043e\u043b\u0435\u0435 \u0442\u043e\u043d\u043a\u0438\u0439 \u0431\u0430\u0433 \u043c\u043d\u043e\u0433\u043e\u043f\u043e\u0442\u043e\u0447\u043d\u043e\u0441\u0442\u0438 [concurrency], \u043a\u043e\u0442\u043e\u0440\u044b\u0439 \u043f\u0440\u0438\u0432\u043e\u0434\u0438\u0442 \u043a \u043d\u0435\u0432\u0435\u0440\u043d\u044b\u043c \u0440\u0435\u0437\u0443\u043b\u044c\u0442\u0430\u0442\u0430\u043c \u043b\u0438\u0448\u044c \u0438\u0437\u0440\u0435\u0434\u043a\u0430. \u041f\u0438\u043a\u0435\u0440 <a href=\"http:\/\/www.reddit.com\/r\/coding\/comments\/codqo\/engineering_large_projects_in_a_functional\/c0v1bw5\">\u0438\u0441\u043f\u0440\u0430\u0432\u0438\u043b \u044d\u0442\u043e\u0442 \u0431\u0430\u0433<\/a> \u0432 \u0441\u043b\u0435\u0434\u0443\u044e\u0449\u0435\u043c \u043a\u043e\u0434\u0435:  <\/p>\n<pre><code class=\"haskell\">import System.Time import System.Random import Data.Array.IO import Control.Monad import Control.Concurrent import Control.Exception import qualified Data.List as L  bool t _ True = t bool _ f False = f  swap arr i j = do   (iv, jv) &lt;- liftM2 (,) (readArray arr i) (readArray arr j)   writeArray arr i jv   writeArray arr j iv  background task = do   m &lt;- newEmptyMVar   forkIO (task &gt;&gt;= putMVar m)   return $ takeMVar m  parallel fg bg = do   wait &lt;- background bg   fg &gt;&gt; wait  sort arr left right = when (left &lt; right) $ do   pivot &lt;- read right   loop pivot left (right - 1) (left - 1) right   where     read = readArray arr     sw = swap arr     find n pred i = bool (find n pred (n i)) (return i) . pred i =&lt;&lt; read i     move op d i pivot = bool (return op)                         (sw (d op) i &gt;&gt; return (d op)) =&lt;&lt;                         liftM (\/=pivot) (read i)     swapRange px x nx y ny = if px x then sw x y &gt;&gt; swapRange px (nx x) nx (ny y) ny else return y     loop pivot oi oj op oq = do       i &lt;- find (+1) (const (&lt;pivot)) oi       j &lt;- find (subtract 1) (\\idx cell -&gt; cell&gt;pivot && idx\/=left) oj       if i &lt; j         then do           sw i j           p &lt;- move op (+1) i pivot           q &lt;- move oq (subtract 1) j pivot           loop pivot (i + 1) (j - 1) p q         else do           sw i right           nj &lt;- swapRange (&lt;op) left (+1) (i-1) (subtract 1)           ni &lt;- swapRange (&gt;oq) (right-1) (subtract 1) (i+1) (+1)           let thresh = 1024000               strat = if nj - left &lt; thresh || right - ni &lt; thresh                       then (&gt;&gt;)                       else parallel           sort arr left nj `strat` sort arr ni right  timed act = do   TOD beforeSec beforeUSec &lt;- getClockTime   x &lt;- act   TOD afterSec afterUSec &lt;- getClockTime   return (fromIntegral (afterSec - beforeSec) +           fromIntegral (afterUSec - beforeUSec) \/ 1000000000000, x)  main = do   let n = 1000000   putStrLn &quot;Making rands&quot;   arr &lt;- newListArray (0, n-1) =&lt;&lt; replicateM n (randomRIO (0, 1000000) &gt;&gt;= evaluate)   elems &lt;- getElems arr   putStrLn &quot;Now starting sort&quot;   (timing, _) &lt;- timed $ sort (arr :: IOArray Int Int) 0 (n-1)   print . (L.sort elems ==) =&lt;&lt; getElems arr   putStrLn $ &quot;Sort took &quot; ++ show timing ++ &quot; seconds&quot; <\/code><\/pre>\n<p>  \u042d\u0442\u043e \u0440\u0435\u0448\u0435\u043d\u0438\u0435 \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u043e \u0440\u0430\u0431\u043e\u0442\u0430\u0435\u0442 \u043d\u0430 \u043c\u0430\u043b\u0435\u043d\u044c\u043a\u0438\u0445 \u0432\u0445\u043e\u0434\u043d\u044b\u0445 \u043c\u0430\u0441\u0441\u0438\u0432\u0430\u0445, \u043d\u043e \u0443\u0432\u0435\u043b\u0438\u0447\u0435\u043d\u0438\u0435 \u0440\u0430\u0437\u043c\u0435\u0440\u0430 \u043c\u0430\u0441\u0441\u0438\u0432\u0430 \u0434\u043e 1 000 000 \u044d\u043b\u0435\u043c\u0435\u043d\u0442\u043e\u0432 \u043f\u0440\u0438\u0432\u043e\u0434\u0438\u0442 \u043a \u043f\u0435\u0440\u0435\u043f\u043e\u043b\u043d\u0435\u043d\u0438\u044e \u0441\u0442\u0435\u043a\u0430. \u0411\u044b\u043b\u043e \u0441\u0434\u0435\u043b\u0430\u043d\u043e \u0434\u0432\u0435 \u043f\u043e\u043f\u044b\u0442\u043a\u0438 \u043f\u0440\u043e\u0430\u043d\u0430\u043b\u0438\u0437\u0438\u0440\u043e\u0432\u0430\u0442\u044c \u044d\u0442\u043e\u0442 \u0431\u0430\u0433, <a href=\"http:\/\/www.reddit.com\/r\/coding\/comments\/codqo\/engineering_large_projects_in_a_functional\/c0v182l\">\u0437\u0434\u0435\u0441\u044c<\/a> \u0438 <a href=\"http:\/\/www.reddit.com\/r\/programming\/comments\/bnnoh\/fast_automatically_parallel_arrays_for_haskell\/c0vm0w7\">\u0437\u0434\u0435\u0441\u044c<\/a>, \u043d\u043e \u043e\u0431\u0435 \u043e\u043a\u0430\u0437\u0430\u043b\u0438\u0441\u044c \u043d\u0435\u043f\u0440\u0430\u0432\u0438\u043b\u044c\u043d\u044b\u043c\u0438. \u041d\u0430 \u0441\u0430\u043c\u043e\u043c \u0434\u0435\u043b\u0435, \u044d\u0442\u043e <a href=\"http:\/\/www.reddit.com\/r\/programming\/comments\/bnnoh\/fast_automatically_parallel_arrays_for_haskell\/c0vpw9b\">\u0431\u0430\u0433<\/a> \u0432 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 <a href=\"http:\/\/haskell.org\/ghc\/docs\/6.12.1\/html\/libraries\/array-0.3.0.0\/Data-Array-MArray.html#v%3AgetElems\">getElems<\/a> \u0441\u0442\u0430\u043d\u0434\u0430\u0440\u0442\u043d\u043e\u0439 \u0431\u0438\u0431\u043b\u0438\u043e\u0442\u0435\u043a\u0438 \u0425\u0430\u0441\u043a\u0435\u043b\u044f, \u043a\u043e\u0442\u043e\u0440\u0430\u044f \u043f\u0435\u0440\u0435\u043f\u043e\u043b\u043d\u044f\u0435\u0442 \u0441\u0442\u0435\u043a \u043d\u0430 \u0431\u043e\u043b\u044c\u0448\u0438\u0445 \u043c\u0430\u0441\u0441\u0438\u0432\u0430\u0445.<\/p>\n<p>  \u041a\u0430\u043a \u043d\u0438 \u0441\u0442\u0440\u0430\u043d\u043d\u043e, \u0438\u0441\u043f\u0440\u0430\u0432\u043b\u0435\u043d\u0438\u044f \u0435\u0449\u0435 \u043d\u0435\u0441\u043a\u043e\u043b\u044c\u043a\u0438\u0445 \u0431\u0430\u0433\u043e\u0432, \u0441\u0443\u0434\u044f \u043f\u043e \u0432\u0441\u0435\u043c\u0443, \u043f\u0440\u0438\u0432\u0435\u043b\u0438 \u043a \u0440\u0435\u0430\u043b\u0438\u0437\u0430\u0446\u0438\u0438 \u043f\u0435\u0440\u0432\u043e\u0439 \u0432 \u043c\u0438\u0440\u0435 \u043f\u0430\u0440\u0430\u043b\u043b\u0435\u043b\u044c\u043d\u043e\u0439 \u0431\u044b\u0441\u0442\u0440\u043e\u0439 \u0441\u043e\u0440\u0442\u0438\u0440\u043e\u0432\u043a\u0438 \u043e\u0431\u0449\u0435\u0433\u043e \u043d\u0430\u0437\u043d\u0430\u0447\u0435\u043d\u0438\u044f, \u043d\u0430\u043f\u0438\u0441\u0430\u043d\u043d\u043e\u0439 \u043d\u0430 \u0425\u0430\u0441\u043a\u0435\u043b\u0435. \u0411\u043e\u043b\u0435\u0435 \u0442\u043e\u0433\u043e, \u0444\u0438\u043d\u0430\u043b\u044c\u043d\u043e\u0435 \u0440\u0435\u0448\u0435\u043d\u0438\u0435 \u043d\u0430 \u0425\u0430\u0441\u043a\u0435\u043b\u0435 \u0432\u0441\u0435\u0433\u043e \u043f\u0440\u0438\u043c\u0435\u0440\u043d\u043e \u043d\u0430 55% \u043c\u0435\u0434\u043b\u0435\u043d\u043d\u0435\u0435, \u0447\u0435\u043c \u044d\u043a\u0432\u0438\u0432\u0430\u043b\u0435\u043d\u0442\u043d\u043e\u0435 \u0440\u0435\u0448\u0435\u043d\u0438\u0435 \u043d\u0430 F#. \u0411\u0443\u0434\u044c\u0442\u0435 \u0432\u043d\u0438\u043c\u0430\u0442\u0435\u043b\u044c\u043d\u044b, \u044d\u0442\u043e \u0440\u0435\u0448\u0435\u043d\u0438\u0435 \u0442\u0440\u0435\u0431\u0443\u0435\u0442 \u043f\u043e\u0441\u043b\u0435\u0434\u043d\u044e\u044e \u0432\u0435\u0440\u0441\u0438\u044e GHC, \u043a\u043e\u0442\u043e\u0440\u0430\u044f \u0431\u044b\u043b\u0430 \u0432\u044b\u043f\u0443\u0449\u0435\u043d\u0430 \u043d\u0435\u0441\u043a\u043e\u043b\u044c\u043a\u043e \u043d\u0435\u0434\u0435\u043b\u044c \u043d\u0430\u0437\u0430\u0434 (<i>\u043f\u0440\u0438\u043c. \u043f\u0435\u0440\u0435\u0432.: \u0441\u0442\u0430\u0442\u044c\u044f 2010 \u0433\u043e\u0434\u0430, \u0442\u0430\u043a \u0447\u0442\u043e \u0447\u0438\u0442\u0430\u0442\u0435\u043b\u044e \u0431\u0435\u0441\u043f\u043e\u043a\u043e\u0438\u0442\u044c\u0441\u044f \u043d\u0435 \u043e \u0447\u0435\u043c<\/i>).<\/p>\n<h4>\u041f\u0435\u0440\u0432\u044b\u0435 \u043a\u043e\u043c\u043c\u0435\u043d\u0442\u0430\u0440\u0438\u0438 \u043a \u043e\u0440\u0438\u0433\u0438\u043d\u0430\u043b\u044c\u043d\u043e\u0439 \u0441\u0442\u0430\u0442\u044c\u0435<\/h4>\n<p>  Ganesh Sittampalam:  <\/p>\n<blockquote><p>\u041f\u043e\u0437\u0434\u0440\u0430\u0432\u043b\u044f\u044e \u0441 \u043e\u0431\u0443\u0447\u0435\u043d\u0438\u0435\u043c \u0442\u043e\u043c\u0443, \u043a\u0430\u043a \u0434\u0435\u043b\u0430\u0442\u044c fork \u0438 synchronise \u0432 \u0425\u0430\u0441\u043a\u0435\u043b\u0435!<\/p><\/blockquote>\n<p>  Jon Harrop (\u0430\u0432\u0442\u043e\u0440 \u043e\u0440\u0438\u0433\u0438\u043d\u0430\u043b\u0430):  <\/p>\n<blockquote><p>\u041f\u043e\u0437\u0434\u0440\u0430\u0432\u043b\u044f\u044e \u0441 \u043f\u0440\u043e\u0432\u0435\u0440\u043a\u043e\u0439 \u0442\u0432\u043e\u0435\u0439 \u0442\u0435\u043e\u0440\u0438\u0438 \u043e \u0442\u043e\u043c, \u0447\u0442\u043e \u044d\u0442\u043e \u0431\u0443\u0434\u0435\u0442 \u00ab\u0442\u0440\u0438\u0432\u0438\u0430\u043b\u044c\u043d\u043e\u00bb&#8230;<\/p><\/blockquote>\n<p> \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:\/\/habrahabr.ru\/post\/317348\/\"> https:\/\/habrahabr.ru\/post\/317348\/<\/a><\/p>\n","protected":false},"excerpt":{"rendered":"<p><i>\u041f\u0440\u0438\u043c. \u043f\u0435\u0440\u0435\u0432.: \u042d\u0442\u043e \u043f\u0435\u0440\u0435\u0432\u043e\u0434 <a href=\"http:\/\/flyingfrogblog.blogspot.de\/2010\/08\/parallel-generic-quicksort-in-haskell.html\">\u0438\u0441\u0442\u043e\u0440\u0438\u0438<\/a> \u043e \u0442\u043e\u043c, \u043a\u0430\u043a \u043d\u0435\u043b\u0435\u0433\u043a\u043e \u043e\u043a\u0430\u0437\u0430\u043b\u043e\u0441\u044c \u043d\u0430\u043f\u0438\u0441\u0430\u0442\u044c \u043f\u0430\u0440\u0430\u043b\u043b\u0435\u043b\u044c\u043d\u0443\u044e \u0431\u044b\u0441\u0442\u0440\u0443\u044e \u0441\u043e\u0440\u0442\u0438\u0440\u043e\u0432\u043a\u0443 (quicksort) \u043d\u0430 \u0425\u0430\u0441\u043a\u0435\u043b\u0435. \u041e\u0440\u0438\u0433\u0438\u043d\u0430\u043b \u0441\u0442\u0430\u0442\u044c\u0438 \u043d\u0430\u043f\u0438\u0441\u0430\u043d \u0432 2010 \u0433\u043e\u0434\u0443, \u043d\u043e, \u043c\u043d\u0435 \u043a\u0430\u0436\u0435\u0442\u0441\u044f, \u043e\u043d \u0434\u043e \u0441\u0438\u0445 \u043f\u043e\u0440 \u043f\u043e\u0443\u0447\u0438\u0442\u0435\u043b\u044c\u043d\u044b\u0439 \u0438 \u0432\u043e \u043c\u043d\u043e\u0433\u043e\u043c \u0430\u043a\u0442\u0443\u0430\u043b\u044c\u043d\u044b\u0439.<\/i><\/p>\n<p>  \u0415\u0441\u0442\u044c \u043c\u043d\u043e\u0433\u043e \u043f\u0440\u0438\u043c\u0435\u0440\u043e\u0432 \u0442\u043e\u0433\u043e, \u043a\u0430\u043a \u0425\u0430\u0441\u043a\u0435\u043b\u044c \u0434\u0435\u043b\u0430\u0435\u0442 \u043f\u0440\u043e\u0441\u0442\u044b\u0435 \u043f\u0440\u043e\u0431\u043b\u0435\u043c\u044b \u0441\u043b\u043e\u0436\u043d\u044b\u043c\u0438. \u0412\u0435\u0440\u043e\u044f\u0442\u043d\u043e, \u0441\u0430\u043c\u044b\u0439 \u0438\u0437\u0432\u0435\u0441\u0442\u043d\u044b\u0439 \u0438\u0437 \u043d\u0438\u0445\u2014\u044d\u0442\u043e \u0440\u0435\u0448\u0435\u0442\u043e \u042d\u0440\u0430\u0442\u043e\u0441\u0444\u0435\u043d\u0430, \u043a\u043e\u0442\u043e\u0440\u043e\u0435 \u043b\u0435\u0433\u043a\u043e \u043d\u0430\u043f\u0438\u0441\u0430\u0442\u044c \u043d\u0430 \u043b\u044e\u0431\u043e\u043c \u0438\u043c\u043f\u0435\u0440\u0430\u0442\u0438\u0432\u043d\u043e\u043c \u044f\u0437\u044b\u043a\u0435, \u043d\u043e \u043d\u0430\u0441\u0442\u043e\u043b\u044c\u043a\u043e \u0441\u043b\u043e\u0436\u043d\u043e \u043d\u0430\u043f\u0438\u0441\u0430\u0442\u044c \u043d\u0430 \u0425\u0430\u0441\u043a\u0435\u043b\u0435, \u0447\u0442\u043e \u043f\u043e\u0447\u0442\u0438 \u0432\u0441\u0435 \u0440\u0435\u0448\u0435\u043d\u0438\u044f, \u043a\u043e\u0442\u043e\u0440\u044b\u0435 \u043f\u0440\u0435\u043f\u043e\u0434\u0430\u0432\u0430\u043b\u0438\u0441\u044c \u0432 \u0443\u043d\u0438\u0432\u0435\u0440\u0441\u0438\u0442\u0435\u0442\u0430\u0445 \u0438 \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u043b\u0438\u0441\u044c \u0432 \u0438\u0441\u0441\u043b\u0435\u0434\u043e\u0432\u0430\u043d\u0438\u044f\u0445 \u043f\u043e\u0441\u043b\u0435\u0434\u043d\u0438\u0435 18 \u043b\u0435\u0442, \u043e\u043a\u0430\u0437\u0430\u043b\u0438\u0441\u044c \u043d\u0435\u043f\u0440\u0430\u0432\u0438\u043b\u044c\u043d\u044b\u043c\u0438. \u041d\u0430 \u0438\u0445 \u043d\u0435\u0441\u043e\u0441\u0442\u043e\u044f\u0442\u0435\u043b\u044c\u043d\u043e\u0441\u0442\u044c \u043e\u0431\u0440\u0430\u0442\u0438\u043b\u0430 \u0432\u043d\u0438\u043c\u0430\u043d\u0438\u0435 \u041c\u0435\u043b\u0438\u0441\u0441\u0430 \u041e&#8217;\u041d\u0438\u043b [Melissa O&#8217;Neill] \u0432 \u0441\u0432\u043e\u0435\u0439 \u0432\u0430\u0436\u043d\u043e\u0439 \u043d\u0430\u0443\u0447\u043d\u043e\u0439 \u0440\u0430\u0431\u043e\u0442\u0435 &quot;<a href=\"http:\/\/www.cs.hmc.edu\/~oneill\/papers\/Sieve-JFP.pdf\">\u041d\u0430\u0441\u0442\u043e\u044f\u0449\u0435\u0435 \u0440\u0435\u0448\u0435\u0442\u043e \u042d\u0440\u0430\u0442\u043e\u0441\u0444\u0435\u043d\u0430<\/a>&quot;. \u0412 \u043d\u0435\u0439 \u043f\u0440\u0438\u0432\u043e\u0434\u0438\u0442\u0441\u044f \u043f\u0440\u0435\u043a\u0440\u0430\u0441\u043d\u043e\u0435 \u043e\u043f\u0438\u0441\u0430\u043d\u0438\u0435 \u0442\u043e\u0433\u043e, \u0447\u0442\u043e \u043d\u0435 \u0442\u0430\u043a \u0432 \u0441\u0442\u0430\u0440\u044b\u0445 \u043f\u043e\u0434\u0445\u043e\u0434\u0430\u0445, \u0438 \u043a\u0430\u043a \u0438\u0445 \u043d\u0430\u0434\u043e \u0438\u0441\u043f\u0440\u0430\u0432\u0438\u0442\u044c. \u0420\u0435\u0448\u0435\u043d\u0438\u0435\u043c \u041c\u0435\u043b\u0438\u0441\u0441\u044b \u0431\u044b\u043b\u043e \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c \u043e\u0447\u0435\u0440\u0435\u0434\u044c \u0441 \u043f\u0440\u0438\u043e\u0440\u0438\u0442\u0435\u0442\u043e\u043c [priority queue] \u0434\u043b\u044f \u0440\u0435\u0430\u043b\u0438\u0437\u0430\u0446\u0438\u0438 \u0440\u0435\u0448\u0435\u0442\u0430. \u041f\u0440\u0430\u0432\u0438\u043b\u044c\u043d\u043e\u0435 \u0440\u0435\u0448\u0435\u043d\u0438\u0435 \u043e\u043a\u0430\u0437\u0430\u043b\u043e\u0441\u044c \u0432 10 \u0440\u0430\u0437 \u0434\u043b\u0438\u043d\u043d\u0435\u0435, \u0447\u0435\u043c <a href=\"http:\/\/fsharpnews.blogspot.com\/2010\/02\/sieve-of-eratosthenes.html\">\u043d\u0430\u043c\u043d\u043e\u0433\u043e \u0431\u043e\u043b\u0435\u0435 \u043f\u0440\u043e\u0441\u0442\u043e\u0435 \u0440\u0435\u0448\u0435\u043d\u0438\u0435 \u043d\u0430 F#<\/a> \u0438 \u0432 \u0446\u0435\u043b\u044b\u0445 100 \u0440\u0430\u0437 \u0434\u043b\u0438\u043d\u043d\u0435\u0435, \u0447\u0435\u043c \u043e\u0440\u0438\u0433\u0438\u043d\u0430\u043b\u044c\u043d\u044b\u0439 \u0438\u0437\u0443\u0440\u043e\u0434\u043e\u0432\u0430\u043d\u043d\u044b\u0439 \u0430\u043b\u0433\u043e\u0440\u0438\u0442\u043c \u043d\u0430 \u0425\u0430\u0441\u043a\u0435\u043b\u0435.  <\/p>\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-282317","post","type-post","status-publish","format-standard","hentry"],"_links":{"self":[{"href":"https:\/\/savepearlharbor.com\/index.php?rest_route=\/wp\/v2\/posts\/282317","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=282317"}],"version-history":[{"count":0,"href":"https:\/\/savepearlharbor.com\/index.php?rest_route=\/wp\/v2\/posts\/282317\/revisions"}],"wp:attachment":[{"href":"https:\/\/savepearlharbor.com\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=282317"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/savepearlharbor.com\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=282317"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/savepearlharbor.com\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=282317"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}