/* * math1_xfclib.fp * * $Id: math1_xfclib.fp,v 1.1 2000/11/19 16:00:17 keiko Exp $ */ /***************************************************** * math1/xfclib/jfromc.f ****************************************************/ /* * INTEGER FUNCTION JFROMC(CX) * CHARACTER CX*(*) */ /* INTEGER FUNCTION JFROMC( CHARACTER*(*) CX ) */ /***************************************************** * math1/xfclib/ifromc.f ****************************************************/ /* NB: (IFROMC) CX size unknown. */ /* * INTEGER FUNCTION IFROMC(CX) * CHARACTER CX*(*) */ INTEGER FUNCTION IFROMC( CHARACTER*(*) CX ) /***************************************************** * math1/xfclib/lfromc.f ****************************************************/ /* NB: (LFROMC) CX size unknown. */ /* * LOGICAL FUNCTION LFROMC(CX) * CHARACTER CX*(*) */ LOGICAL FUNCTION LFROMC( CHARACTER*(*) CX ) /***************************************************** * math1/xfclib/ffromc.f ****************************************************/ /* * REAL FUNCTION FFROMC(CX) * CHARACTER CX*(*) */ /* REAL FUNCTION FFROMC( CHARACTER*(*) CX ) */ /***************************************************** * math1/xfclib/rfromc.f ****************************************************/ /* NB: (RFROMC) CX size unknown. */ /* * REAL FUNCTION RFROMC(CX) * CHARACTER CX*(*) */ REAL FUNCTION RFROMC( CHARACTER*(*) CX )