📄 grid7.m
字号:
function [A,xy] = grid7(k)% GRID7 : Generate 7-point finite difference mesh.%% [A,xy] = GRID7(k) returns a k^2-by-k^2 symmetric positive definite % matrix A with the structure of the k-by-k 7-point grid,% and an array xy of coordinates for the grid points.%% John Gilbert, Xerox PARC, 1992.% Copyright (c) 1990-1996 by Xerox Corporation. All rights reserved.% HELP COPYRIGHT for complete copyright and licensing notice.a = blockdiags ([-1 6 -1], -1:1, k, k);b = blockdiags ([-1 -1], [0 1], k, k);A = blockdiags ([b a b'], -1:1, k, k);xy = zeros(k^2,2);x = ones(k,1) * (1:k);y = x';xy(:,1) = x(:);xy(:,2) = y(:);
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -