function [yyyy,mm,dd]=GM_f_read_ID_date(yyyymmdd);

 % Read date components from yyyymmdd.
 % E.g.:
 % yyyymmdd=20060627,
 % then [yyyy,mm,dd]=GM_read_ID_date(yyyymmdd)
 % returns:
 % yyyy=2006; mm=6; dd=27
 
dd=yyyymmdd-floor(yyyymmdd/1e+2)*1e+2;
mm=floor(yyyymmdd/1e+2)-floor(yyyymmdd/1e+4)*1e+2;
yyyy=floor(yyyymmdd/1e+4);
