Документ взят из кэша поисковой машины. Адрес оригинального документа : http://www.atnf.csiro.au/computing/software/gipsy/sub/pgqdt.dc2
Дата изменения: Wed Oct 31 05:16:14 2001
Дата индексирования: Fri Jan 16 00:11:04 2009
Кодировка:

Поисковые слова: meteoroid
Name: PGQDT

Purpose: inquire name of nth available device type

Category: GRAPHICS

File: pgplot.src

Author: T.J. Pearson

Use: see description below.

Description:

SUBROUTINE PGQDT(N, TYPE, TLEN, DESCR, DLEN, INTER)
INTEGER N
CHARACTER*(*) TYPE, DESCR
INTEGER TLEN, DLEN, INTER

Return the name of the Nth available device type as a character
string. The number of available types can be determined by calling
PGQNDT. If the value of N supplied is outside the range from 1 to
the number of available types, the routine returns DLEN=TLEN=0.

Arguments:
N (input) : the number of the device type (1..maximum).
TYPE (output) : receives the character device-type code of the
Nth device type. The argument supplied should be
large enough for at least 8 characters. The first
character in the string is a '/' character.
TLEN (output) : receives the number of characters in TYPE,
excluding trailing blanks.
DESCR (output) : receives a description of the device type. The
argument supplied should be large enough for at
least 64 characters.
DLEN (output) : receives the number of characters in DESCR,
excluding trailing blanks.
INTER (output) : receives 1 if the device type is an interactive
one, 0 otherwise.

Updates: Oct 16, 1998: JPT automatically extracted from source.