#######################################################################################################################################
# #
# C A L C U L D ' U N E N S E M B L E D E J U L I A D A N S L E S O C T O N I O N S : #
# #
# #
# Author of '$xiirc/.JULK.B3.1.$U' : #
# #
# Jean-Francois Colonna (LACTAMME, 20190129120550). #
# #
#######################################################################################################################################
$Z SETParam _____DoublerSections 0
$Z # Parametre introduit le 20210427131035... #
$Z SETParam _____Iterations 32
$Z SETParam _____Rdecimales 16
$Z SETParam _____R -0.5815147625160462
$Z SETParam _____Idecimales 16
$Z SETParam _____I +0.6358885017421603
$Z SETParam _____Jdecimales 16
$Z SETParam _____OJ -0.7398
$Z SETParam _____EJ +0.7398
$Z SETParam _____Kdecimales 16
$Z SETParam _____K 0.0
$Z SETParam _____SSdecimales 16
$Z SETParam _____SS 0.0
$Z SETParam _____TTdecimales 16
$Z SETParam _____TT 0.0
$Z SETParam _____UUdecimales 16
$Z SETParam _____UU 0.0
$Z # ATTENTION : evidemment, on ne peut pas utiliser '_____U' car c'est en effet la variable #
$Z # qui represente '$u', d'ou l'utilisation de '_____UU'... #
$Z # #
$Z # Le 20190129161244, par "symetrie", cela a ete fait aussi pour '$_____S', '$_____T' #
$Z # et '$_____V'... #
$Z SETParam _____VVdecimales 16
$Z SETParam _____VV 0.0
$Z SETParam _____Exposant 2
$Z SETParam _____XYdecimales 6
$Z SETParam _____xbg -1.0
$Z SETParam _____ybg -1.0
$Z SETParam _____xhd +1.0
$Z SETParam _____yhd +1.0
$Z SETParam _____JRdecimales 16
$Z SETParam _____JRotationX `GetParam $xrc/julia.41$X ROTATION_OX`
$Z SETParam _____JRotationY `GetParam $xrc/julia.41$X ROTATION_OY`
$Z SETParam _____JRotationZ `GetParam $xrc/julia.41$X ROTATION_OZ`
$Z setenvParam _____JuliaPara "$K_VIDE"
$Z @ Nimages = $cDerniere - $cPremiere
$Z @ Nimages = $Nimages + 1
$Z FilSTmpB FFrAcTaL
$c #include <stdio.h>
$c
$c #define N0 cPremiere
$c #define N (cPremiere+((cDerniere-cPremiere+1)/(_____DoublerSections+1))-1)
$c
$c #define OJ _____OJ
$c #define EJ _____EJ
$c
$c int main()
$c {
$c int n;
$c
$c for (n=N0 ; n<=N ; n++)
$c {
$c double J=((EJ*(n-N0))+(OJ*(N-n)))/(N-N0);
$c
$c printf("echo %c$xrc/julia.81$X
$c images=1
$c iterations=%d
$c r=%+.*f
$c i=%+.*f
$c COMPOSANTE_J=%+.*f
$c K=%+.*f
$c S=%+.*f
$c T=%+.*f
$c U=%+.*f
$c V=%+.*f
$c exposant=%d
$c fenetres_depart_arrivee_identiques=VRAI
$c xbg=%+.*f ybg=%+.*f xhd=%+.*f yhd=%+.*f
$c arithmetique_folklorique_C=VRAI
$c visualiser_appartenance=VRAI
$c ROTATION_OX=%+.*f
$c ROTATION_OY=%+.*f
$c ROTATION_OZ=%+.*f
$c $_____JuliaPara
$c chiffres=0
$c R=$_____ImageT1.%04d
$c $formatI%c
$c >> $FFrAcTaL\n"
$c ,'\''
$c ,_____Iterations
$c ,_____Rdecimales,(double)_____R
$c ,_____Idecimales,(double)_____I
$c ,_____Jdecimales,(double)J
$c ,_____Kdecimales,(double)_____K
$c ,_____SSdecimales,(double)_____SS
$c ,_____TTdecimales,(double)_____TT
$c ,_____UUdecimales,(double)_____UU
$c ,_____VVdecimales,(double)_____VV
$c ,_____Exposant
$c ,_____XYdecimales,(double)_____xbg
$c ,_____XYdecimales,(double)_____ybg
$c ,_____XYdecimales,(double)_____xhd
$c ,_____XYdecimales,(double)_____yhd
$c ,_____JRdecimales,(double)_____JRotationX
$c ,_____JRdecimales,(double)_____JRotationY
$c ,_____JRdecimales,(double)_____JRotationZ
$c ,n
$c ,'\''
$c );
$c }
$c }
$Z execPar_V $FFrAcTaL
$Z FilSTmpE FFrAcTaL
$Z _____include(_____xiirc/.MANF.DC.5._____U)