####################################################################################################################################### # # # C O N S T R U C T I O N D ' U N A R B R E B I N A I R E : # # # # # # Author of '$xiird/.ACIS.61.2.$U' : # # # # Jean-Francois Colonna (LACTAMME, 20160307112233). # # # ####################################################################################################################################### $Z SETParam PremiereM 0 $Z SETParam DerniereM 127 $Z setParam _____MinX 0.1 $Z # Parametre introduit le 20160422180942... # $Z setParam _____MaxX 0.9 $Z # Parametre introduit le 20160422180942... # $Z setParam _____MinY 0.1 $Z # Parametre introduit le 20160422180942... # $Z setParam _____MaxY 0.9 $Z # Parametre introduit le 20160422180942... # $Z setParam _____DemiPaveX 48 $Z # Parametre introduit le 20160422180942... # $Z setParam _____DemiPaveY 48 $Z # Parametre introduit le 20160422180942... # $Z setParam _____DemiPaveZ 48 $Z # Parametre introduit le 20160422180942... # $Z SET cPremiere=$PremiereM $Z SET cDerniere=$DerniereM $Z SET Zmin = `calcul $PremiereM - $PremiereM` $Z SET Zmax = `calcul $DerniereM - $PremiereM` $Z set _____ZminZmax="Zmin=$Zmin Zmax=$Zmax" $Z SET ZminM=$Zmin $Z SET ZmaxM=$Zmax $Z set MinMaxZ=`GetParam $xci/valeurs_Arbre.01$X Z1` $Z set _____StoreAlbumPara="$K_VIDE" $Z set _____StoreAlbumPara="$_____StoreAlbumPara"" spherique=VRAI" $Z set _____NormZPara="$K_VIDE" $Z set _____NormZPara="$_____NormZPara"" ignorer_uniformite=FAUX" $Z set _____NormZPara="$_____NormZPara"" valeur_uniforme=$MinMaxZ" $Z setParam _____ImageT1 $xTV/BOITE.2 $Z # Test introduit le 20200420102252 a cause de 'v $xiirv/$Fnota Debut_listG_STRX_R1'... # $m4 _____include(_____xiirv/.CARB.91.2._____U)