Skip to content

Instantly share code, notes, and snippets.

View winny-'s full-sized avatar
๐Ÿ‘‹
***status goes here***

Winston (Winny) Weinert winny-

๐Ÿ‘‹
***status goes here***
View GitHub Profile

Work on Sprint #1 for cs 361

Grade Python homeworks

Laundry

Finish paying bills

Do cs 417 homework

Modify thesis for cs 657

Read papers for cs 657

'("KC_W"
"KC_ENTER"
"KC_K"
"KC_ENTER"
"KC_F"
"KC_ENTER"
"KC_B"
"KC_ENTER"
"KC_3"
"KC_QUOTE"
#lang racket
(require db/base
db/postgresql
db/util/datetime
db/util/geometry)
(struct planet (id location conqueror-id name mine-limit)
#:transparent)
(struct ship (id player-id fleet-id name
"""
This code is in the public domain.
"""
import unittest
def fib_loop(n):
x, y = 1, 0
for _ in range(n):
#lang typed/racket
(: fib (Exact-Nonnegative-Integer . -> . Exact-Nonnegative-Integer))
(define (fib n)
(cond
[(< n 2) 1]
[else (+ (fib (sub1 n))
(fib (- n 2)))]))

Keybase proof

I hereby claim:

  • I am winny- on github.
  • I am winny (https://keybase.io/winny) on keybase.
  • I have a public key ASCR9dFI1NIe-EhBhNXCG_9LqyCUAo2tQdPwjoQyt1AR3Ao

To claim this, I am signing this object:

@winny-
winny- / box.rkt
Last active November 20, 2016 12:46
#lang racket/gui
(define f%
(class frame%
(super-new)
(define/override (on-subwindow-char recv ch)
(match (send ch get-key-code)
[#\q (send this show #f) #t]
[_ (super on-subwindow-char recv ch)]))))
#lang racket
(define (is ls)
(let loop ([ls ls] [acc '()])
(if (empty? ls)
acc
(loop (cdr ls) (ins acc (car ls))))))
(define (ins ls elem)
(if (or (empty? ls) (< elem (car ls)))
import unittest
def insertion_sort(iterable):
"""Given `iterable`, sort it into a list using insertion sort."""
L = []
iterable = iter(iterable)
while True:
try:
i = next(iterable)
except StopIteration:
#lang racket/base
(require racket/class
racket/contract
racket/list
racket/string)
(provide (all-defined-out))
(define/contract steps exact-positive-integer? 7)