{TEMP DECK RMDFT}

TYPE
rmt$file_type = integer;
