function ppsurf(a)[ecode,estr,w,h] = ppclient('ppsize',a);if ecode ~= 0 error(estr);end; if h > 1024  h = 1024; %max heightend;if w >1024  w = 1024;end;theta = 0;phi = 0;zoom = 0;[ecode,estr,data] = ppclient('ppsurf',a,w,h,theta,phi,zoom);if ecode ~= 0  error(estr);end;D(:,:,1) = reshape(data(1:3:w*h*3), w, h);D(:,:,2) = reshape(data(2:3:w*h*3), w, h);D(:,:,3) = reshape(data(3:3:w*h*3), w, h);image(D);return;