name = 'airtmp_zht_000010_000000_3a0091x0091_2002082800_00010000_fcstfld'
cut = findstr(name,'_')
varname = name(1:cut(1)-1)
cut = cut(end+[-2:0]);
hour = name(cut(2)+1:cut(3)-1);
date = name(cut(1)+1:cut(2)-1);
gregdate = [str2num(date(1:4)) str2num(date(5:6)) str2num(date(7:8)) ...
      str2num(hour(3:4)) 0 0];
