function [CLaM,CldF,ClaM,CLdF]=CLdF2(CLa_w,CldCldth,Cldth,Kprime,Cla_w,M,adCLadCl,Kb)


CLaM=CLa_w;								%fig 3.3
CldF=CldCldth*Cldth*Kprime;		%eqn 10.3
ClaM=Cla_w/sqrt(1-M^2)				%eqn 10.2
CLdF= CldF*CLaM/ClaM*adCLadCl*Kb;	%eqn 10.1


return