function p = real(q)% REAL   Real part of a quaternion.% (Quaternion overloading of standard Matlab function.)%% This function returns the quaternion that is the real% part of q.% Copyright