LIB "tst.lib"; tst_init();
LIB "dmodapp.lib";
def A = appelF4();
setring A;
IAppel4;
tst_status(1);$