Документ взят из кэша поисковой машины. Адрес оригинального документа : http://www.atnf.csiro.au/computing/software/gipsy/sub/presetl.dc2 Дата изменения: Thu Jan 23 17:11:52 1992 Дата индексирования: Fri Jan 16 18:18:56 2009 Кодировка:

Subroutine: PRESETL

Purpose: Presets a logical array to a constant value.

Category: ARRAY

File: preset.c

Author: K.G. Begeman

Use: CALL PRESETL( SOURCE, Input LOGICAL
DESTIN, Output LOGICAL ARRAY
NITEMS ) Input INTEGER

SOURCE Value with which to fill DESTIN.
DESTIN Array which receives SOURCE.
NITEMS Number of items to fill in DESTIN.

Updates: Jul 29, 1989: KGB, Document created.