From aa77d733b0cb100b63a824c60548f19526711bbc Mon Sep 17 00:00:00 2001 From: Elizabeth Hunt Date: Mon, 27 Nov 2023 10:14:50 -0700 Subject: add leslie matrix dominant eigenvalue unit test --- src/eigen.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/eigen.c') diff --git a/src/eigen.c b/src/eigen.c index 40b41b8..83b1127 100644 --- a/src/eigen.c +++ b/src/eigen.c @@ -12,7 +12,7 @@ Matrix_double *leslie_matrix(Array_double *age_class_surivor_ratio, age_class_offspring->size, 0.0); free_vector(leslie->data[0]); - leslie->data[0] = age_class_offspring; + leslie->data[0] = copy_vector(age_class_offspring); for (size_t i = 0; i < age_class_surivor_ratio->size; i++) leslie->data[i + 1]->data[i] = age_class_surivor_ratio->data[i]; -- cgit v1.2.3-70-g09d2