Salome HOME
Homard executable
[modules/homard.git] / src / tool / Includes_Generaux / mslve9.h
1       if ( taopti(10).gt.0 ) then
2 c
3         if ( taopti(31).eq.-1 .and. taopti(32).ne.0 ) then
4           write(ulsort,texte(langue,53))
5           nbrepb = nbrepb + 1
6         endif
7 c
8         if ( taopti(31).ne.0 .and. taopti(32).eq.-1 ) then
9           write(ulsort,texte(langue,54))
10           nbrepb = nbrepb + 1
11         endif
12 c
13       endif