Andrew10
Advanced Member | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Example. Consider the code segment:
integer :: stat, leng
character(len=100) :: val
call get_command_argument (1, val, leng, stat)
print *, "argument 1:", trim (val)
print *, "length:", leng
print *, "status", stat
Executing this code segment (called sample) with the command:
sample xx.f90 < yy
might print the following output:
argument 1:xx.f90
length: 6
status: 0
|
Всего записей: 780 | Зарегистр. 26-02-2005 | Отправлено: 13:57 10-06-2010 | Исправлено: Andrew10, 14:02 10-06-2010 |
|
