Документ взят из кэша поисковой машины. Адрес
оригинального документа
: http://xmm.vilspa.esa.es/sas/8.0.0/doc/ssclib/node139.html
Дата изменения: Wed Jul 2 03:52:42 2008 Дата индексирования: Fri Sep 5 19:38:15 2008 Кодировка: Поисковые слова: р п р п р п |
Module name: parse_list_mod
Author: Dean Hinshaw (NASA/GFSC, dah@milkyway.gsfc.nasa.gov)
This subroutine parses a string containing a delimited list into an array of strings, one element for each member of the list. The calling sequence is:
SUBROUTINE parse_list(in_str, out_array, in_delim) CHARACTER(LEN=*), DIMENSION(:), POINTER :: out_array CHARACTER(LEN=*), :: in_str CHARACTER(LEN=1), OPTIONAL, INTENT(IN) :: in_delim
where in_str is the string to be parsed, out_array is returned array of strings, and in_delim is the delimeter seperating the list items. in_delim is an optional parameter, and if not given defaults to a space. Note that in any case list items may not contain spaces. The user also must take care that the pointer passed as out_array has sufficient length to hold the parsed strings.
Additional, if in_str begins with an ``@'', then the string is taken as a filename the list items, one item for each line of the file.