;+ ; Contains the read_ascii_file function ; ; :Author: ; Baptiste Cecconi ; ; :History: ; 2012/03/02: Created ; ; 2012/03/02: Last Edit ;- ; ;+ ; read_ascii_file is a function that <behavior desc here> ; ; :Returns: ; <return desc here> ; ; :Params: ; file: in, required, type=sometype ; A parameter named file ; nlines: in, required, type=sometype ; A parameter named nlines ;- FUNCTION read_ascii_file,file,nlines openr,lun,file,/get_lun skip_lun,lun,/eof,/lines,transfer_count=nlines str_raw_data = strarr(nlines) point_lun,lun,0 readf,lun,str_raw_data close,lun free_lun,lun return, str_raw_data end