Skip to content

Instantly share code, notes, and snippets.

View somecho's full-sized avatar

Somē Cho somecho

View GitHub Profile
//CIRCULAR MATRIX TRANSFORMATIONS
//SAMUEL CHO
//2020
// ------------------------------
float numLines = 360.0;
float arcSize = 360.0 / numLines;
float lineStart = -50;
float lineEnd = 50;
float translateHeight = -50;
@somecho
somecho / core.cljs
Created January 24, 2023 10:52
Very basic reagent + reitit front end routing template
(ns app.core
(:require [reagent.core :as r]
[reagent.dom :as rd]
[reitit.frontend :as rf]
[reitit.frontend.easy :as rfe]))
(defn about [] [:div "HELLO ABOUT ME"])
(defn another-view [] [:div "Another view"])
(defn home [] [:div "HOME"])
(def current-view (r/atom #'about))
@somecho
somecho / main.rs
Created June 24, 2024 16:23
nannou app boilerplate
use nannou::prelude::*;
fn main() {
nannou::app(model).update(update).view(view).run();
}
struct Model {}
fn model(app: &App) -> Model {
Model {}
}
@somecho
somecho / cs.wgsl
Created June 24, 2024 18:22
WGPU Compute Shader Particles in Nannou
struct Buffer {
data: array<u32>
}
@group(0) @binding(0)
var<storage, read_write> ping: Buffer;
@group(0) @binding(1)
var<storage, read_write> pong: Buffer;
@group(0) @binding(2)
var<uniform> frame_num: u32;
@somecho
somecho / hello-triangle.lisp
Last active June 30, 2024 20:27
OpenGL Hello Triangle in common lisp
(ql:quickload :cl-glfw3)
(ql:quickload :cl-opengl)
(defvar vs-source "#version 330
in vec3 aPos;
void main(){
gl_Position = vec4(aPos.x,aPos.y,aPos.z, 1.0);
}")
(defvar fs-source "