熱伝導率テンソルを求める 関数は以下のようになる。
/* 熱伝導率テンソル：等方性材料、３次元ボリューム */
void WH_Thermal3D__Volume__whT_lambda
(double lambda,
double OUT__whT_lambda[3][3])
/*
入力引数:
lambda はスカラーで、熱伝導率
出力引数:
OUT__whT_lambda はテンソルで、熱伝導率テンソル
*/
{
WH_Tensor3D__s_mul_whT_OUT_whT
(lambda, WH_Tensor3D__whT_I,
OUT__whT_lambda);
}