diff --git a/R/cod_check_code.R b/R/cod_check_code.R
index 0efb42e..ddd2809 100644
--- a/R/cod_check_code.R
+++ b/R/cod_check_code.R
@@ -58,7 +58,8 @@ cod_check_code <- function(cod, version = c("icd10", "icd11"), sex) {
           .data$cod_check_sex
         ),
         na.rm = TRUE
-      )
+      ) |>
+        (\(x) ifelse(x == 0, 0, 1))()
     )
 }
 
diff --git a/R/create_ill_defined_icd11.R b/R/create_ill_defined_icd11.R
deleted file mode 100644
index 042515a..0000000
--- a/R/create_ill_defined_icd11.R
+++ /dev/null
@@ -1,26 +0,0 @@
-#'
-#' Create vector of ill-defined ICD 11 codes
-#'
-#' Based on https://icdcdn.who.int/icd11referenceguide/en/html/index.html#list-of-illdefined-conditions
-#'
-
-list_ill_defined_icd11 <- function() {
-  ## Create vector of ill-defined heart failure BD10-BD1Z ----
-  set1 <- codigo::icd11_linearization_mms |>
-    dplyr::filter(
-      ChapterNo == 11 & stringr::str_detect(Code, pattern = "BD")
-    ) |>
-    dplyr::slice(1:11) |>
-    dplyr::pull(Code)
-
-  ## Create vector of ill-defined others ----
-  set2 <- c("BA2Z", "BE2Y", "BE2Z", "CB41.0", "CB41.2", "KB2D", "KB2E")
-
-  ## Get codes for Chapter 21 except 	MA15, MG43, MG44.1, MH11, MH15 ----
-  set3 <- codigo::icd11_linearization_mms |>
-    dplyr::filter(ChapterNo == 21) |>
-    dplyr::filter(!Code %in% c("MA15", "MG43", "MG44.1", "MH11", "MH15")) |>
-    dplyr::pull(Code)
-
-  c(set1, set2, set3)
-}
diff --git a/R/utils.R b/R/utils.R
index dc87eaf..d9a78e7 100644
--- a/R/utils.R
+++ b/R/utils.R
@@ -135,3 +135,30 @@ list_ill_defined_icd11 <- function() {
   c(set1, set2, set3)
 }
 
+
+#'
+#' Create vector of ill-defined ICD 11 codes
+#'
+#' Based on https://icdcdn.who.int/icd11referenceguide/en/html/index.html#list-of-illdefined-conditions
+#'
+
+list_ill_defined_icd11 <- function() {
+  ## Create vector of ill-defined heart failure BD10-BD1Z ----
+  set1 <- codigo::icd11_linearization_mms |>
+    dplyr::filter(
+      .data$ChapterNo == 11 & stringr::str_detect(.data$Code, pattern = "BD")
+    ) |>
+    dplyr::slice(1:11) |>
+    dplyr::pull(.data$Code)
+
+  ## Create vector of ill-defined others ----
+  set2 <- c("BA2Z", "BE2Y", "BE2Z", "CB41.0", "CB41.2", "KB2D", "KB2E")
+
+  ## Get codes for Chapter 21 except 	MA15, MG43, MG44.1, MH11, MH15 ----
+  set3 <- codigo::icd11_linearization_mms |>
+    dplyr::filter(.data$ChapterNo == 21) |>
+    dplyr::filter(!.data$Code %in% c("MA15", "MG43", "MG44.1", "MH11", "MH15")) |>
+    dplyr::pull(.data$Code)
+
+  c(set1, set2, set3)
+}
diff --git a/man/list_ill_defined_icd11.Rd b/man/list_ill_defined_icd11.Rd
index 510ed63..761de0c 100644
--- a/man/list_ill_defined_icd11.Rd
+++ b/man/list_ill_defined_icd11.Rd
@@ -1,8 +1,8 @@
 % Generated by roxygen2: do not edit by hand
-% Please edit documentation in R/create_ill_defined_icd11.R, R/utils.R
+% Please edit documentation in R/utils.R
 \name{list_ill_defined_icd11}
 \alias{list_ill_defined_icd11}
-\title{Create vector of ill-defined ICD 11 codes}
+\title{List ill-defined ICD 11 codes}
 \usage{
 list_ill_defined_icd11()