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.
15 lines
529 B
15 lines
529 B
3 years ago
|
%--------------------------
|
||
|
|
% @Author: Jingqiao Hu
|
||
|
|
% @Date: 2021-10-26 14:56:26
|
||
|
|
% @LastEditTime: 2021-10-26 16:09:49
|
||
|
|
%--------------------------
|
||
|
|
function H = Heaviside_simply(phi, radius)
|
||
|
|
num_all=[1:length(phi(:))]';
|
||
|
|
num1=find(phi>radius);
|
||
|
|
H(num1)=1;
|
||
|
|
num2=find(phi<-radius);
|
||
|
|
H(num2)=0;
|
||
|
|
num3=setdiff(num_all,[num1;num2]);
|
||
|
|
H(num3) = (radius - phi(num3)).^2 / 4 .* (2*radius + phi(num3)) / radius^3;
|
||
|
|
% H(num3)=3*(1-alpha)/4*(phi(num3)/epsilon-phi(num3).^3/(3*(epsilon)^3))+ (1+alpha)/2;
|
||
|
|
end
|