diff --git a/gsll.asd b/gsll.asd
index 48cb454a9c844fff2ed20bff922acda9a3119a26..9aa940574c13062a12235f4846ca5c0d82563175 100644
--- a/gsll.asd
+++ b/gsll.asd
@@ -267,6 +267,7 @@
 	    :components
 	    ((cffi-grovel:grovel-file "mksa")
 	     (cffi-grovel:grovel-file "cgsm")
+	     (cffi-grovel:grovel-file "num")
 	     (:file export)))))
 
 (asdf:defsystem-connection GSLL-tests
diff --git a/physical-constants/export.lisp b/physical-constants/export.lisp
index 674392249897e894d4d739a1231169e4561cae8f..fad16f4f3fbc833700175ea832ba5a754b1d8f50 100644
--- a/physical-constants/export.lisp
+++ b/physical-constants/export.lisp
@@ -1,6 +1,6 @@
 ;; Export the physical constant symbols
 ;; Liam Healy 2009-05-28 22:53:27EDT export.lisp
-;; Time-stamp: <2009-12-27 10:00:05EST export.lisp>
+;; Time-stamp: <2011-08-20 20:14:05UTC export.lisp>
 ;;
 ;; Copyright 2009 Liam M. Healy
 ;; Distributed under the terms of the GNU General Public License
@@ -218,4 +218,21 @@
    +cgsm-joule+
    +cgsm-erg+
    +cgsm-stefan-boltzmann-constant+
-   +cgsm-thomson-cross-section+))
+   +cgsm-thomson-cross-section+
+   +num-fine-structure+
+   +num-avogadro+
+   +num-yotta+
+   +num-zetta+
+   +num-exa+
+   +num-peta+
+   +num-tera+
+   +num-giga+
+   +num-mega+
+   +num-kilo+
+   +num-milli+
+   +num-micro+
+   +num-nano+
+   +num-femto+
+   +num-atto+
+   +num-zepto+
+   +num-yocto+))
diff --git a/physical-constants/num.lisp b/physical-constants/num.lisp
new file mode 100644
index 0000000000000000000000000000000000000000..1408ceb41b8763c9560b36e3eb576af5ea2f9460
--- /dev/null
+++ b/physical-constants/num.lisp
@@ -0,0 +1,50 @@
+;; Dimensionless constants
+;; Sumant Oemrawsingh 2011-08-20 20:10:23UTC num.lisp
+;; Time-stamp: <2011-08-20 20:10:23UTC num.lisp>
+;;
+;; Copyright 2011 Sumant Oemrawsingh, Liam M. Healy
+;; Distributed under the terms of the GNU General Public License
+;;
+;; This program is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+(in-package :gsl)
+
+#+linux
+(define "_GNU_SOURCE")
+
+;;; When installed through Mac Ports, GSL .h files will be found
+;;; in /opt/local/include.
+#+darwin
+(cc-flags #.(gsl-config "--cflags"))
+
+(include "gsl/gsl_const_num.h")
+
+(constant (+num-fine-structure+ GSL_CONST_NUM_FINE_STRUCTURE) :type double-float)
+(constant (+num-avogadro+ GSL_CONST_NUM_AVOGADRO) :type double-float)
+(constant (+num-yotta+ GSL_CONST_NUM_YOTTA) :type double-float)
+(constant (+num-zetta+ GSL_CONST_NUM_ZETTA) :type double-float)
+(constant (+num-exa+ GSL_CONST_NUM_EXA) :type double-float)
+(constant (+num-peta+ GSL_CONST_NUM_PETA) :type double-float)
+(constant (+num-tera+ GSL_CONST_NUM_TERA) :type double-float)
+(constant (+num-giga+ GSL_CONST_NUM_GIGA) :type double-float)
+(constant (+num-mega+ GSL_CONST_NUM_MEGA) :type double-float)
+(constant (+num-kilo+ GSL_CONST_NUM_KILO) :type double-float)
+(constant (+num-milli+ GSL_CONST_NUM_MILLI) :type double-float)
+(constant (+num-micro+ GSL_CONST_NUM_MICRO) :type double-float)
+(constant (+num-nano+ GSL_CONST_NUM_NANO) :type double-float)
+(constant (+num-pico+ GSL_CONST_NUM_PICO) :type double-float)
+(constant (+num-femto+ GSL_CONST_NUM_FEMTO) :type double-float)
+(constant (+num-atto+ GSL_CONST_NUM_ATTO) :type double-float)
+(constant (+num-zepto+ GSL_CONST_NUM_ZEPTO) :type double-float)
+(constant (+num-yocto+ GSL_CONST_NUM_YOCTO) :type double-float)