Fortran常用函数.docVIP

1、RANDOM_NUMBER Syntax [sint?ks] n. 语法 CALL RANDOM_NUMBER (harvest) Intrinsic Subroutine（固有子程序）：Returns a pseudorandom number greater than or equal to zero and less than one from the uniform distribution. 返回大于或等于0且小于1，服从均匀分布的随机数 2、RNNOA/ DRNNOA （Single/Double precision） Generate pseudorandom numbers from a standard normal distribution using an acceptance/rejection method. 产生服从标准正态分布的随机数 Usage（用法） CALL RNNOA (NR, R) Arguments（参数） NR — Number of random numbers to generate. (Input) 要产生随机数的个数 R — Vector of length NR containing the random standard normal deviates. (Output) 输出长度为NR，随机正态分布的向量 Comments（注解） The routine RNSET can be used to initialize the seed of the random number generator. The routine RNOPT can be used to select the form of the generator. 程序RNSET可以用来初始化随机数发生器的种子 Example In this example, RNNOA is used to generate five pseudorandom deviates from a standard normal distribution. INTEGER ISEED, NOUT, NR REAL R(5) EXTERNAL RNNOA, RNSET, UMACH C CALL UMACH (2, NOUT) NR = 5 ISEED = 123457 CALL RNSET (ISEED) CALL RNNOA (NR, R) WRITE (NOUT,99999) R 99999 FORMAT ( Standard normal random deviates: , 5F8.4) END Output Standard normal random deviates: 2.0516 1.0833 0.0826 1.2777 -1.2260 3、RESHAPE Intrinsic Function（内部函数）Constructs an array of a specified shape from the elements of another array. 构造规定形式的数组 Syntax（语法） result = RESHAPE (source, shape [ , pad] [ , order] ) source(Input) Any type. Array whose elements will be taken in standard Fortran array order (see Remarks), and then placed into a new array. shape(Input) Integer. One-dimensional array that describes the shape of the output array created from elements of source. 描述输出数组的大小的一维数组，The elements of shape are the sizes of the dimensions of the reshaped array in order. If pad is omitted省略, the total size specified by shape must be less than or equal to source. pad 可选参数(Optional; input) Same type as source. Must