Télécharger tassins1.dgibi
Retour à la liste
* fichier : tassins1.dgibi
DISCR=QUAF;
nb=100;
nb=20;
p1= 0. 0. ;
p2= 1. 0. ;
p1p2= p1 d nb p2;
mt=p1p2 trans nb (0. 1.);
$mt=model Mmt 'NAVIER_STOKES' DISCR ;
nas= valeur assis;
mess ' nombre d assistants possible ' nas
; si ( nas > 1) ;
aa = et a;
$am
=assi 'TOUS' model qmt 'NAVIER_STOKES' DISCR
;finsi;
FIN;