seinst4 - Einstein function E4(x)

#include <msca.h> 
 
double seinst4 (double x); 
float  seinst4f(float x);

Given a value $x$ this function computes the fourth Einstein function

E (x)= --x---log(1 -e-x) 4 ex-1