Ich definiere folgende Operatoren:

Der Manhattan-Zusatz a + _M b für einstellige Zahlen ist das Ergebnis der Verkettung von b mit a. Also ist a + _M b = 10a + b. Daher ist der allgemeine Operator + _{M wie} folgt definiert:

a + M b = 10a + b

Die Manhattan-Subtraktion a - _M b für einstellige Zahlen ist das Ergebnis des Entfernens des letzten b von a. Daher ist der Operator - _{M wie} folgt im Pseudocode definiert:

a - M b = a entferne letztes b

Manhattan-Multiplikation a × _M b ist das Ergebnis des Ersetzens aller Instanzen von b in a durch b Instanzen von b. Ergo ist × _M im Pseudocode definiert als:

a × M b = a -> s / b / <b Kopien von b> / g

Manhattan Division a ÷ _M b ist definiert als × _M :

1 ÷ M b = das erste Zeichen von b
a ≤ M b = a × M (1 ≤ M b)

Erstellen Sie vor diesem Hintergrund einen Interpreter, der Infix-Ausdrücke auswertet, die die folgenden Operatoren verwenden (dh a + bnicht a b +oder + a b).

+    Addition
-    Subtraction
/    Division
*    Multiplication
*M   Manhattan Multiplication
/M   Manhattan Division
+M   Manhattan Addition
-M   Manhattan Subtraction

Jeder Betreiber in Manhattan hat eine höhere Priorität als sein normales Gegenstück.

Testfälle:

> 5 +M 10 + 3
63      // 5*10 + 10 + 3 => 60 + 3
> 10 *M 2
10      // no 2s in 10
> 10 *M 1
10      // one 1 in 10 replaced once
> 23 *M 3
2333    // 23 has one 3, which is replaced with three 3s
> 23 *M 2
223     // 23 has one 2, which is replaced with two 2s
> 232 *M 2
22322   // 232 has two 2s, which are replaced with two 2s
> 232 *M 23
23...(23 times)...232   // ...
> 123 *M 2 * 3
3669    // 1223 * 3 => 3669
> 5 + 3 +M 2
37      // 5 + (3 +M 2) => 5 + 32 => 37
> 150 /M 3
150     // 150 ÷M 3 => 150 ×M 3 => 150
> 150 /M 53
1555550 // 150 ÷M 53 => 150 ×M 5 => 1555550
> 50 -M 0
5
> 500 -M 0
50
> 5234 -M 5
234
> 12 +M 633 *M 3
6333453 // = 12 +M 6333333 = 120 + 6333333 = 6333453

Dies ist ein Code-Golf , also gewinnt das kürzeste Programm in Bytes.

Bestenlisten

Hier ist ein Stack-Snippet, um sowohl eine reguläre Rangliste als auch eine Übersicht der Gewinner nach Sprache zu erstellen.

Um sicherzustellen, dass Ihre Antwort angezeigt wird, beginnen Sie Ihre Antwort mit einer Überschrift. Verwenden Sie dazu die folgende Markdown-Vorlage:

# Language Name, N bytes

Wo Nist die Größe Ihres Beitrags? Wenn Sie Ihren Score zu verbessern, Sie können alte Rechnungen in der Überschrift halten, indem man sich durch das Anschlagen. Zum Beispiel:

# Ruby, <s>104</s> <s>101</s> 96 bytes

Wenn Sie mehrere Zahlen in Ihre Kopfzeile aufnehmen möchten (z. B. weil Ihre Punktzahl die Summe von zwei Dateien ist oder wenn Sie die Strafen für Interpreter-Flags separat auflisten möchten), stellen Sie sicher, dass die tatsächliche Punktzahl die letzte Zahl in der Kopfzeile ist:

# Perl, 43 + 2 (-p flag) = 45 bytes

Sie können den Namen der Sprache auch als Link festlegen, der dann im Leaderboard-Snippet angezeigt wird:

# [><>](http://esolangs.org/wiki/Fish), 121 bytes

var QUESTION_ID=59299,OVERRIDE_USER=8478;function answersUrl(e){return"http://api.stackexchange.com/2.2/questions/"+QUESTION_ID+"/answers?page="+e+"&pagesize=100&order=desc&sort=creation&site=codegolf&filter="+ANSWER_FILTER}function commentUrl(e,s){return"http://api.stackexchange.com/2.2/answers/"+s.join(";")+"/comments?page="+e+"&pagesize=100&order=desc&sort=creation&site=codegolf&filter="+COMMENT_FILTER}function getAnswers(){jQuery.ajax({url:answersUrl(answer_page++),method:"get",dataType:"jsonp",crossDomain:!0,success:function(e){answers.push.apply(answers,e.items),answers_hash=[],answer_ids=[],e.items.forEach(function(e){e.comments=[];var s=+e.share_link.match(/\d+/);answer_ids.push(s),answers_hash[s]=e}),e.has_more||(more_answers=!1),comment_page=1,getComments()}})}function getComments(){jQuery.ajax({url:commentUrl(comment_page++,answer_ids),method:"get",dataType:"jsonp",crossDomain:!0,success:function(e){e.items.forEach(function(e){e.owner.user_id===OVERRIDE_USER&&answers_hash[e.post_id].comments.push(e)}),e.has_more?getComments():more_answers?getAnswers():process()}})}function getAuthorName(e){return e.owner.display_name}function process(){var e=[];answers.forEach(function(s){var r=s.body;s.comments.forEach(function(e){OVERRIDE_REG.test(e.body)&&(r="<h1>"+e.body.replace(OVERRIDE_REG,"")+"</h1>")});var a=r.match(SCORE_REG);a&&e.push({user:getAuthorName(s),size:+a[2],language:a[1],link:s.share_link})}),e.sort(function(e,s){var r=e.size,a=s.size;return r-a});var s={},r=1,a=null,n=1;e.forEach(function(e){e.size!=a&&(n=r),a=e.size,++r;var t=jQuery("#answer-template").html();t=t.replace("{{PLACE}}",n+".").replace("{{NAME}}",e.user).replace("{{LANGUAGE}}",e.language).replace("{{SIZE}}",e.size).replace("{{LINK}}",e.link),t=jQuery(t),jQuery("#answers").append(t);var o=e.language;/<a/.test(o)&&(o=jQuery(o).text()),s[o]=s[o]||{lang:e.language,user:e.user,size:e.size,link:e.link}});var t=[];for(var o in s)s.hasOwnProperty(o)&&t.push(s[o]);t.sort(function(e,s){return e.lang>s.lang?1:e.lang<s.lang?-1:0});for(var c=0;c<t.length;++c){var i=jQuery("#language-template").html(),o=t[c];i=i.replace("{{LANGUAGE}}",o.lang).replace("{{NAME}}",o.user).replace("{{SIZE}}",o.size).replace("{{LINK}}",o.link),i=jQuery(i),jQuery("#languages").append(i)}}var ANSWER_FILTER="!t)IWYnsLAZle2tQ3KqrVveCRJfxcRLe",COMMENT_FILTER="!)Q2B_A2kjfAiU78X(md6BoYk",answers=[],answers_hash,answer_ids,answer_page=1,more_answers=!0,comment_page;getAnswers();var SCORE_REG=/<h\d>\s*([^\n,]*[^\s,]),.*?(\d+)(?=[^\n\d<>]*(?:<(?:s>[^\n<>]*<\/s>|[^\n<>]+>)[^\n\d<>]*)*<\/h\d>)/,OVERRIDE_REG=/^Override\s*header:\s*/i;

body{text-align:left!important}#answer-list,#language-list{padding:10px;width:290px;float:left}table thead{font-weight:700}table td{padding:5px}

<script src="https://ajax.googleapis.com/ajax/libs/jquery/2.1.1/jquery.min.js"></script> <link rel="stylesheet" type="text/css" href="//cdn.sstatic.net/codegolf/all.css?v=83c949450c8b"> <div id="answer-list"> <h2>Leaderboard</h2> <table class="answer-list"> <thead> <tr><td></td><td>Author</td><td>Language</td><td>Size</td></tr></thead> <tbody id="answers"> </tbody> </table> </div><div id="language-list"> <h2>Winners by Language</h2> <table class="language-list"> <thead> <tr><td>Language</td><td>User</td><td>Score</td></tr></thead> <tbody id="languages"> </tbody> </table> </div><table style="display: none"> <tbody id="answer-template"> <tr><td>{{PLACE}}</td><td>{{NAME}}</td><td>{{LANGUAGE}}</td><td>{{SIZE}}</td><td><a href="{{LINK}}">Link</a></td></tr></tbody> </table> <table style="display: none"> <tbody id="language-template"> <tr><td>{{LANGUAGE}}</td><td>{{NAME}}</td><td>{{SIZE}}</td><td><a href="{{LINK}}">Link</a></td></tr></tbody> </table>

Dyalog APL , 104 81 79 93 75 Bytes

Bearbeiten: Behandelt jetzt 4342343 -M 34→ 43423richtig.

M←{⍎(5|⌊⍺⍺2)⊃'⍺×M⍣(⍺≠1)⍎⊃b'(b⎕R(⍵⍴'&')⊢a)'10⊥⍺⍵'(('(.*)',b←⍕⍵)⎕R'\1'⊢a←⍕⍺)}

Hintergrund

Dies erweitert APL um den Manhattan-Betreiber. Ein Operator in der APL-Terminologie ist ein Modifikator für Funktionen (z ÷. B. ). Ein Beispiel für einen Operator ist ⍨das Ändern von Funktionen, um ihre Argumente so auszutauschen 3 = 2 ÷⍨ 6. So ist es auch, Mändert die grundlegenden arithmetischen Funktionen ihre Manhattan Verwandten zu sein. Da es sich bei der resultierenden Sprache um eine Erweiterung von APL handelt, bleibt die strikte Priorität von APL von rechts nach links erhalten.

Erläuterung

Die übergeordnete Struktur ist M←{⍎(5|⌊⍺⍺2)⊃…, }die die Funktion ( +oder -oder ×oder ÷) auf 2 anwendet und anhand des Ergebnisses auswählt, welcher String ausgewertet werden soll. Die Saiten sind:

3 für -M: (('(.*)',b←⍕⍵)⎕R'\1'⊢a←⍕⍺)
 regex entferne das letzte Vorkommen von b (String-Repräsentation des rechten Arg.) In a (String-Repräsentation des linken Arg.)

2 für + M: '10⊥⍺⍵'
 Die Argumente werden als 10er-Basisziffern ausgewertet

1 für × M: (b⎕R(⍵⍴'&')⊢a)
 Ersetzen Sie Vorkommen von b durch b- kaufmännisches Und (dh Regex für die

0 für ÷ M: '⍺×M⍣(⍺≠1)⍎⊃b'
 ⍎⊃b erste Ziffer von b
 ⍺×M⍣(⍺≠1) gilt ⍺ × M, wenn ⍺ ⍺ 1

⊃ Wählen Sie aus den oben genannten vier Zeichenfolgen die Nummer aus:

(5|⌊⍺⍺2)mod-5 des Fußbodens der auf 2 angewendeten Funktion, nämlich:
 3 = 5 | ⌊-2
 2 = 5 | ⌊+2
 1 = 5 | ⌊×2weil × 2 ≤ sgn (2) ≤ 1
 0 = 5 | ⌊÷2weil ≤ 2 ≤ 1 ≤ 2 ≤ 0,5

Vielen Dank an meine liebe Freundin Ngn für die tollen Späne.

Perl, 100 99 98 Bytes

97 Byte Code + 1 Byte Befehlszeile

s/ |.*\K(\d)(\d*)-M\1|\+M/\2/g+s/(\d+)\*M(.)/$1=~s@$2@$&x$&@erg/e+s#/(M.)\d+#*\1#&&redo,$\=eval}{

Anwendungsbeispiel:

echo "123 *M 2 * 3 + 150 /M 53" | perl -p entry.pl

Python, 644 Bytes

import operator as o,re
x,q,t,r,w='*/+-M';mm,md,ma,ms='*M /M +M -M'.split()
n=lambda x:x
a=lambda a,b:str(10*int(a)+int(b))
v=lambda a,b:a[::-1].replace(b,'',1)[::-1]
m=lambda a,b:a.replace(b,b*int(b))
d=lambda a,b:m(a,b[0])if a>0 else b[0]
def p(s):s=s.group();ss=s.split();l=s.split(ss[1]);h={mm:m,md:d,ma:a,ms:v,x:o.mul,q:o.div,t:o.add,r:o.sub}.get(ss[1],n);return str(h(*map(int if h in[o.mul,o.div,o.add,o.sub]else n,map(u,map(str.strip,l)))))
def u(s):z=r'\d+ (?:\{0}{2}|\{1}{2}) \d+';return re.sub(z.format(t,r,''),p,re.sub(z.format(t,r,w),p,re.sub(z.format(x,q,''),p,re.sub(z.format(x,q,w),p,re.sub(r'\((.*)\)',u,s)))))
print u(input())

Akzeptiert Eingaben in STDIN (in Anführungszeichen eingeschlossen). Verwendet Regex, um Operationen abzugleichen und zu analysieren. Alle Arbeiten werden an Strings ausgeführt, und das Casting von und zu Ints wird nur bei normalen mathematischen Operationen verwendet.

Ich bin mir ziemlich sicher, dass dies weiter verbessert werden könnte, also werde ich in den nächsten Tagen daran arbeiten.