####################################################################################################################################### # # # V I S U A L I S A T I O N D E L A C O N J E C T U R E D E G O L D B A C H : # # # # # # Author of '$xiirv/.GOLD.A1.2.$U' : # # # # Jean-Francois Colonna (LACTAMME, 20131208182322). # # # ####################################################################################################################################### $Z setParam _____KProcessor 8 $Z # Parametre introduit le 20131210145655 afin de favoriser le parallelisme... # $Z FilSTmpB FNoMbReS_PrEmIeRs $Z $xci/valeurs_Goldbach$X \ $Z premiere=1 derniere=$NoMbReS \ $Z premier_nombre_pair=$_____PremierNombrePair \ $Z editer_nombres_premiers=VRAI \ $Z calculer_decompositions=FAUX \ $Z >> $FNoMbReS_PrEmIeRs $Z setenv KPrOcEsSoR $_____KProcessor $Z setenv PrEmIeR_NPrEmIeR `$CA $FNoMbReS_PrEmIeRs | $HEA -1` $Z setenv DeRnIeR_NPrEmIeR `$CA $FNoMbReS_PrEmIeRs | $TAI -1` $Z setenv PrEmIeR_NPaIr $_____PremierNombrePair $Z FilSTmpE FNoMbReS_PrEmIeRs $Z FilSTmpB FPaRaLlElE $Z FilSTmpB FExEcUtAbLe $Z $Cc -o $FExEcUtAbLe $xiirv/.GOLD.A1.2.$c $Z $FExEcUtAbLe \ $Z >> $FPaRaLlElE $Z FilSTmpE FExEcUtAbLe $Z setenv NoMbReS $NoMbReS $Z ro $FPaRaLlElE $Z $xcg/FindExec.01$Z "$K_VIDE" "$K_VIDE" "$K_VIDE" "$K_VIDE" "$K_VIDE" $FPaRaLlElE | \ $Z $GRE "^[$Alphabet_0_9][$Alphabet_0_9]*#[$Alphabet_0_9][$Alphabet_0_9]*"'$' | \ $Z $SOR -n -u \ $Z >> $FDeCoMpOsItIoNs $Z FilSTmpE FPaRaLlElE