diff --git a/docs/content/ja/untypedtree.fsx b/docs/content/ja/untypedtree.fsx
index 63d5a35ed9..f34f9c6b43 100644
--- a/docs/content/ja/untypedtree.fsx
+++ b/docs/content/ja/untypedtree.fsx
@@ -212,7 +212,7 @@ let visitDeclarations decls =
 /// 暗黙的にモジュールまたは名前空間の宣言が存在することに注意。
 let visitModulesAndNamespaces modulesOrNss =
   for moduleOrNs in modulesOrNss do
-    let (SynModuleOrNamespace(lid, isMod, decls, xml, attrs, _, m)) = moduleOrNs
+    let (SynModuleOrNamespace(lid, isRec, isMod, decls, xml, attrs, _, m)) = moduleOrNs
     printfn "名前空間またはモジュール: %A" lid
     visitDeclarations decls
 (**
diff --git a/docs/content/untypedtree.fsx b/docs/content/untypedtree.fsx
index 30dd685761..600e87fb04 100644
--- a/docs/content/untypedtree.fsx
+++ b/docs/content/untypedtree.fsx
@@ -183,7 +183,7 @@ with multiple `namespace Foo` declarations:
 /// does not explicitly define it..
 let visitModulesAndNamespaces modulesOrNss =
   for moduleOrNs in modulesOrNss do
-    let (SynModuleOrNamespace(lid, isMod, decls, xml, attrs, _, m)) = moduleOrNs
+    let (SynModuleOrNamespace(lid, isRec, isMod, decls, xml, attrs, _, m)) = moduleOrNs
     printfn "Namespace or module: %A" lid
     visitDeclarations decls
 (**