PROCEDURE: dat_file,dat [,filename] PURPOSE: saves and restores 3d data files. if filename is not a string then a filename is generated automatically. INPUT: dat: a 3d background data structure. filename: optional filename. KEYWORDS: One must be set! SAVE: set to save files. RESTORE:set to restore files. DIR: (string) Directory to use. Default is current directory