/*************************************************************************** module classe equaZ.h - description ***************************************************************************/ forward (YREAL nu, YREAL zed) { YS1 = zed * exp(-nu*YTemps); } //=========================================================================== backward (YREAL nu, YREAL zed) { YJ1I1 = -YTemps*(zed * exp(-nu*YTemps)); } //************************** FIN DU MODULE equaZ ********************************