Hamilton-Jacobi 源代码

function [y,n]=jacobi(A,b,x0,eps) if nargin==3 eps=1.0e-6; elseif nargin=eps x0=y; y=B*x0+f; n=n+1; end

// rabin.cpp - written and placed in the public domain by Wei Dai #include "pch.h" #include "rabin.h" #include "nbtheory.h" …

function [y,n]=jacobi(A,b,x0,eps) if nargin==3 eps=1.0e-6; elseif nargin=eps x0=y; y=B*x0+f; n=n+1; end

# include # include # include # include void main() { //program d8r1 //driver for routine jacobi int np,ii,jj,j…

function X=jacobi(A,B,P,delta, max1) % Input - A is an N x N nonsingular matrix % - B is an N x 1 matrix % - P is …

function Jacobi(A,b,n,x0,e,N) k=1 x=zeros(n,1); fprintf('\n**********start**************\n',k); for k=1:N fprintf('%d\t'…

function x=jacobi(A,b,p,delta,max1) %p是初值,delta是误差界,max1是给定的迭代最高次数 N=length(b); for k=1:max1 for j=1:N x(j)=(b(j)-A(j,[1:…

function J=Jacobi(A,b,x0,eps) %该函数文件是通过雅克比迭代格式求解线性方程的近似解 %其中，A为方程组的系数矩阵，b为方程组的右端向量，x0为迭代初始值（向量） if nargin==3 eps=1.0e-6; …

function J=Jacobi(A,b,x0) %该函数文件是通过雅克比迭代格式求解线性方程的近似解 %其中，A为方程组的系数矩阵，b为方程组的右端向量，x0为迭代初始值（向量） if nargin==3 eps=input('please…

# include # include # include # include void main() { //program d8r1 //driver for routine jacobi int np,ii,jj,j…