実装

線膨張係数テンソルを求める 関数は以下のようになる。

/* 線膨張係数テンソル：等方性材料、２次元平面応力 */
void WH_ThermalStrain2D__PlaneStress__whT_alpha
(double alpha,
 double OUT__whT_alpha[2][2])
/*
  入力引数:
    alpha はスカラーで、線膨張係数
  出力引数:
    OUT__whT_alpha はテンソルで、線膨張係数テンソル
*/
{
  WH_Tensor2D__s_mul_whT_OUT_whT
    (alpha, WH_Tensor2D__whT_I,
     OUT__whT_alpha);
}