MeTTa Motto (rel extraction test)

gistfile1.txt

!(import! &self motto)
!(let $x ((chat-gpt-agent "gpt-4o-mini")
          (system "You are an assistant. Answer as a tuple (R a b) (no commas) where R in {near} and a,b in {human, robot, chair}")
          (user "the robot is close to the chair!"))
      (let $L ((py-dot ((py-dot ((py-dot $x replace) "(" "" ) replace) ")" "") split) " ")
           (let ($R $a $b)
                (((py-dot $L __getitem__) 0)
                 ((py-dot $L __getitem__) 1)
                 ((py-dot $L __getitem__) 2))
               (EXTRACTED: (R = $R) (a = $a) (b = $b)))))