Документ взят из кэша поисковой машины. Адрес оригинального документа : http://www.atnf.csiro.au/computing/software/gipsy/sub/grqfnt.dc3 Дата изменения: Wed Oct 31 05:16:00 2001 Дата индексирования: Fri Jan 16 01:24:29 2009 Кодировка: Поисковые слова: http astrokuban.info astrokuban

Name: GRQFNT

Purpose: inquire current font

Category: GRAPHICS

File: pgplot.src

Author: T.J. Pearson

Use: see description below.

Description:

SUBROUTINE GRQFNT (IF)

GRPCKG: obtain the font number of the current graphics device.

Argument:

IF (integer, output): receives the current font number (1-3).

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