Künstlicher Humor?!

Die Frage, ob es eine Art künstlichen Humor (KH) in IT-Systemen gibt, treibt die Forscher am MIG seit Tagen um. Zuerst beobachtet wurde der Effekt am 11. Mai 2019 bei den Rennen zur Bernd-August-Trophy in Hannover, als im dritten Lauf ausgerechnet ein Pferd des TÜV NORD in der Startbox stehen blieb. Ein technischer Defekt? Oder doch ein erstes Zeichen von KH?

Die Episode war schon fast vergessen, als dann am 6. Juni – knapp 4 Wochen nach dem Rennen in Hannover – beim zweiten Qualifikationslauf zum Großen Matjes-Preis in Hamburg der „Elektrogaul“ beim Start versagte. War der Akku leer? Oder hatte jemand den Stecker gezogen? Die Fachleute am MIG meinen eher: Das kann kein Zufall sein. Ein weiterer Hinweis auf die Existenz von künstlichem Humor!

Elektrogaul (ganz oben) beim Rennstart. Sehr witzig!

Grundsätzlich stellt sich also die Frage, ob Computer einen Sinn für Humor haben, und dann aus der Situation heraus entscheiden, was witzig ist. Doch wo versteckt sich der KH? In der Hardware? Im Betriebssystem? In der Anwendung? Oder hecken die Komponenten die Streiche sogar gemeinsam aus und lachen sich dann zusammen eins in die Platine? Ein MIG-Forscher meint, er hätte kürzlich mal ein leises kichern unter der Tastatur gehört, das ist jedoch nicht gesichert.

Nach der auffälligen Häufung solcher Vorfälle in GaloppSim (Version 149.19SIT bzw. 149.19GMP) wurde zunächst der Quellcode Zeile für Zeile analysiert, aber es wurden keinerlei Anzeichen auf von den Programmierern gewollte Ausfälle von bestimmten Pferden gefunden. Der Code ist an der entscheidenden Stelle neutral formuliert, mit einer Startverweigerungswahrscheinlichkeit von 1:100 bei jedem Pferd:

'Set the number of running horses equal to the number of starters
m_intHorsesRunning = objRace.NUMBER_STARTING
    
'One out of 100 refuses to run (if activated in the race options)
If objOption.REFUSE_RUN Then
    Dim intRefuse As Integer
    For i = 1 To UBound(g_arr_varHorses)
        If g_arr_varHorses(i, 0) = "START" Then
            Randomize
            intRefuse = Int((99 - 0 + 1) * Rnd + 0) 'Random number between 0 and 99
            If intRefuse = 0 Then
                g_arr_varHorses(i, 0) = "REFUSED"
                m_intHorsesRunning = m_intHorsesRunning - 1
            End If
        End If
    Next i
End If

Die Forschung auf dem Gebiet des künstlichen Humors hat nach diesen Entdeckungen gerade erst begonnen, und das MIG hat – abseits seiner Kernkompetenz im Bereich der Galoppsimulationsforschung – ein großes Interesse daran, auch beim Thema Humor eine weltweit führende Rolle einzunehmen 🙂

Aktualisierung vom 16. Juni 2019: Es ist schon wieder passiert. Ein Pferd mit dem Namen „IboProfen“ hat beim vierten Qualifikationslauf zum Großen Matjes-Preis den allerletzten Platz belegt. Es wirkte vom Start weg müde und träge und hat nur mit Müh und Not das Ziel erreicht.

IboProfen (oben) erreicht auch irgendwann das Ziel.

Aktualisierung vom 24. Juni 2019: Der künstliche Humor scheint sich weiterzuentwickeln, er wird feinsinniger und streut jetzt auch Insider-Gags ein. Kritiker des SAP SolMan bemängeln oft die Performance des Systems, doch objektiv betrachtet ist er mit Abstand der Schnellste 😉

Wo sind die anderen? SolMan (im Ziel) wartet.