pramatias

#lang racket
(require 2htdp/image)

(define image (empty-scene 400 400 (color 200 40 98 127)))

(define wedges (beside (wedge 60 60 "solid" "purple")
                             
                       (wedge (random 0 100) (random 0 100) "solid" "brown")
                       (wedge (random 0 100) (random 0 100) "solid" "red")
                       (wedge (random 0 100) (random 0 100) "solid" "brown")

pramatias

#lang racket

(require 2htdp/image)

(define image (empty-scene 400 400 (color 200 40 98 127)))

(define wedges (beside (wedge 60 60 "solid" "purple")
                             (wedge (random 0 100) (random 0 100) "solid" "red")
                             (wedge (random 0 100) (random 0 100) "solid" "brown")
                             (wedge (random 0 100) (random 0 100) "solid" "red")

pramatias

#lang racket

(require 2htdp/image)

(define image (empty-scene 400 400 (color 200 40 98 127)))

(define brown_stones (beside 
                             (triangle (random 0 100) "solid" "black")
                             (triangle (random 0 100) "solid" "cyan")
                             (triangle (random 0 100) "solid" "black")

pramatias

#lang racket

(require 2htdp/image)

(define p (empty-scene 256 256 (color 27 200 98 127)))

(define purple_star
  (underlay (ellipse 30 60 200 "yellow")
            (ellipse 40 50 200 "blue")
            (ellipse 50 40 200 "yellow")

pramatias

#lang racket

(require 2htdp/image)

(define p (empty-scene 256 256 (color 27 200 98 127)))

(define purple_star
  (underlay (ellipse 30 60 40 "yellow")
            (ellipse 40 50 40 "yellow")
            (ellipse 50 40 40 "yellow")

pramatias

#lang racket

(require 2htdp/image)

(define p (rectangle 256 256 "solid" (color 0 0 250 127)))

(define red_star
  (underlay (ellipse 10 60 40 "red")
            (ellipse 20 50 40 "red")
            (ellipse 30 40 40 "red")

pramatias

struct AbPairs {
    word : String,
    abbreviation : String
}

struct SmallStr {
    small_str: String
}

impl SmallStr {

pramatias

Keybase proof

I hereby claim:

• I am pramatias on github.
• I am emporas71 (https://keybase.io/emporas71) on keybase.
• I have a public key ASD233DXySyY8yPqhn8cUSg86fC9oU30UIYxl-Z0NmXXjwo

To claim this, I am signing this object:

pramatias

‘(cond ((numberp ,x) ,@y) (t (print ,x) ,@y))
  
(list ’cond
  (cons (list ’numberp x) y)
  (list* ’t (list ’print x) y))

pramatias

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ant sim ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;   Copyright (c) Rich Hickey. All rights reserved.
;   The use and distribution terms for this software are covered by the
;   Common Public License 1.0 (http://opensource.org/licenses/cpl.php)
;   which can be found in the file CPL.TXT at the root of this distribution.
;   By using this software in any fashion, you are agreeing to be bound by
;   the terms of this license.
;   You must not remove this notice, or any other, from this software.

;As shown in the presentation: http://blip.tv/clojure/clojure-concurrency-819147