You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
16 lines
585 B
16 lines
585 B
2 years ago
|
resolution=10;nGrid=2;
|
||
|
|
h=1.0/(resolution*nGrid);
|
||
|
|
X = h/2:h:1-h/2;
|
||
|
|
[x,y,z]=meshgrid(X);
|
||
|
|
|
||
|
|
k=1e2;
|
||
|
|
a=1.0;b=1.0;c = 0.0;
|
||
|
|
tmp = (c + cos(2*pi.*x) + a.*cos(2*pi.*y) + b.*cos(2*pi.*z));
|
||
|
|
tmp2 = exp(k.*tmp);
|
||
|
|
dHda = -(k.*tmp2.*cos(2*pi.*y))./(tmp2+ 1).^2;
|
||
|
|
dHdb = -(k.*tmp2.*cos(2*pi.*z))./(tmp2+ 1).^2;
|
||
|
|
dHdc = -(k.*tmp2)./(tmp2+ 1).^2;
|
||
|
|
|
||
|
|
disp( ' | dHda | dHdb | dHdc |')
|
||
|
|
disp(['max |',num2str(max(dHda,[],'all')),'|',num2str(max(dHdb,[],'all')),'|',num2str(max(dHdc,[],'all')),])
|
||
|
|
disp(['min |',num2str(min(dHda,[],'all')),'|',num2str(min(dHdb,[],'all')),'|',num2str(min(dHdc,[],'all')),])
|