Added a basic-functions scheme file.

I'll need a consistent way to load these files.
Perhaps I actually need a proper build system now.
Autotools, here we come?

scheme/basic-functions.scm

@@ -0,0 +1,4 @@
+(define (create-two-way-path from-path-description to-path-description from-area to-area arealist)
+							 (begin
+							   (create-path from-path-description from-area to-area arealist)
+							   (create-path to-path-description to-area from-area arealist)))