Desktop.zip

  • xrbxrb
    了解作者
  • matlab
    开发工具
  • 2.6MB
    文件大小
  • zip
    文件格式
  • 0
    收藏次数
  • 1 积分
    下载积分
  • 1
    下载次数
  • 2021-04-15 15:30
    上传日期
金属3D打印自由能计算,金属3D打印计算机模拟,matlab编程
Desktop.zip
  • free_energ_sint_v1.m
    757B
  • geek.exe
    6MB
内容介绍
function [dfdcon,dfdeta] =free_energ_sint_v1(i,j,con,eta,etas,npart,iflag) format long; A=16.0; B= 1.0; dfdcon =0.0; dfdeta =0.0; if(iflag == 1) %-- %-- 浓度场自由能迭代: %-- sum2 = 0.0; sum3 = 0.0; for ipart = 1:npart sum2 = sum2 + etas(i,j,ipart).^2; sum3 = sum3 + etas(i,j,ipart).^3; end dfdcon = B*(2.0*con(i,j) + 4.0*sum3 - 6.0*sum2) - 2.0*A*con(i,j)^2 .* ... (1.0-con(i,j)) + 2.0*A*con(i,j)*(1.0-con(i,j))^2; end %if if(iflag == 2) %-- %-- 相场自由能迭代: %-- sum2 =0.0; for ipart = 1: npart sum2 = sum2 + etas(i,j,ipart)^2; end dfdeta = B*(-12.0*eta(i,j)^2 .* (2.0-con(i,j)) +12.0 *eta(i,j)* (1.0-con(i,j)) + ... 12.0*eta(i,j)*sum2); end %if end %endfunction
评论
    相关推荐