diff --git a/load-structures.lsp b/load-structures.lsp
index 9e8a0f91bb6c3818da69649c4da91cee032c8b55..8dcdf4eb80dd5be0261368c754b5eddd8443dee7 100644
--- a/load-structures.lsp
+++ b/load-structures.lsp
@@ -1,7 +1,7 @@
 ;;; Tests of structures
 
-(load "structure-00.lsp")
-(load "structures-01.lsp")
-(load "structures-02.lsp")
-(load "structures-03.lsp")
-(load "structures-04.lsp")
\ No newline at end of file
+(load "structures/structure-00.lsp")
+(load "structures/structures-01.lsp")
+(load "structures/structures-02.lsp")
+(load "structures/structures-03.lsp")
+(load "structures/structures-04.lsp")
diff --git a/structure-00.lsp b/structures/structure-00.lsp
similarity index 100%
rename from structure-00.lsp
rename to structures/structure-00.lsp
diff --git a/structures-01.lsp b/structures/structures-01.lsp
similarity index 100%
rename from structures-01.lsp
rename to structures/structures-01.lsp
diff --git a/structures-02.lsp b/structures/structures-02.lsp
similarity index 100%
rename from structures-02.lsp
rename to structures/structures-02.lsp
diff --git a/structures-03.lsp b/structures/structures-03.lsp
similarity index 100%
rename from structures-03.lsp
rename to structures/structures-03.lsp
diff --git a/structures-04.lsp b/structures/structures-04.lsp
similarity index 100%
rename from structures-04.lsp
rename to structures/structures-04.lsp