;;; ringworld.el - Functions for computing physical characteristics of rotating space habitats.
;;; Created: November 11, 2008
;;; Author: David Meyer
(load "astronomical-constants")
;; Formal parameter names:
;; Ac: centripetal acceleration
;; Vr: rotational velocity
;; R: radius
(defun centripetal-accel (Vr R)
(/ (* Vr Vr) R))
(defun rotational-vel (Ac R)
(sqrt (* Ac R)))
(defun radius (Ac Vr)
(/ (* Vr Vr) Ac))