diff --git a/app/Main.hs b/app/Main.hs
index cd6ce46..3da0f37 100644
--- a/app/Main.hs
+++ b/app/Main.hs
@@ -45,10 +45,10 @@ writeFiles outputDir env@Env{..} = do
     . foldl (\acc -> Map.union acc . extractDependencies env) Map.empty
     $ envFacts
 
-  BS.writeFile (outputDir </> Text.unpack settingFactsJSONFileName) . encode $
+  BS.writeFile (outputDir </> Text.unpack settingDimensionJSONFileName) . encode $
     [ tableName table | (_, tabs) <- dimTables, table <- tabs , table `notElem` envTables ]
 
-  BS.writeFile (outputDir </> Text.unpack settingDimensionJSONFileName) . encode $
+  BS.writeFile (outputDir </> Text.unpack settingFactsJSONFileName) . encode $
     [ tableName table | (_, table) <- factTables ]
 
   where