hg.stevelosh.com > antipodes

src/gen/world.lisp @ 34cb41653c41 

Start the rendering code
author Steve Losh <steve@stevelosh.com>
date Sat, 07 Jan 2017 12:10:22 +0000
parents (none)
children 552921869758 
(in-package :ap.gen)


(define-constant +chunk-size+ (expt 2 8))

(defun make-empty-heightmap ()
  (make-array (list +chunk-size+ +chunk-size+)
    :element-type 'single-float
    :initial-element 0.0))

(defun generate-heightmap ()
  (make-empty-heightmap))