fixup I_A

Author: alyst

src/imply/RAM/generic.jl

@@ -224,8 +224,8 @@ function objective!(imply::RAM, parameters, model, has_meanstructure::Val{T}) wh
         parameters,
     )
 
-    @. I_A = -A
-    @view(I_A[diagind(I_A)]) .+= 1
+    @. imply.I_A = -A
+    @view(imply.I_A[diagind(imply.I_A)]) .+= 1
 
     copyto!(imply.F⨉I_A⁻¹, imply.F)
     rdiv!(imply.F⨉I_A⁻¹, factorize(imply.I_A))
@@ -253,8 +253,8 @@ function gradient!(
         parameters,
     )
 
-    @. I_A = -A
-    @view(I_A[diagind(I_A)]) .+= 1
+    @. imply.I_A = -A
+    @view(imply.I_A[diagind(imply.I_A)]) .+= 1
 
     imply.I_A⁻¹ = LinearAlgebra.inv!(factorize(imply.I_A))
     mul!(imply.F⨉I_A⁻¹, imply.F, imply.I_A⁻¹)