; return the 6-digit date string YYMMDD based on the present working
; directory.
; Assumes the pwd is of the currentt WD is YYYYMMDD

function datestr8_pwd

  pwd = file_basename(pwdf())
  case strlen(pwd) of
     6: return, '20'+pwd
     8: return, pwd
  endcase
  
  
end