Results 1 to 8 of 8

Hybrid View

Previous Post Previous Post   Next Post Next Post
  1. #1
    Registered User
    Join Date: Aug:2006
    Location: Mars
    Posts: 14

    SUper HArdCOre CHallenge - cpu test ñúñ Mathematica

    Âúâ ôîðóìà ñå ïîÿâè õóáàâà ñòðàíèöà ñ òåñòîâå íà íîâèòå äâóÿäâåíè 64 áèòîâè áèñêâèòè. Ìèñëÿ ÷å îùå åäèí ÷èñòî-èç÷èñëèòåëåí òåñò íÿìà äà íàâðåäè. Ñàìî ïðåäè äà ñúì çàïî÷íàë- òîâà íàèñòèíà å åäèí òðóäåí òåñò, êîéòî â ïðîäúë÷åíèå íà äîñòà ÷àñîâå äà âè äúðæè cpu-òî íîí-ñòîï íà 100%.

    Çíà÷è ïúðâî òâà å òåñò ñ Mathematica. Çíà÷è ùå òðÿáâà ïúðâî äà ñè ÿ èíñòàëèðàòå. Íàé-íîâàòà âåðñèÿ ñåãà å 5.2, èìà ñè 15 äíåâåí îôèöèàëåí òðèÿë, à â äàòàòà è ëèíêîñà ñúùî ÿ èìà "íåîôèöèàëíî".

    Àäðåñà çà òðèÿëà:
    http://wolfram.com/products/mathematica/trial.cgi
    (ãîðå-äîëó 170 MB)

    Òóê ïðåäëàãàì äâà òåñòà:

    Code:
    (*TEST 1-Easier*)
    AllPossibleSums[list_] := Module[{l, res}, (
          l := Length[list];
          res := {};
          If[l == 2, res = Union[{0, list[[1]], list[[2]], 2list[[1]],
           2list[[2]], list[[1]] + list[[
          2]]}], res = Union[{list[[
            1]], 2list[[
              1]]}, Table[
                list[[1]] + list[[i]], {i, 2, l}], AllPossibleSums[
                  Delete[list, 1]]]];
          res
          )]
    
    Covers[list_] := (
        l := Length[list];
        i := 0;
        While[i < l && i == list[[i + 1]], i++];
        i -= 1
        )
    
    NG[list_] := Table[Append[list, i], {i, list[[-1]] + 1, 2list[[-1]] + 1}];
    AllPossibleSets[n_] := Module[{res, End}, (
          res := {};
          If[n == 1, res = {{1}}; Goto[End]];
          res = Flatten[NG /@ AllPossibleSets[n - 1], 1];
          Label[End];
          res
          )]
    
    ResultTable[n_] := Module[{res}, (
          Print["Computing the possible sets..."];
          aps := AllPossibleSets[n];
          Print["Computing the coverage of each set..."];
          res := Table[{aps[[i]], 
        Covers[AllPossibleSums[aps[[i]]]]}, {i, 1, Length[aps]}];
          res
          )]
    
    CP[n_] := (
        ap := AllPossibleSets[n];
        ar := 0;
        al := {};
        Do[cl := Covers[AllPossibleSums[ap[[ai]]]]; If[cl > ar, Print["New top:
        ", {ap[[ai]], cl}]; ar = cl; al = ap[[ai]]], {ai, 1, Length@ap}];
        {al, ar}
        )
    Timing[CP[8]]

    -------------------------------------------------------------------



    Code:
    (*TEST 2-Harder*)
    AllPossibleSums[list_] := Module[{l, res}, (
          l := Length[list];
          res := {};
          If[l == 2, res = Union[{0, list[[1]], list[[2]], 2list[[1]],
           2list[[2]], list[[1]] + list[[
          2]]}], res = Union[{list[[
            1]], 2list[[
              1]]}, Table[
                list[[1]] + list[[i]], {i, 2, l}], AllPossibleSums[
                  Delete[list, 1]]]];
          res
          )]
    
    Covers[list_] := (
        l := Length[list];
        i := 0;
        While[i < l && i == list[[i + 1]], i++];
        i -= 1
        )
    
    NG[list_] := Table[Append[list, i], {i, list[[-1]] + 1, 2list[[-1]] + 1}];
    AllPossibleSets[n_] := Module[{res, End}, (
          res := {};
          If[n == 1, res = {{1}}; Goto[End]];
          res = Flatten[NG /@ AllPossibleSets[n - 1], 1];
          Label[End];
          res
          )]
    
    ResultTable[n_] := Module[{res}, (
          Print["Computing the possible sets..."];
          aps := AllPossibleSets[n];
          Print["Computing the coverage of each set..."];
          res := Table[{aps[[i]], 
        Covers[AllPossibleSums[aps[[i]]]]}, {i, 1, Length[aps]}];
          res
          )]
    
    CP[n_] := (
        ap := AllPossibleSets[n];
        ar := 0;
        al := {};
        Do[cl := Covers[AllPossibleSums[ap[[ai]]]]; If[cl > ar, Print["New top:
        ", {ap[[ai]], cl}]; ar = cl; al = ap[[ai]]], {ai, 1, Length@ap}];
        {al, ar}
        )
    Timing[CP[9]]
    Çíà÷è èçáèðàòå ñè åäèí îò äâàòà, êîïèðàòå ãî, ñòàðòèðàòå ìàòåìàòèêàòà, è ãî ïåéñòâàòå â áÿëîòî ïðîçîð÷å. Ïîñëå íàòèñêàòå åäíîâðåìåííî shift+enter (òðÿáâà îòäîëó â òàñêáàðà äà ñå ïîÿâè îùå åäíà èêîíêà íà ïðîãðàìàíà è â çàãëàâíàòà ëåíòà äà ñå èçïèøå "Running"). È ñÿ ÷àêàòå äà ñå ìàõíå "Running"-à îò çàãëàâíàòà ëåíòà. Êàòî ñâúðøè, ïðîãðàìàòà ùå ñè èçïèøå âðåìåòî â ñåêóíäè. Òîâà èç÷èñëåíèå ìîæå äà îòíåìå íÿêîëêî ÷àñà çàòîâà íå ñå ïðèòåñíÿâàéòå ÷å ïðîãðàìàòà å çàöèêëèëà.
    Êàòî ñâúðøè ðàáîòàòà, ïðàâèòå åäèí ñêðèéíøîò (íåêà äà íå å îðÿçàí, çà äà ìîãàò äà ñå ñðàâíÿò ðåçóëòàòèòå), è ãî ïîñòâàòå òóêà.
    Ãëàâíîòî êîåòî èñêàì äà ðàçáåðà òóê å ïðè òàêèâà èç÷èñëåíèÿ äàëè äîïúðíèíåëíèòå ìá íà èíòåëà èëè àðõèòåêòóðàòà íà àìä-òî ùå å ïî - ïðîèçâîäèòåëíà.
    Last edited by comco; 7th October 2006 at 16:12.

  2. #2
    Cheaters Always Win wysiwyg's Avatar
    Join Date: Sep:2006
    Location: Sofia
    Posts: 3,285
    Çà õîðàòà ñ áàâåí âúíøåí íåò ETO òðèàëà â Data.bg...
    Çà êîä çà ïóñêàíå íà ïðîãðàìàòà öúêàòå íà ëèíêà, êîéòî comco å äàë â ïúðâèÿ ïîñò.
    Åäèò: Ïðîáëåì... Àêî ïðîãðàìàòà å òðèàë, íå ìîæåòå äà íàïðàâèòå òåñò! Òðÿáâà âè ðåãèñòðèðàíà âåðñèÿ.

  3. #3
    Registered User
    Join Date: Aug:2006
    Location: Mars
    Posts: 14
    Quote Originally Posted by wysiwyg
    Åäèò: Ïðîáëåì... Àêî ïðîãðàìàòà å òðèàë, íå ìîæåòå äà íàïðàâèòå òåñò! Òðÿáâà âè ðåãèñòðèðàíà âåðñèÿ.
    Îïà èçäúíêà.
    Àç òðèàëà íå ñúì ãòî ïîëçâàë, àìà íàëè å òðèàë?

  4. #4
    Cheaters Always Win wysiwyg's Avatar
    Join Date: Sep:2006
    Location: Sofia
    Posts: 3,285
    Àìè óæ ïèøå, ÷å å òðèàë. Ïóñêàì ãî, íî íèêúäå íå ìè äàâà ïðîçîðåö â êîéòî äà ìîãà äà ïåéñòâàì êàêâîòî è äà áèëî. Äàâà åðîð îò òèïà "Paste is disabled in this trial" è äî òàì.

  5. #5
    Registered User
    Join Date: Aug:2006
    Location: Mars
    Posts: 14
    Quote Originally Posted by wysiwyg
    Àìè óæ ïèøå, ÷å å òðèàë. Ïóñêàì ãî, íî íèêúäå íå ìè äàâà ïðîçîðåö â êîéòî äà ìîãà äà ïåéñòâàì êàêâîòî è äà áèëî. Äàâà åðîð îò òèïà "Paste is disabled in this trial" è äî òàì.
    Áàõòè òðèàëà.
    Ñîðè.
    Âúâ äàòàòà ñè èìà êåé äæåí.

  6. #6
    Cheaters Always Win wysiwyg's Avatar
    Join Date: Sep:2006
    Location: Sofia
    Posts: 3,285
    Èìà ñè ãåíåðàòîð, ñ êîéòî àç ëè÷íî íå ðàçáðàõ êàê ñå ðåãèñòðèðà ... Âúâåæäàø åäíè öèôðè îò ñàéòà â ãåíåðàòîðà, ïîñëå åäèí êîä êîéòî òè äàâà îò ïðîãðàìàòà â ãåíåðàòîðà, ïîñëå öèôðèòå îò ñàéòà â ïðîãðàìàòà è ãåíåðàòîðà òè äàâà îùå åäíè öèôðè, êîèòî ñúùî âúâåæäàø â ïðîãðàìàòà, è ñëåä 20 îïèòà ìè êàçâà, ÷å íå ñà âàëèäíè òèÿ êîäîâå îò ãåíåðàòîðà... ñâàëèõ îùå åäèí ãåíåðàòîð ñïåöèàëíî îò ëèíêîñà è ñ íåãî ñúùî íå ñòàâà.

  7. #7
    Registered User
    Join Date: Mar:2004
    Location: Íåñåáúð
    Posts: 3,748
    È äâåòå íåùà íà ïðàêòèêà ñà memory òåñòîâå. Êàêâà ïîëçà èìà çà òàÿ öåë äà ñå ïîëçâà Mathematica?

    Ïîëçàòà îò 64-áèòîâà ìàøèíà áè ìîãëà äà ñå óñåòè â mathematica, íî çà òàçè öåë òðÿáâà äà ïðàâèø íÿêàêâè ñìåòêè ñ ïî-ãîëÿìà òî÷íîñò, íå ìàíèïóëàöèÿ íà ìíîæåñòâà.

  8. #8
    Registered User
    Join Date: Aug:2006
    Location: Mars
    Posts: 14
    Quote Originally Posted by barnie
    È äâåòå íåùà íà ïðàêòèêà ñà memory òåñòîâå. Êàêâà ïîëçà èìà çà òàÿ öåë äà ñå ïîëçâà Mathematica?

    Ïîëçàòà îò 64-áèòîâà ìàøèíà áè ìîãëà äà ñå óñåòè â mathematica, íî çà òàçè öåë òðÿáâà äà ïðàâèø íÿêàêâè ñìåòêè ñ ïî-ãîëÿìà òî÷íîñò, íå ìàíèïóëàöèÿ íà ìíîæåñòâà.
    Èìàõ ïðåäâèï äâóÿäðåíèòå ïðîöåñîðè êàê ùå ñå ñïðàâÿò ñïðÿìî åäíîÿäðåíèòå.
    Íî ïàê ñè ìèñëÿ ÷å åäíà 64 áèò-êà ùå ãî âðúòíå ïî-áúðçî îò 32.
    È òîâà ñ ìåìîðèòå å ïî÷òè âÿðíî, íî ïàìåòòà ñå äèãà äî ìàëêî ñëåä íà÷àëîòî, êúäå ñå èçâúðøâà èñòèíñêàòà ìàíèïóëàöèÿ, êîÿòî âñúùíîñò å âèä ñëîæíî èçáðîÿâàíå è ñè òîâàðè äîâîëíî ïðîöåñîðà (áðîÿ íà ìíîæåñòâàòà, êîèòî òðÿáâà äà ãåíåðèðà å ãîëÿì, à òå îò ñâîÿ ñòðàíà ñà ìàëêè)
    Ïîñëå èäâàò ñúùèíñêèòå èç÷èñëåíèÿ êîèòî íàèñòèíà áàâÿò-çà âñÿêî ìíîæåñòâî ñå ïðåñìÿòàò âñè÷êè âúçìîæíè ñóìè, êîèòî ìîãàò äà ñå ïîëó÷àò. È ïëþñ òîâà ñå èçïîëçâà ðåêóðñèÿ. Ò.å. â ïî-ãîëÿìàòà ÷àñò îò âðåìåòî ïðîöåñîðà ùå ïðåñìÿòà ñóìè (íà åäíîöèôðåìè ÷èñëà!). Íî ïðåñìåòíàòèòå ñóìè ñå èçòðèâàò ìàëêî ñëåä êàòî ñå èç÷èñëÿò. Èçïîëçâàõ ñóìè, çàùîòî òîâà áåøå íàé-ïðîñòîòî, çà êîåòî ìîãà äà ñå ñåòÿ, è áè òðÿáâàëî ïî-ðàâíîìåðíî äà ñå èç÷èñëÿâà.

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  

Copyright © 1999-2011 Õàðäóåð ÁÃ. Âúçìîæíî å ñúäúðæàíèåòî íà òàçè ñòðàíèöà äà å îáåêò íà àâòîðñêè ïðàâà.
iskamPC.com | mobility.BG | Bloody's Techblog | Êðèïòîâàëóòè è ìàéíèíã | 3D Vision Blog | Ìàãàçèí çà åëåêòðîííè öèãàðè