clc
clear
disp('Ex-4.10');
printf(' Group velocity is found out from Eq. 4.18.\n Since k=2*pi/w ; Vphase= w/k \n w/k = sqrt(g/k) /n w=sqrt(g*k)');
printf('\ndifferetiating on both sides\n');
printf('dw=1/2 * sqrt(g) * k^-1/2 * dk\n dw= 1/2 * sqrt(g/k)\n Hence Vgroup= Vphase/2');