chore: add more language samples

Author: nzbin

projects/dev-app/src/assets/lang_samples/apl.txt

@@ -0,0 +1,22 @@
+∇ FizzBuzz end;i
+:For i :In ⍳end
+    :If 0=15|i
+        ⎕←'FizzBuzz'
+    :ElseIf 0=3|i
+        ⎕←'Fizz'
+    :ElseIf 0=5|i
+        ⎕←'Buzz'
+    :Else
+        ⎕←i
+    :EndIf
+:EndFor
+∇
+
+⎕ ← data ← (1 2 3 4) (2 5 8 6) (8 6 2 3) (8 7 6 1)
+
+]dinput
+Sum ← {
+    ⍺ ← 0        ⍝ Left arg defaults to 0 if not given
+    0=≢⍵: ⍺      ⍝ If right arg is empty, return left arg
+    (⍺+⊃⍵)∇1↓⍵   ⍝ Add head to acc, recur over tail
+}

projects/dev-app/src/assets/lang_samples/asn.1.txt

@@ -0,0 +1,14 @@
+TBSCertificate  ::=  SEQUENCE  {
+     version         [0]  Version DEFAULT v1,
+     serialNumber         CertificateSerialNumber,
+     signature            AlgorithmIdentifier,
+     issuer               Name,
+     validity             Validity,
+     subject              Name,
+     subjectPublicKeyInfo SubjectPublicKeyInfo,
+     issuerUniqueID  [1]  IMPLICIT UniqueIdentifier OPTIONAL,
+                          -- If present, version MUST be v2 or v3
+     subjectUniqueID [2]  IMPLICIT UniqueIdentifier OPTIONAL,
+                          -- If present, version MUST be v2 or v3
+     extensions      [3]  Extensions OPTIONAL
+                          -- If present, version MUST be v3 --  }

projects/dev-app/src/assets/lang_samples/clojurescript.txt

@@ -0,0 +1,7 @@
+(ns hello-world.core)
+
+(println "Hello world!")
+
+;; ADDED
+(defn average [a b]
+  (/ (+ a b) 2.0))

projects/dev-app/src/assets/lang_samples/common_lisp.txt

@@ -0,0 +1,14 @@
+(defclass bicycle (vehicle)
+  ((mass :reader bicycle-mass
+         :initarg :mass
+         :type real
+         :documentation "The bike's mass."))
+  (:documentation "A bicycle."))
+
+(defclass canoe (vehicle)
+  ((rowers :reader canoe-rowers
+           :initarg :rowers
+           :initform 0
+           :type (integer 0)
+           :documentation "The number of rowers."))
+  (:documentation "A canoe."))

projects/dev-app/src/assets/lang_samples/d.txt

@@ -0,0 +1,21 @@
+import std.stdio;
+
+int x = 10;
+immutable int y = 30;
+const int* p;
+
+pure int purefunc(int i,const char* q,immutable int* s) {
+   //writeln("Simple print"); //cannot call impure function 'writeln'
+
+   debug writeln("in foo()"); // ok, impure code allowed in debug statement
+   // x = i;  // error, modifying global state
+   // i = x;  // error, reading mutable global state
+   // i = *p; // error, reading const global state
+   i = y;     // ok, reading immutable global state
+   auto myvar = new int;     // Can use the new expression:
+   return i;
+}
+
+void main() {
+   writeln("Value returned from pure function : ",purefunc(x,null,null));
+}

projects/dev-app/src/assets/lang_samples/elm.txt

@@ -0,0 +1,21 @@
+-- Show a list of items I need to buy at the grocery store.
+--
+
+import Html exposing (..)
+
+
+main =
+  div []
+    [ h1 [] [ text "My Grocery List" ]
+    , ul []
+        [ li [] [ text "Black Beans" ]
+        , li [] [ text "Limes" ]
+        , li [] [ text "Greek Yogurt" ]
+        , li [] [ text "Cilantro" ]
+        , li [] [ text "Honey" ]
+        , li [] [ text "Sweet Potatoes" ]
+        , li [] [ text "Cumin" ]
+        , li [] [ text "Chili Powder" ]
+        , li [] [ text "Quinoa" ]
+        ]
+    ]

projects/dev-app/src/assets/lang_samples/javascript.txt

@@ -1,5 +1,8 @@
+'use strict';
+
 /**
  * foo
+ *
  * @param {string[]} items
  * @param nada
  */

projects/dev-app/src/assets/lang_samples/julia.txt

@@ -0,0 +1,17 @@
+function f(x, y)
+    x[1] = 42    # mutates x
+    y = 7 + y    # new binding for y, no mutation
+    return y
+end
+
+fib(n::Integer) = n ≤ 2 ? one(n) : fib(n-1) + fib(n-2)
+
+map([A, B, C]) do x
+    if x < 0 && iseven(x)
+        return 0
+    elseif x == 0
+        return 1
+    else
+        return x
+    end
+end

projects/dev-app/src/assets/lang_samples/latex.txt

@@ -0,0 +1,45 @@
+% This is a template for doing homework assignments in LaTeX
+
+\documentclass{article} % This command is used to set the type of document you are working on such as an article, book, or presenation
+
+\usepackage{geometry} % This package allows the editing of the page layout
+\usepackage{amsmath}  % This package allows the use of a large range of mathematical formula, commands, and symbols
+\usepackage{graphicx}  % This package allows the importing of images
+
+\newcommand{\question}[2][]{\begin{flushleft}
+        \textbf{Question #1}: \textit{#2}
+
+\end{flushleft}}
+\newcommand{\sol}{\textbf{Solution}:} %Use if you want a boldface solution line
+\newcommand{\maketitletwo}[2][]{\begin{center}
+        \Large{\textbf{Assignment #1}
+
+            Course Title} % Name of course here
+        \vspace{5pt}
+
+        \normalsize{Matthew Frenkel  % Your name here
+
+        \today}        % Change to due date if preferred
+        \vspace{15pt}
+
+\end{center}}
+\begin{document}
+    \maketitletwo[5]  % Optional argument is assignment number
+    %Keep a blank space between maketitletwo and \question[1]
+
+    \question[1]{Here is my first question}
+
+    YOUR SOLUTION HERE
+
+    \question[2]{Here is my second question}
+
+    YOUR SOLUTION HERE
+
+    \question[3]{What is the \Large{$\int_0^2 x^2 \, dx $}\normalsize{. Show all steps}}
+
+    \begin{align*}
+    \int_0^2 x^2 &= \left. \frac{x^3}{3} \right|_0^2 \\
+                 &= \frac{2^3}{3}-\frac{0^3}{3}\\
+                 &= \frac{8}{3}
+    \end{align*}
+\end{document}

projects/dev-app/src/assets/lang_samples/liquid.txt

@@ -0,0 +1,18 @@
+<!-- If customer.name = "anonymous" -->
+{% if customer.name == "kevin" %}
+  Hey Kevin!
+{% elsif customer.name == "anonymous" %}
+  Hey Anonymous!
+{% else %}
+  Hi Stranger!
+{% endif %}
+
+{% assign handle = "cake" %}
+{% case handle %}
+  {% when "cake" %}
+     This is a cake
+  {% when "cookie", "biscuit" %}
+     This is a cookie
+  {% else %}
+     This is not a cake nor a cookie
+{% endcase %}