Function D9lgmc

Part of:

package slatec
( d9lgmc < x > )