lsqr - solve system of using lsqr method
call lsqr(oper,x, dat, niter, eps,x0,nmem,nfreq,
err,res,nloper,xmov,rmov,nort,mres,mdiag,wght,verb,known,wt)
operator (standard interface)
real(:)
data
number of iterations
real(:)
Initial model
Change behavior after nmem itterations use in conjunction with nfreq and/or wght
Restart step function every nfreq itterations after nmem steps
Non-linear operator to use for forward operator
func(res,m)
Weighting funtion operator
Wheter or not to be verbose
logical(:)
Specify (.true.) model values that are knonw
real(:)
Weighting operator to apply to residuals
Number of steps to keep when doing model model resolution (mdiag,mres)
real(:)
model
real(niter)
Error sum((d-d~)**2)
real(:)
Final residual (size of data)
real(:,niter)
Movie of model values as a function of iter
real(:,niter)
Movie of data residual
Generic LSQR solver.
All operators must follow convetion
integer function (logical adj, logical add, real(:)
model, real(:)
data)
the solver_reg manpage,the solver_prec manpage,the nonlin_solver manpage,the solver manpage
geef90