function [dLam]=dLmake(du,dw,Lb)
% function [dLam]=dLmake(du,dw,Lb)
%
% はり両端の変位増分と長さを与えて座標変換増分を計算する
% 
% Copyright (C) 2007 清水 信行, 曽我部 潔, 藤川 猛 All Rights Reserved.

% =================================================================================
% プログラムの使用条件
% 1. 本プログラムおよびデータを商用で，頒布してはならない．
% 2. 本プログラムおよびデータを著作者の許可なく営利目的で利用してはならない．
% 3. 本プログラムおよびデータの改変は，営利目的でない限り自由である．
% 4. 本プログラムおよびデータを使用することにより生じた損害などについては，著者，
%    プロクラム著作者，(社)日本機械学会，および(株)コロナ社は一切の責任を負わない．
% 5. 本プログラムの著作権は，本書編著者ならびにプログラム著作者に帰す．
% =================================================================================

   ddu=du/Lb;ddw=dw/Lb;
   co=1-ddu*ddu/2; si=ddu*(1-ddw);
   dLam=[co -si 0;si co 0;0 0 1];
