diff --git a/c/cobyla_c.f90 b/c/cobyla_c.f90 index 3a3f950b6e..152a761632 100644 --- a/c/cobyla_c.f90 +++ b/c/cobyla_c.f90 @@ -156,7 +156,6 @@ subroutine cobyla_c(m_nlcon, cobjcon_ptr, data_ptr, n, x, f, cstrv, nlconstr, m_ nlconstr = real(nlconstr_loc, kind(nlconstr)) ! Deallocate variables not needed any more. Indeed, automatic allocation will take place at exit. -if (allocated(npt_loc)) deallocate (npt_loc) if (allocated(maxfun_loc)) deallocate (maxfun_loc) if (allocated(rhoend_loc)) deallocate (rhoend_loc) if (allocated(rhobeg_loc)) deallocate (rhobeg_loc)