Remove unused code
diff --git a/include/program.h b/include/program.h
index 40bc097..4c5bf4f 100644
--- a/include/program.h
+++ b/include/program.h
@@ -97,8 +97,6 @@
 // ** Exclude start. **
 BcStatus bc_program_init(BcProgram *p);
 void bc_program_limits(BcProgram *p);
-BcStatus bc_program_var_add(BcProgram *p, char *name, size_t *idx);
-BcStatus bc_program_array_add(BcProgram *p, char *name, size_t *idx);
 BcStatus bc_program_print(BcProgram *p);
 void bc_program_free(BcProgram *program);
 // ** Exclude end. **
diff --git a/src/bc/program.c b/src/bc/program.c
index 3cfcfbc..d22302f 100644
--- a/src/bc/program.c
+++ b/src/bc/program.c
@@ -1619,52 +1619,6 @@
   return status;
 }
 
-BcStatus bc_program_var_add(BcProgram *p, char *name, size_t *idx) {
-
-  BcStatus status;
-  BcEntry entry;
-  BcNum v;
-
-  if (!p || !name || !idx) return BC_STATUS_INVALID_ARG;
-
-  entry.name = name;
-  entry.idx = p->vars.len;
-
-  status = bc_veco_insert(&p->var_map, &entry, idx);
-
-  if (status) return status == BC_STATUS_VEC_ITEM_EXISTS ?
-                               BC_STATUS_SUCCESS : status;
-
-  status = bc_num_init(&v, BC_NUM_DEF_SIZE);
-
-  if (status) return status;
-
-  return bc_vec_push(&p->vars, &v);
-}
-
-BcStatus bc_program_array_add(BcProgram *p, char *name, size_t *idx) {
-
-  BcStatus status;
-  BcEntry entry;
-  BcVec a;
-
-  if (!p || !name || !idx) return BC_STATUS_INVALID_ARG;
-
-  entry.name = name;
-  entry.idx = p->arrays.len;
-
-  status = bc_veco_insert(&p->array_map, &entry, idx);
-
-  if (status) return status == BC_STATUS_VEC_ITEM_EXISTS ?
-                               BC_STATUS_SUCCESS : status;
-
-  status = bc_vec_init(&a, sizeof(BcNum), bc_num_free);
-
-  if (status) return status;
-
-  return bc_vec_push(&p->arrays, &a);
-}
-
 BcStatus bc_program_exec(BcProgram *p) {
 
   BcStatus status;