#######################################################################################################################################
# #
# D E F O R M A T I O N D ' U N E S E R I E D ' I M A G E S : #
# #
# #
# Author of '$xiirc/.JULJ.X5.1.$U' : #
# #
# Jean-Francois Colonna (LACTAMME, 20141227120414). #
# #
#######################################################################################################################################
$Z SETParam _____Mdecimales 6
$Z SETParam _____Mxx +1.0
$Z SETParam _____Mxy +1.6
$Z SETParam _____Mxz -3.2
$Z SETParam _____Myx +1.6
$Z SETParam _____Myy +1.0
$Z SETParam _____Myz +1.6
$Z SETParam _____Mzx -3.2
$Z SETParam _____Mzy +1.6
$Z SETParam _____Mzz +1.0
$Z FilSTmpB FDeFoRmI
$c #include <stdio.h>
$c
$c #define N0 cPremiere
$c #define N cDerniere
$c
$c int main()
$c {
$c int n;
$c
$c for (n=N0 ; n<=N ; n++)
$c {
$c printf("echo %cset execXYZ_Para=FAUX ;
$c execXYZ $xci/normalise.01$X
$c A=$_____imagesS%%s.%04d
$c R=$_____imagesS%%s.%04d
$c $formatI ;
$c $xci/acces$X
$c A=$_____ImageT1.%04d
$c convertir=VRAI
$c $formatI |
$c $xci/deformi.01$X
$c DX=$_____imagesS$COORD_X.%04d
$c DY=$_____imagesS$COORD_Y.%04d
$c DZ=$_____imagesS$COORD_Z.%04d
$c appliquer_une_matrice_de_transformation=VRAI
$c tridimensionnelle=VRAI
$c mxx=%.*f mxy=%.*f mxz=%.*f
$c myx=%.*f myy=%.*f myz=%.*f
$c mzx=%.*f mzy=%.*f mzz=%.*f
$c bilineaire=VRAI
$c $formatI |
$c $xci/acces$X
$c standard=FAUX brutal=VRAI
$c $formatI |
$c $xci/seuil$X
$c R=$_____ImageT2.%04d
$c $formatI%c
$c >> $FDeFoRmI\n"
$c ,'\''
$c ,n
$c ,n
$c ,n
$c ,n
$c ,n
$c ,n
$c ,_____Mdecimales,(double)_____Mxx
$c ,_____Mdecimales,(double)_____Mxy
$c ,_____Mdecimales,(double)_____Mxz
$c ,_____Mdecimales,(double)_____Myx
$c ,_____Mdecimales,(double)_____Myy
$c ,_____Mdecimales,(double)_____Myz
$c ,_____Mdecimales,(double)_____Mzx
$c ,_____Mdecimales,(double)_____Mzy
$c ,_____Mdecimales,(double)_____Mzz
$c ,n
$c ,'\''
$c );
$c /* Le 20171022110155, je rappelle que la deformation de l'album '$_____ImageT1' est faite */
$c /* grace aux albums {$_____imagesS$COORD_X,$_____imagesS$COORD_Y,$_____imagesS$COORD_Z} */
$c /* qui sont, par exemple, des interpolations entre les pseudo-projections de deux surfaces */
$c /* ('v $xiirs/.PROJ.B1.1.$U .xci.interpole.01.X' par exemple). */
$c }
$c }
$Z execPar_V $FDeFoRmI
$Z FilSTmpE FDeFoRmI