-
Notifications
You must be signed in to change notification settings - Fork 0
Expand file tree
/
Copy pathExampleSnake.fs
More file actions
4 lines (4 loc) · 10.3 KB
/
Copy pathExampleSnake.fs
File metadata and controls
4 lines (4 loc) · 10.3 KB
1
2
3
4
namespace SnakeGame
/// a pretrained example snake; remarkable due to its jiggly-ness
module ExampleSnake =
let brain =[|[|[|0.68797958386502223;0.61364921985829679;0.2505031404786292;0.52370027994909329;-0.62798202486149135;0.26641700662040013;0.55592451552670652;-0.24050232354574949;0.4652726438479835;-0.93307665359837777;-0.38003230202944593;0.95719615001100866;-0.50854726759183566;-0.54056376991819766;0.22899903178634082;-0.97879079624022869;0.55436558852641182;-0.10712566376995562;0.9869487037355773;-0.08675428804324678;-1.0040963561106921;0.9786239908908605;-0.12282636447009924;-0.18870517480592486;-0.93828619914980893|];[|-0.338807801901739;0.056645185135605389;0.3202189372108406;0.39512658606056439;-0.52697721704234235;-0.481006445996932;-0.24471232818659042;1.0078388368188584;-0.19533966071686693;-0.014893568044013154;-0.47054449679821009;0.30402033420466834;-0.51867703561609468;-0.84266350602855133;0.11571399881304896;-1.0370192490131684;-0.93500252623809621;0.7825603451219203;-0.27727705858521023;-0.71210252469037782;0.17413356582360984;-0.98293065558324133;0.75499650178244182;-0.92669747623926846;-0.384471709059771|];[|-0.44941531276768787;-0.27660422837203558;0.48050071126804728;-0.3245552844109737;0.87983600466504508;0.62935559297416144;0.95567108223013175;-0.37925265333580438;0.47643687546087277;-0.53185172685973892;0.076999019289854462;-0.22609107960299174;-0.28263872121583605;-0.21622479906129879;0.20042513783109614;-0.013168978483029097;-0.81803568723520059;0.5471845536619353;0.74641811222136867;0.49031736447956287;-0.71618443758049255;0.82541070448486642;-0.35700390079850519;0.630791762345839;-0.17335841158095674|];[|0.66504165273394511;-0.035067242614490582;-0.492057068912339;0.7560399750974216;0.66185718479652755;0.34841274154764257;-0.50402843655274632;0.18029285874231374;-0.38498061954275742;0.57635516932995756;0.53525911151210748;0.065963772128319262;0.31093117151918404;0.012883199794629228;0.063662524886272137;-0.29555746688300633;-0.50923189169225835;-0.15418126997266954;-0.93321195378583477;-0.10446808434299576;-0.10916970486248366;-0.50796616010738815;0.8869617478395635;0.21595134878342576;-0.82841882890482377|];[|0.58889859764319774;0.74039675228316182;0.66887152776535208;0.85799030350427619;0.7076736007387161;-0.11883165925686789;0.64222049789606617;-0.96174946381791937;-0.59580635030558626;-0.23227959419241154;0.45329194720522126;-0.16180055406959756;-0.79663436280406752;0.16642901963853698;1.0311165800556152;-0.26335482407517485;0.28560893588029268;-0.62847274798363117;-0.12513190790318504;-0.34516115741113251;-0.956563435968274;0.80190537153831931;-0.11381937626461468;-0.39724441266490351;0.24557942955083181|];[|-0.81252952376964016;0.600083648096809;0.081866463274632678;0.75795228209251175;-0.18515054799856182;-0.12363020909187862;-0.38362156746146348;-0.39922354342379773;-0.856633802920875;0.83945002963740833;0.047466299984355587;-0.697096216789026;0.59250785714597809;-0.6808751131411992;0.15959802663866354;0.67751015565242168;-0.94858729278137321;0.066737521824770371;0.81523078682610328;0.21454900000921873;-0.27516223747057933;-0.51121764651090729;0.039441045857705692;0.87545015278991789;0.76133206283735677|];[|-0.27393543735795445;-0.6568449897304387;-0.010753312181100889;0.37396181389408278;-0.14474090105143414;-0.61226848587965055;-0.83099061335948787;-0.22651467200672;0.885080920422953;-0.0898097450704359;-0.3694524167708364;0.3683418108189207;0.8409052686024947;-2.4750307213904088E-05;0.64480124452374921;-0.95286175743344326;0.526010566114453;0.13188559850299988;0.74573195100097545;-0.046929696075119841;-0.15394258459747889;-0.16710143913845596;0.44129247334845934;-0.466034596537256;0.489067727899676|];[|-0.36760890635084775;0.49413090033183393;-0.72644049798438348;-0.12761499034595444;-0.26705289225422446;-0.18250350939226498;-0.15461527100513475;-0.73303718803126228;0.38919037272650292;0.83986340965137973;-0.50839333295281675;-0.41158495213444568;0.16774789539526588;0.03082168895323845;-0.27615908313363746;-0.47297053430833413;0.74680005566533647;0.85246088255777064;-1.0240508163552968;-0.28916197149509648;0.134896557757117;0.2710665364056204;-0.503884089441916;-0.82665451503668663;-0.45217242904574262|];[|-0.32703191525630271;-0.8987472908193;-0.36197619197982189;0.32723646590823141;-0.095545935461086223;0.029079794981088414;0.90883754660786953;0.500701714074566;0.32099426686810073;-0.55341843297398585;-0.5156017934044832;-0.0055758459240084837;-0.068247631251927246;-0.619657703004618;-0.67798960007633524;0.11180702046109682;-0.50173248360014178;-0.35230230038627164;-0.61219117914894183;0.84372263251977175;-0.85693939768566718;-0.80489692827914694;0.82504594465952641;-0.72288853881083837;0.097373239713429025|];[|-0.89526202612335892;-0.661095543606717;0.80786873199412068;0.35105665836066779;-0.87563481734862314;-1.0079348883349144;0.8230162952388711;0.36613995042915448;-0.732526718952007;0.6719389589186473;-0.5174878958880379;0.20121633311790238;0.32382874345585178;0.32968343993168481;0.3468044798200971;0.28965377917031465;-0.18753573348165292;0.81132056281497733;-0.757686716391559;0.9619914945037995;0.82385747175843327;-0.825700183317857;0.1950325920502807;-0.30638777147344676;0.8621282488676385|];[|-0.88162402523757144;0.28787444361852232;0.71117346342242027;-0.80743019832644158;0.34749457072815604;0.22075001311523362;0.37740754455207259;0.23873705655277574;-0.29926149415749204;0.62187819121492938;0.59599091093800549;-0.11694042524180401;0.99459443334238351;-0.95989379750559745;0.49289545431402315;0.036751924071811035;0.64749538843869;0.28508860075151943;-0.258365669491871;0.6012580528209257;-0.90604950390106509;0.64657538740270559;-1.0101309739752351;-0.87945557889503223;-0.982035505083406|];[|0.64370194625281818;-0.933041954437756;-0.63370245957453852;-0.93476346685307266;0.88510205448842716;0.59149313835962358;0.5511124905529956;-0.43228021796433269;0.65193371080417828;-0.17517544340117622;0.98966589005182781;0.40418335395128624;-0.53705718532998914;-0.86697931817126428;0.39447239906269704;-0.358067660237694;0.0081899212990841561;0.88662944821949563;-0.7767461099553602;-0.12915385238321206;-0.19351027950342292;0.16018126860269394;0.23148985121934193;0.62503018590855874;0.24712263949547089|];[|0.50124055825231628;-0.9071776215113595;0.28118582496474764;-0.14392449201267421;-0.51578147314292444;0.094685609580336838;0.2411953137727432;0.65549450072250082;-0.84610981273749353;-0.44314739038383;0.83784642944943455;-0.17468961613005471;-0.68737899497494981;-0.4393077923447396;-0.88234884845202266;-0.93189318283083533;-0.77975680066261288;-0.29810586495236768;-0.4078893328401676;0.57201698271185952;-0.65769498916235514;-0.88397908676600967;0.24558003726675184;-0.88767516410335678;0.609687919108983|];[|0.69084031821733349;0.262634794489776;0.0705791428082525;0.3852055033227455;0.77771471753610055;0.060012239031499423;0.64761074752901249;-0.80827669237194422;0.8172611649228545;0.9558450514245056;-0.94237071552424256;-0.91963172010128924;0.074650052941706888;0.50235270368044849;-0.10540355092166152;0.80604432010373306;0.65652736172849657;-0.41331363672079224;0.046004444354215787;0.099991441778834567;0.84502181956778366;-0.20173900909802833;-0.66336555719532331;-0.64190648101358982;-0.20353562397115657|];[|-0.15695460945226009;-0.3908558321235962;-0.7164226574061543;-0.38774957386206355;-0.50641237970740183;-0.092095219163268488;-0.13569706775047682;0.84087170647497844;0.076819656862327584;-0.29243984654193733;-0.33233221353605957;-0.422068153238887;-0.10064752089821158;-0.10687578148528741;-0.34368870091796333;0.9230840588189122;0.12387865510949793;-0.010738460761838785;0.25181790828323813;0.14714128988196212;0.97415729008342944;-1.1047737764868764;-0.59485474023728391;-0.16993407455735562;-0.11690572514985952|];[|0.74867092346245;0.28108271358585113;-0.24636686875781358;-0.44266589294311864;-0.45087412494741108;-0.20587813258444798;-0.29386173665237691;-0.755423778991878;-0.48758515927362489;0.88454349426764223;0.67310794887743342;-0.67425075766362741;0.71818332273428487;-0.75965665921552883;-0.0831781505901265;0.32197225478569624;-0.89527114711481659;0.84744004991251987;-0.48043298319002292;-0.65566235759093539;0.33918768651745634;-0.23765318005236472;0.0961763877590076;-0.1110787620353879;-0.94680806668792294|];[|0.7006617592464488;0.67584811820455282;-0.43140664905840842;-0.49172960137563282;-0.595552636178002;-0.051011858066083771;-0.27785417447698035;-0.077942251292030487;0.92791173740658528;0.59747822794014516;0.573631824782878;-0.11439081837161953;0.26314942504425964;0.49204918307813306;0.94638623387850185;-0.95623253568831479;-0.30490124335740754;0.091625124230806362;-0.072756403681243059;-0.66702503416083059;0.39880856476668658;0.70982865608754975;-0.32831494522668192;0.37117914409897246;-0.75970947172479208|];[|0.68295354622553739;-0.39590349436546846;-0.43816267026502764;-0.65025646497041756;-0.58656456214681474;0.40616388958234517;0.8564502619190375;-0.78761283944715421;-0.22474448998679619;-0.32134158784586075;-0.26157090592271226;0.90170930699524909;0.030520529528390811;0.041757821590526767;0.17578461914126975;0.61821827367796489;-0.70409563778159;-0.0092519335212428548;0.59256248337801676;0.024726788496937085;-0.57239986700583245;0.7377444054175839;0.45433248740356991;0.43183195663235696;-0.86445649695790217|]|];[|[|-0.98696195147324439;-0.13557185428010857;-0.042782759611859414;-0.14756418259235293;-0.04390522173787717;0.58973391707508549;0.046681261289250708;0.40354231903494453;-0.59576781628456332;0.79768411526348637;-0.11804302773347268;-0.055385299956139819;0.46749997442937463;0.011074746554286675;0.666947414393978;0.76897083310828118;0.55040543499887251;-0.77336538939427846;0.56757894510756191|];[|-0.61141657208624134;-0.24458637513433873;0.28983772469211266;-0.55689345975261806;0.51271174732256286;0.8122900113800029;0.45712762120046069;0.92842381581125033;-0.85264387664973929;0.62531880841838139;0.80211343700164628;-0.89122529043407428;-0.76551828944381239;0.17603859688902215;-0.20702519981517703;-0.32217863493700449;-0.70192478851504858;-0.083108030763970664;0.6792868127763676|];[|0.11200050656311235;-0.06293729457209693;-0.3017373853650584;-0.40985521317918561;0.19945009809893091;-0.32302337617754162;0.95430716541330662;0.27329116330169656;0.47945202589009517;-0.88178462896579168;-0.03499704548856105;0.66470040277796816;-0.71791292385100991;0.57110979481186241;-0.49133159158347706;0.11685361343289434;-0.02818804090292578;0.62298507839580308;-0.9119252193960945|]|]|]