OPTI 'REST' '../1_PARAMETERS/PARAMS.sauv';
REST;

TAB1 = VIBR PROCHE (PROG 1.) ( ENTI (PROG 10) ) RIG1 MAS1;

LIST TAB1;

OPTI 'SAUV' 'RESULTS.sauv';
SAUV;

FIN;