Figure 1. C/C++ call
to CEESSLOG — Logarithm base e/*Module/File Name: EDCMATH */
/**********************************************************/
/* */
/* This routine demonstrates calling the math service */
/* CEESSLOG in C/370 */
/**********************************************************/
#include <string.h>
#include <stdio.h>
#include <stdlib.h>
#include <leawi.h>
#include <ceeedcct.h>
int main (void) {
float int1, intr;
_FEEDBACK fc;
int1 = 39;
CEESSLOG(&int1,&fc,&intr);
if ( _FBCHECK ( fc , CEE000 ) != 0 )
{
printf("CEESSLOG failed with message number %d\n",
fc.tok_msgno);
exit(2999);
}
printf("Log base e of %f is %f\n",int1,intr);
}