xstore.f File Reference

Go to the source code of this file.

Functions/Subroutines
subroutine	xstore (COUT, CON, MWORDS)
	SUBPROGRAM: XSTORE STORES A CONSTANT VALUE INTO AN ARRAY PRGMMR: KEYSER ORG: W/NMC22 DATE: 07-02-92. More...

Function/Subroutine Documentation

xstore()

subroutine xstore	(	dimension(*)	COUT,
			CON,
			MWORDS
	)

SUBPROGRAM: XSTORE STORES A CONSTANT VALUE INTO AN ARRAY PRGMMR: KEYSER ORG: W/NMC22 DATE: 07-02-92.

ABSTRACT: STORES AN 8-BYTE (FULLWORD) VALUE THROUGH CONSECUTIVE STORAGE LOCATIONS. (MOVING IS ACCOMPLISHED WITH A DO LOOP.)

PROGRAM HISTORY LOG: 92-07-02 D. A. KEYSER (W/NMC22) 95-10-31 IREDELL REMOVED SAVES AND PRINTS

USAGE: CALL XSTORE(COUT,CON,MWORDS) INPUT ARGUMENT LIST: CON - CONSTANT TO BE STORED INTO "MWORDS" CONSECUTIVE FULLWORDS BEGINNING WITH "COUT" ARRAY MWORDS - NUMBER OF FULLWORDS IN "COUT" ARRAY TO STORE "CON"; MUST BE .GT. ZERO (NOT CHECKED FOR THIS)

OUTPUT ARGUMENT LIST: (INCLUDING WORK ARRAYS) COUT - STARTING ADDRESS FOR ARRAY OF "MWORDS" FULLWORDS SET TO THE CONTENTS OF THE VALUE "CON"

REMARKS: THE VERSION OF THIS SUBROUTINE ON THE HDS COMMON LIBRARY IS NAS-SPECIFIC SUBR. WRITTEN IN ASSEMBLY LANG. TO ALLOW FAST COMPUTATION TIME. SUBR. PLACED IN CRAY W3LIB TO ALLOW CODES TO COMPILE ON BOTH THE HDS AND CRAY MACHINES. SUBPROGRAM CAN BE CALLED FROM A MULTIPROCESSING ENVIRONMENT.

ATTRIBUTES: LANGUAGE: CRAY CFT77 FORTRAN MACHINE: CRAY Y-MP8/864

Definition at line 35 of file xstore.f.