diff --git a/cv4/list_ops.c b/cv4/list_ops.c
index 8577ad8..148e985 100644
--- a/cv4/list_ops.c
+++ b/cv4/list_ops.c
@@ -12,14 +12,15 @@ list_t *new_list(size_t length, list_element_t elements[]) {
 
     list->length = length;
     for (size_t i = 0; i < length; i++) {
-        list->elements[i] = elements[i+1];
+        list->elements[i] = elements[i];
     }
 
     return list;
 }
 
 list_t *append_list(list_t *list1, list_t *list2) {
-    list_t *list3 = new_list(list1->length + list2->length, list1->elements);
+    size_t length1 = list1->length + list2->length;
+    list_t *list3 = new_list(length1, list1->elements);
     if (!list3) {
         return NULL;
     }