mrctj.for

来自「特殊函数的fortran代码」· FOR 代码 · 共 8 行

        PROGRAM MRCTJ
C
C       =======================================================
C       Purpose: This program computes the Riccati-Bessel 
C                functions of the first kind, and their
C                derivatives using subroutine RCTJ
C       Input:   x --- Argument of Riccati-Bessel function
C                n --- Order of jn(x)  ( 0