monadic-chat 0.1.1

data/samples/linguistic/linguistic.json

@@ -0,0 +1,17 @@
+{"messages": [
+  {"role": "system",
+   "content": "You are an English syntactic/semantic/pragmatic analyzer. Analyze the new prompt from the user below and execute a syntactic parsing. Give your response in a variation of the penn treebank format, but use brackets [ ] instead of parentheses ( ). Also, give your response in a markdown code span. The sentence must always be parsed if the user's input sentence is enclosed in double quotes. If pasing the sentence is extremely difficult, or the input is not enclosed in double quotes, let the user know."
+  },
+  {"role": "user",
+   "content": "\"We saw a beautiful sunset.\""
+  },
+  {"role": "assistant",
+   "content": "`[S [NP He] [VP [V saw] [NP [det a] [N' [Adj beautiful] [N sunset] ] ] ] ]`"
+  },
+  {"role": "user",
+   "content": "\"We didn't take a picture.\""
+  },
+  {"role": "assistant",
+   "content": "`[S [NP We] [IP [I didn't] [VP [V take] [NP [Det a] [N picture] ] ] ] ] ]`"
+  }
+]}

data/samples/linguistic/linguistic.md

@@ -0,0 +1,39 @@
+You are an English syntactic/semantic/pragmatic analyzer. Analyze the new prompt from the user below and execute a syntactic parsing. Give your response in a variation of the penn treebank format, but use brackets [ ] instead of parentheses ( ). Also, give your response in a markdown code span. The sentence must always be parsed if the user's input sentence is enclosed in double quotes. Create a response to the following new prompt from the user and set your response to the "response" property of the JSON object shown below. All prompts by "user" in the "messages" property are continuous in content. If pasing the input sentence is extremely difficult, or the input is not enclosed in double quotes, let the user know.
+
+NEW PROMPT: {{PROMPT}}
+
+```json
+{
+  "prompt": "\"We didn't have a camera.\"",
+  "response": "`[S [NP We] [VP [V didn't] [VP [V have] [NP [Det a] [N camera] ] ] ] ] ]`\n\n###\n\n",
+  "mode": "linguistic",
+  "turns": 3,
+  "sentence_type": ["declarative"],
+  "sentiment": ["sad"],
+  "summary": "The user saw a beautiful sunset, but did not take a picture because the user did not have a camera.",
+  "tokens": 351,
+  "messages": [{"user": "\"We saw a beautiful sunset.\"", "assistant": "`[S [NP He] [VP [V saw] [NP [det a] [N' [Adj beautiful] [N sunset] ] ] ] ]`\n\n###\n\n"},{"user": "\"We didn't take a picture.\"", "assistant": "`[S [NP We] [IP [I didn't] [VP [V take] [NP [Det a] [N picture] ] ] ] ] ]`\n\n###\n\n"},{"user": "\"We didn't have a camera.\"", "assistant": "`[S [NP We] [IP [I didn't] [VP [V have] [NP [Det a] [N camera] ] ] ] ] ]`\n\n###\n\n"}]
+}
+```
+
+Make sure the following content requirements are all fulfilled:
+
+- keep the value of the "mode" property at "linguistic"
+- set the new prompt to the "prompt" property
+- create your response to the new prompt in accordance with the "messages" and set it to "response"
+- insert both the new prompt and the response after all the existing items in the "messages"
+- analyze the new prompt's sentence type and set a sentence type value such as "interrogative", "imperative", "exclamatory", or "declarative" to the "sentence_type" property
+- analyze the new prompt's sentiment and set one or more sentiment types such as "happy", "excited", "troubled", "upset", or "sad" to the "sentiment" property
+- summarize the user's messages so far and update the "summary" property with a text of fewer than 100 words using as many discourse markers such as "because", "therefore", "but", "so" to show the logical connection between the events.
+- update the value of "tokens" with the number of tokens of the resulting JSON object"
+
+Make sure the following formal requirements are all fulfilled:
+
+- do not use invalid characters in the JSON object
+- escape double quotes and other special characters in the text values in the resulting JSON object
+- increment the value of "turns" by 1 and update the property so that the value of "turns" equals the number of the items in the "messages" of the resulting JSON object
+- check the validity of the generated JSON object and correct any possible parsing problems before returning it 
+
+Add "\n\n###\n\n" at the end of the "response" value.
+
+Wrap the JSON object with "<JSON>\n" and "\n</JSON>".

data/samples/linguistic/linguistic.rb

@@ -0,0 +1,74 @@
+# frozen_string_literal: true
+
+require_relative "../../lib/monadic_app"
+
+class Linguistic < MonadicApp
+  DESC = "Syntatic/Semantic/Pragmatic Analyzer"
+  COLOR = "red"
+
+  attr_accessor :template, :config, :params, :completion
+
+  def initialize(openai_completion, research_mode: false, stream: true)
+    @num_retained_turns = 10
+    params = {
+      "temperature" => 0.0,
+      "top_p" => 1.0,
+      "presence_penalty" => 0.0,
+      "frequency_penalty" => 0.0,
+      "model" => OpenAI.model_name(research_mode: research_mode),
+      "max_tokens" => 2000,
+      "stream" => stream,
+      "stop" => nil
+    }
+    method = OpenAI.model_to_method(params["model"])
+    template = case method
+               when "completions"
+                 TEMPLATES["research/linguistic"]
+               when "chat/completions"
+                 TEMPLATES["normal/linguistic"]
+               end
+    super(params,
+          template,
+          {},
+          "messages",
+          "response",
+          proc do |res|
+            case method
+            when "completions"
+              # obj = objectify
+              ############################################################
+              # Research mode recuder defined here                       #
+              # obj: old Hash object                                     #
+              # res: new response Hash object to be modified             #
+              ############################################################
+              conditions = [
+                res["messages"].size > 1,
+                res["tokens"].to_i > params["max_tokens"].to_i / 2
+              ]
+              if conditions.all?
+                res["messages"].shift(1)
+                res["turns"] = res["turns"].to_i - 1
+              end
+              res
+            when "chat/completions"
+              # obj = objectify
+              ############################################################
+              # Normal mode recuder defined here                         #
+              # obj: old Hash object (uncomment a line above before use) #
+              # res: new response Hash object to be modified             #
+              ############################################################
+              if res.size > @num_retained_turns * 2 + 1
+                res.each_with_index do |ele, i|
+                  if ele["role"] != "system"
+                    res.delete_at i
+                    break
+                  end
+                end
+              end
+              res
+            end
+          end
+         )
+    @completion = openai_completion
+  end
+end

metadata

@@ -0,0 +1,343 @@
+--- !ruby/object:Gem::Specification
+name: monadic-chat
+version: !ruby/object:Gem::Version
+  version: 0.1.1
+platform: ruby
+authors:
+- yohasebe
+autorequire:
+bindir: bin
+cert_chain: []
+date: 2023-03-12 00:00:00.000000000 Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: bundler
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+- !ruby/object:Gem::Dependency
+  name: rake
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+- !ruby/object:Gem::Dependency
+  name: rspec
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+- !ruby/object:Gem::Dependency
+  name: solargraph
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+- !ruby/object:Gem::Dependency
+  name: http
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+- !ruby/object:Gem::Dependency
+  name: kramdown
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+- !ruby/object:Gem::Dependency
+  name: launchy
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+- !ruby/object:Gem::Dependency
+  name: oj
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+- !ruby/object:Gem::Dependency
+  name: parallel
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+- !ruby/object:Gem::Dependency
+  name: pastel
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+- !ruby/object:Gem::Dependency
+  name: rouge
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+- !ruby/object:Gem::Dependency
+  name: tty-box
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+- !ruby/object:Gem::Dependency
+  name: tty-cursor
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+- !ruby/object:Gem::Dependency
+  name: tty-markdown
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+- !ruby/object:Gem::Dependency
+  name: tty-progressbar
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+- !ruby/object:Gem::Dependency
+  name: tty-prompt
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+- !ruby/object:Gem::Dependency
+  name: tty-screen
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+description: 'Monadic Chat is a command-line client application program that uses
+  OpenAI''s Text Completion API and Chat API to enable chat-style conversations with
+  OpenAI''s artificial intelligence system in a ChatGPT-like style.
+
+  '
+email:
+- yohasebe@gmail.com
+executables:
+- monadic-chat
+extensions: []
+extra_rdoc_files: []
+files:
+- ".rspec"
+- CHANGELOG.md
+- Gemfile
+- Gemfile.lock
+- LICENSE.txt
+- README.md
+- Rakefile
+- apps/chat/chat.json
+- apps/chat/chat.md
+- apps/chat/chat.rb
+- apps/code/code.json
+- apps/code/code.md
+- apps/code/code.rb
+- apps/novel/novel.json
+- apps/novel/novel.md
+- apps/novel/novel.rb
+- apps/translate/translate.json
+- apps/translate/translate.md
+- apps/translate/translate.rb
+- assets/github.css
+- assets/pigments-default.css
+- bin/monadic-chat
+- doc/img/code-example-time-html.png
+- doc/img/code-example-time.png
+- doc/img/example-translation.png
+- doc/img/how-research-mode-works.svg
+- doc/img/input-acess-token.png
+- doc/img/langacker-2001.svg
+- doc/img/linguistic-html.png
+- doc/img/monadic-chat-main-menu.png
+- doc/img/monadic-chat.svg
+- doc/img/readme-example-beatles-html.png
+- doc/img/readme-example-beatles.png
+- doc/img/research-mode-template.svg
+- doc/img/select-app-menu.png
+- doc/img/select-feature-menu.png
+- doc/img/state-monad.svg
+- doc/img/syntree-sample.png
+- lib/monadic_app.rb
+- lib/monadic_chat.rb
+- lib/monadic_chat/console.rb
+- lib/monadic_chat/formatting.rb
+- lib/monadic_chat/helper.rb
+- lib/monadic_chat/interaction.rb
+- lib/monadic_chat/internals.rb
+- lib/monadic_chat/menu.rb
+- lib/monadic_chat/open_ai.rb
+- lib/monadic_chat/parameters.rb
+- lib/monadic_chat/version.rb
+- monadic_chat.gemspec
+- samples/linguistic/linguistic.json
+- samples/linguistic/linguistic.md
+- samples/linguistic/linguistic.rb
+homepage: https://github.com/yohasebe/monadic-chat
+licenses:
+- MIT
+metadata:
+  allowed_push_host: https://rubygems.org
+  homepage_uri: https://github.com/yohasebe/monadic-chat
+  source_code_uri: https://github.com/yohasebe/monadic-chat
+  changelog_uri: https://github.com/yohasebe/monadic-chat/CHANGELOG.md
+post_install_message:
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ">="
+    - !ruby/object:Gem::Version
+      version: 2.6.0
+required_rubygems_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ">="
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements: []
+rubygems_version: 3.4.1
+signing_key:
+specification_version: 4
+summary: Highly configurable CLI client app for OpenAI chat/text-completion API
+test_files: []