f.m

来自「this fem program is written in matlab to」· M 代码 · 共 13 行

function value = f ( xy, t )

% the source of heat.

  n = size ( xy, 1 );
  
  
    value = zeros ( n, 1 );

  index = find ( xy(1:n,1) == 0 );

  value(index) = 25.0;