From 7dfcc480ba1e19bd3232349fc733caef94034292 Mon Sep 17 00:00:00 2001 From: stainer_t Date: Mon, 8 Sep 2025 13:48:49 +0200 Subject: Initial commit from Polytechnique Montreal --- Dragon/data/proc_CNG/CHB_NXT.c2m | 532 +++++++++++++++++++++++++++++++++++ Dragon/data/proc_CNG/LCNG_U2_nDf.c2m | 271 ++++++++++++++++++ 2 files changed, 803 insertions(+) create mode 100644 Dragon/data/proc_CNG/CHB_NXT.c2m create mode 100644 Dragon/data/proc_CNG/LCNG_U2_nDf.c2m (limited to 'Dragon/data/proc_CNG') diff --git a/Dragon/data/proc_CNG/CHB_NXT.c2m b/Dragon/data/proc_CNG/CHB_NXT.c2m new file mode 100644 index 0000000..9174dcd --- /dev/null +++ b/Dragon/data/proc_CNG/CHB_NXT.c2m @@ -0,0 +1,532 @@ +*---------- +* Definition des parametres de la procedure +* +PARAMETER + GEOMF GEOMS + :: + EDIT 1 + ::: LINKED_LIST GEOMF GEOMS ; + ; +* +* Lire pas de reseau +* +STRING + state + ; +INTEGER + splitc splitm + ; +INTEGER + CF11 CF12 CF13 CF14 + CF21i CF22i CF23i CF24i + CF31i CF32i CF33i CF34i + CF41i CF42i CF43i CF44i + CF21e CF22e CF23e CF24e + CF31e CF32e CF33e CF34e + CF41e CF42e CF43e CF44e + VF11 VF12 VF13 VF14 + VF21i VF22i VF23i VF24i + VF31i VF32i VF33i VF34i + VF41i VF42i VF43i VF44i + VF21e VF22e VF23e VF24e + VF31e VF32e VF33e VF34e + VF41e VF42e VF43e VF44e + COOL PT HEG CT + MOD SH VOID + ; +:: + >>state<< + >>splitc<< >>splitm<< + >>CF11<< >>CF12<< >>CF13<< >>CF14<< + + >>CF21i<< >>CF22i<< >>CF23i<< >>CF24i<< + >>CF31i<< >>CF32i<< >>CF33i<< >>CF34i<< + >>CF41i<< >>CF42i<< >>CF43i<< >>CF44i<< + + >>CF21e<< >>CF22e<< >>CF23e<< >>CF24e<< + >>CF31e<< >>CF32e<< >>CF33e<< >>CF34e<< + >>CF41e<< >>CF42e<< >>CF43e<< >>CF44e<< + + >>VF11<< >>VF12<< >>VF13<< >>VF14<< + + >>VF21i<< >>VF22i<< >>VF23i<< >>VF24i<< + >>VF31i<< >>VF32i<< >>VF33i<< >>VF34i<< + >>VF41i<< >>VF42i<< >>VF43i<< >>VF44i<< + + >>VF21e<< >>VF22e<< >>VF23e<< >>VF24e<< + >>VF31e<< >>VF32e<< >>VF33e<< >>VF34e<< + >>VF41e<< >>VF42e<< >>VF43e<< >>VF44e<< + + >>COOL<< >>PT<< >>HEG<< >>CT<< + >>MOD<< >>SH<< >>VOID<< + ; +* +* Structures de donnees locales et +* modules et parametres +* +MODULE + GEO: + ; +INTEGER splitc1 splitc2 ; +INTEGER cool1 cool2 ; +IF state "Cooled" = THEN + EVALUATE splitc1 splitc2 := splitc splitc ; + EVALUATE cool1 cool2 := COOL COOL ; +ELSEIF state "Voided" = THEN + EVALUATE splitc1 splitc2 := 1 1 ; + EVALUATE cool1 cool2 := VOID VOID ; +ELSE + EVALUATE splitc1 splitc2 := 1 splitc ; + EVALUATE cool1 cool2 := VOID COOL ; +ENDIF ; +* +* Rayon Final = PasReseau * sqrt(1/Pi) +* +REAL + PasReseau Rtpi Rtpo Rgapo Rtco := + 22.0 5.16890 5.7689 7.5 7.8 + ; +INTEGER splitfx := 1 ; +* circular discretization of the moderator +REAL Diag := PasReseau 0.5 * Rtco - ; +INTEGER splitm2 := splitm 1 + ; +REAL deltar := Diag splitm2 I_TO_R / ; +REAL temp := splitm I_TO_R deltar * ; +REAL RayonFinal := temp Rtco + ; +* carteisan meshes in the moderator +REAL halfpas := PasReseau 0.5 * ; +REAL modx := halfpas Rtco - ; +REAL deltat := Rtco Rgapo - 0.5 * ; +INTEGER splitmx := modx deltar / R_TO_I ; +REAL deltax := modx splitmx I_TO_R / ; +REAL mesh1 := deltax 0.5 * ; +REAL mesh2 := mesh1 modx + deltax - ; +EVALUATE splitmx := splitmx 1 - ; +REAL mesh3 := modx deltat + ; +REAL mesh4 := PasReseau mesh3 - ; +REAL mesh5 := PasReseau mesh2 - ; +REAL mesh6 := PasReseau mesh1 - ; +REAL + Rci Rgi Rce Rge + sub1 + sub2 + sub3 + subis1 + subis2 + subis3 + subis4 + subis5 + := + 0.627 0.675 0.533 0.575 + 0.70710681186550 + 0.89442719099992 + 0.97467943448090 + 0.63245553203368 + 0.83666002653408 + 0.89442719099992 + 0.94868329805051 + 0.97467943448090 + ; +* pin splitting +REAL hRgi hRge := 0.5 Rgi * 0.5 Rge * ; +REAL + Rci1 Rci2 Rci3 Rce1 Rce2 Rce3 + Rcib1 Rcib2 Rcib3 Rcib4 Rcib5 + ; +EVALUATE + Rci1 Rci2 Rci3 Rce1 Rce2 Rce3 + Rcib1 Rcib2 Rcib3 Rcib4 Rcib5 := + Rci sub1 * + Rci sub2 * + Rci sub3 * + Rce sub1 * + Rce sub2 * + Rce sub3 * + Rci subis1 * + Rci subis2 * + Rci subis3 * + Rci subis4 * + Rci subis5 * + ; +* +* Geometry for self-shielding +* +GEOMS := GEO: :: CAR2D 2 2 + X- TRAN X+ TRAN + Y- TRAN Y+ TRAN + CELL C1 C2 + C2 C1 +* voided cell + ::: C1 := GEO: CARCEL 8 + MESHX 0.0 <> + MESHY 0.0 <> + RADIUS 0.0 0.8670 2.4545 3.7295 <> + <> <> <> <> + MIX <> <> <> <> + <> <> <> <> <> + CLUSTER ROD1 ROD2 ROD3 ROD4 + ::: ROD1 := GEO: TUBE 5 + MIX <> <> <> <> <> + RADIUS 0.00000 <> <> <> + <> <> + NPIN 1 RPIN 0.0000 APIN 0.0000 ; + ::: ROD2 := GEO: TUBE 5 1 2 + MESHY 0.0 <> <> + MESHX 0.0 <> + MIX <> <> <> <> <> + <> <> <> <> <> + RADIUS 0.00000 <> <> <> + <> <> + NPIN 7 RPIN 1.7340 APIN 0.0000 ; + ::: ROD3 := GEO: TUBE 5 1 2 + MESHY 0.0 <> <> + MESHX 0.0 <> + MIX <> <> <> <> <> + <> <> <> <> <> + RADIUS 0.00000 <> <> <> + <> <> + NPIN 14 RPIN 3.0750 APIN 0.224399475 ; + ::: ROD4 := GEO: TUBE 5 1 2 + MESHY 0.0 <> <> + MESHX 0.0 <> + MIX <> <> <> <> <> + <> <> <> <> <> + RADIUS 0.00000 <> <> <> + <> <> + NPIN 21 RPIN 4.3840 APIN 0.0 ; + ; +* cooled cell + ::: C2 := GEO: CARCEL 8 + MESHX 0.0 <> + MESHY 0.0 <> + RADIUS 0.0 0.8670 2.4545 3.7295 <> + <> <> <> <> + MIX <> <> <> <> + <> <> <> <> <> + CLUSTER ROD1 ROD2 ROD3 ROD4 + ::: ROD1 := GEO: TUBE 5 + MIX <> <> <> <> <> + RADIUS 0.00000 <> <> <> + <> <> + NPIN 1 RPIN 0.0000 APIN 0.0000 ; + ::: ROD2 := GEO: TUBE 5 1 2 + MESHY 0.0 <> <> + MESHX 0.0 <> + MIX <> <> <> <> <> + <> <> <> <> <> + RADIUS 0.00000 <> <> <> + <> <> + NPIN 7 RPIN 1.7340 APIN 0.0000 ; + ::: ROD3 := GEO: TUBE 5 1 2 + MESHY 0.0 <> <> + MESHX 0.0 <> + MIX <> <> <> <> <> + <> <> <> <> <> + RADIUS 0.00000 <> <> <> + <> <> + NPIN 14 RPIN 3.0750 APIN 0.224399475 ; + ::: ROD4 := GEO: TUBE 5 1 2 + MESHY 0.0 <> <> + MESHX 0.0 <> + MIX <> <> <> <> <> + <> <> <> <> <> + RADIUS 0.00000 <> <> <> + <> <> + NPIN 21 RPIN 4.3840 APIN 0.0 ; + ; + ; +* +* Geometry for flux calculation +* +GEOMF := GEO: :: CAR2D 2 2 + X- TRAN X+ TRAN + Y- TRAN Y+ TRAN + CELL C1 C2 + C2 C1 +* voided cell + ::: C1 := GEO: CARCEL 8 7 7 + MESHX 0.0 <> <> <> + <> <> <> <> + MESHY 0.0 <> <> <> + <> <> <> <> + SPLITX 1 <> 1 <> 1 <> 1 + SPLITY 1 <> 1 <> 1 <> 1 + RADIUS 0.0 0.8670 2.4545 3.7295 <> + <> <> <> <> + SPLITR 1 <> <> <> + 1 1 1 <> + MIX <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + CLUSTER ROD1 ROD2 ROD3 ROD4 + ::: ROD1 := GEO: TUBE 5 + MIX <> <> <> <> <> + RADIUS 0.00000 <> <> <> + <> <> + NPIN 1 RPIN 0.0000 APIN 0.0000 ; + ::: ROD2 := GEO: TUBE 5 1 2 + MESHY 0.0 <> <> + MESHX 0.0 <> + MIX <> <> <> <> <> + <> <> <> <> <> + RADIUS 0.00000 <> <> <> + <> <> + NPIN 7 RPIN 1.7340 APIN 0.0000 ; + ::: ROD3 := GEO: TUBE 5 1 2 + MESHY 0.0 <> <> + MESHX 0.0 <> + MIX <> <> <> <> <> + <> <> <> <> <> + RADIUS 0.00000 <> <> <> + <> <> + NPIN 14 RPIN 3.0750 APIN 0.224399475 ; + ::: ROD4 := GEO: TUBE 5 1 2 + MESHY 0.0 <> <> + MESHX 0.0 <> + MIX <> <> <> <> <> + <> <> <> <> <> + RADIUS 0.00000 <> <> <> + <> <> + NPIN 21 RPIN 4.3840 APIN 0.0 ; + ; +* cooled cell + ::: C2 := GEO: CARCEL 8 7 7 + MESHX 0.0 <> <> <> + <> <> <> <> + MESHY 0.0 <> <> <> + <> <> <> <> + SPLITX 1 <> 1 <> 1 <> 1 + SPLITY 1 <> 1 <> 1 <> 1 + RADIUS 0.0 0.8670 2.4545 3.7295 <> + <> <> <> <> + SPLITR 1 <> <> <> + 1 1 1 <> + MIX <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + <> <> <> <> + <> <> <> <> <> + CLUSTER ROD1 ROD2 ROD3 ROD4 + ::: ROD1 := GEO: TUBE 5 + MIX <> <> <> <> <> + RADIUS 0.00000 <> <> <> + <> <> + NPIN 1 RPIN 0.0000 APIN 0.0000 ; + ::: ROD2 := GEO: TUBE 5 1 2 + MESHY 0.0 <> <> + MESHX 0.0 <> + MIX <> <> <> <> <> + <> <> <> <> <> + RADIUS 0.00000 <> <> <> + <> <> + NPIN 7 RPIN 1.7340 APIN 0.0000 ; + ::: ROD3 := GEO: TUBE 5 1 2 + MESHY 0.0 <> <> + MESHX 0.0 <> + MIX <> <> <> <> <> + <> <> <> <> <> + RADIUS 0.00000 <> <> <> + <> <> + NPIN 14 RPIN 3.0750 APIN 0.224399475 ; + ::: ROD4 := GEO: TUBE 5 1 2 + MESHY 0.0 <> <> + MESHX 0.0 <> + MIX <> <> <> <> <> + <> <> <> <> <> + RADIUS 0.00000 <> <> <> + <> <> + NPIN 21 RPIN 4.3840 APIN 0.0 ; + ; + ; +* +* terminer execution +* +QUIT "LIST" . diff --git a/Dragon/data/proc_CNG/LCNG_U2_nDf.c2m b/Dragon/data/proc_CNG/LCNG_U2_nDf.c2m new file mode 100644 index 0000000..4ee621a --- /dev/null +++ b/Dragon/data/proc_CNG/LCNG_U2_nDf.c2m @@ -0,0 +1,271 @@ +*---------- +* Definition des parametres de la procedure +* +PARAMETER Biblio :: + EDIT 1 + ::: LINKED_LIST Biblio ; + ; +REAL + TempComb TempCalo + TempPres TempMode TempCala + ; +STRING + LibName + ; +INTEGER + CF11 CF12 CF13 CF14 + CF21i CF22i CF23i CF24i + CF31i CF32i CF33i CF34i + CF41i CF42i CF43i CF44i + CF21e CF22e CF23e CF24e + CF31e CF32e CF33e CF34e + CF41e CF42e CF43e CF44e + VF11 VF12 VF13 VF14 + VF21i VF22i VF23i VF24i + VF31i VF32i VF33i VF34i + VF41i VF42i VF43i VF44i + VF21e VF22e VF23e VF24e + VF31e VF32e VF33e VF34e + VF41e VF42e VF43e VF44e + COOL PT HEG CT + MOD SH VOID + ; +* +* reccupere information transferee a la procedure +* +:: + >>TempComb<< >>TempCalo<< + >>TempPres<< + >>TempMode<< >>TempCala<< + >>LibName<< + >>CF11<< >>CF12<< >>CF13<< >>CF14<< + + >>CF21i<< >>CF22i<< >>CF23i<< >>CF24i<< + >>CF31i<< >>CF32i<< >>CF33i<< >>CF34i<< + >>CF41i<< >>CF42i<< >>CF43i<< >>CF44i<< + + >>CF21e<< >>CF22e<< >>CF23e<< >>CF24e<< + >>CF31e<< >>CF32e<< >>CF33e<< >>CF34e<< + >>CF41e<< >>CF42e<< >>CF43e<< >>CF44e<< + + >>VF11<< >>VF12<< >>VF13<< >>VF14<< + + >>VF21i<< >>VF22i<< >>VF23i<< >>VF24i<< + >>VF31i<< >>VF32i<< >>VF33i<< >>VF34i<< + >>VF41i<< >>VF42i<< >>VF43i<< >>VF44i<< + + >>VF21e<< >>VF22e<< >>VF23e<< >>VF24e<< + >>VF31e<< >>VF32e<< >>VF33e<< >>VF34e<< + >>VF41e<< >>VF42e<< >>VF43e<< >>VF44e<< + + >>COOL<< >>PT<< >>HEG<< >>CT<< + >>MOD<< >>SH<< >>VOID<< + ; +* +* Structures de donnees locales et +* modules et parametres +* +MODULE + LIB: + ; +STRING IsoU5 IsoU8 IsoO16 IsoH1 + IsoD2 IsoB10 IsoZr IsoFe4 + IsoFe6 IsoFe7 IsoFe8 IsoCr0 + IsoCr2 IsoCr3 IsoCr4 IsoNi8 + IsoNi0 IsoNi1 IsoNi2 IsoNi4 + IsoNb IsoHe4 IsoDy0 IsoDy1 + IsoDy2 IsoDy3 IsoDy4 + := + "U235" "U238" "O16" "H1_H2O" + "H2_D2O" "B10" "Zr0" "Fe54" + "Fe56" "Fe57" "Fe58" "Cr50" + "Cr52" "Cr53" "Cr54" "Ni58" + "Ni60" "Ni61" "Ni62" "Ni64" + "Nb93" "He4" "Dy160" "Dy161" + "Dy162" "Dy163" "Dy164" + ; +REAL + Ftemp Ctemp Mtemp PTtemp CTtemp := + TempComb 273. + + TempCalo 273. + + TempMode 273. + + TempPres 273. + + TempCala 273. + + ; +ECHO "Temperature combustible =" TempComb "C" ; +ECHO "Temperature caloporteur =" TempCalo "C" ; +* +* section efficace microscopiques de LibName +* +Biblio := LIB: :: + EDIT 1 + NMIX <> + CTRA APOL + PTSL + ANIS 2 + MIXS LIB: DRAGON FIL: <> +* caloporteur +*--- + MIX <> <> + H1 = <> 4.7720E-02 + O16 = <> 2.3860E-02 +* tube de pression +*--- + MIX <> <> + ZR = <> 4.1780E-02 2 IRSET PTSL NONE + NB = <> 1.0877E-03 + FE4 = <> 1.9854E-06 + FE6 = <> 3.0055E-05 + FE7 = <> 6.8192E-07 + FE8 = <> 8.9171E-08 + CR0 = <> 2.7556E-07 + CR2 = <> 5.1102E-06 + CR3 = <> 5.6848E-07 + CR4 = <> 1.3891E-07 + NI8 = <> 1.6108E-06 + NI0 = <> 5.9980E-07 + NI1 = <> 2.5647E-08 + NI2 = <> 8.0447E-08 + NI4 = <> 1.9850E-08 + B10 = <> 9.5090E-08 +* gap d'helium +*--- + MIX <> <> + HE4 = <> 2.0877E-04 +* tube de calandre +*--- + MIX <> <> + ZR = <> 4.2364E-02 2 IRSET PTSL NONE + FE4 = <> 5.7861E-06 + FE6 = <> 8.7588E-05 + FE7 = <> 1.9873E-06 + FE8 = <> 2.5991E-07 + CR0 = <> 3.4408E-06 + CR2 = <> 6.3805E-05 + CR3 = <> 7.0983E-06 + CR4 = <> 1.7342E-06 + NI8 = <> 2.5562E-05 + NI0 = <> 9.5185E-06 + NI1 = <> 4.0700E-07 + NI2 = <> 1.2765E-06 + NI4 = <> 3.1510E-07 + B10 = <> 2.3551E-07 +* moderateur +*--- + MIX <> <> + H1 = <> 6.4950E-05 + D2 = <> 6.4886E-02 + O16 = <> 3.2398E-02 +* crayon 1e anneau +*--- + MIX <> <> + O16 = <> 4.5117E-02 + U5 = <> 1.6252E-04 1 IRSET PTSL NONE + U8 = <> 2.2396E-02 1 IRSET PTSL NONE + MIX <> COMB <> 1. + MIX <> COMB <> 1. + MIX <> COMB <> 1. + MIX <> COMB <> 1. + MIX <> COMB <> 1. + MIX <> COMB <> 1. + MIX <> COMB <> 1. +* crayon 2e anneau +*--- + MIX <> <> + O16 = <> 4.5124E-02 + U5 = <> 4.5689E-04 1 IRSET PTSL NONE + U8 = <> 2.2105E-02 1 IRSET PTSL NONE + MIX <> COMB <> 1. + MIX <> COMB <> 1. + MIX <> COMB <> 1. + + MIX <> COMB <> 1. + MIX <> COMB <> 1. + MIX <> COMB <> 1. + MIX <> COMB <> 1. + + MIX <> COMB <> 1. + MIX <> COMB <> 1. + MIX <> COMB <> 1. + MIX <> COMB <> 1. + + MIX <> COMB <> 1. + MIX <> COMB <> 1. + MIX <> COMB <> 1. + MIX <> COMB <> 1. +* crayons 3e anneau +*--- + MIX <> <> + O16 = <> 4.3808E-02 + U5 = <> 4.4357E-04 1 IRSET PTSL NONE + U8 = <> 2.1461E-02 1 IRSET PTSL NONE + MIX <> COMB <> 1. + MIX <> COMB <> 1. + MIX <> COMB <> 1. + + MIX <> COMB <> 1. + MIX <> COMB <> 1. + MIX <> COMB <> 1. + MIX <> COMB <> 1. + + MIX <> COMB <> 1. + MIX <> COMB <> 1. + MIX <> COMB <> 1. + MIX <> COMB <> 1. + + MIX <> COMB <> 1. + MIX <> COMB <> 1. + MIX <> COMB <> 1. + MIX <> COMB <> 1. +* crayons 4e anneau +*--- + MIX <> <> + O16 = <> 4.3808E-02 + U5 = <> 4.4357E-04 1 IRSET PTSL NONE + U8 = <> 2.1461E-02 1 IRSET PTSL NONE + MIX <> COMB <> 1. + MIX <> COMB <> 1. + MIX <> COMB <> 1. + + MIX <> COMB <> 1. + MIX <> COMB <> 1. + MIX <> COMB <> 1. + MIX <> COMB <> 1. + + MIX <> COMB <> 1. + MIX <> COMB <> 1. + MIX <> COMB <> 1. + MIX <> COMB <> 1. + + MIX <> COMB <> 1. + MIX <> COMB <> 1. + MIX <> COMB <> 1. + MIX <> COMB <> 1. +* gaine crayon +*--- + MIX <> <> + ZR = <> 4.9656E-02 2 IRSET PTSL NONE + FE4 = <> 1.0341E-05 + FE6 = <> 1.5654E-04 + FE7 = <> 3.5509E-06 + FE8 = <> 4.6451E-07 + CR0 = <> 3.9532E-06 + CR2 = <> 7.3306E-05 + CR3 = <> 8.1553E-06 + CR4 = <> 1.9925E-06 + NI8 = <> 3.7378E-06 + NI0 = <> 1.3918E-06 + NI1 = <> 5.9514E-08 + NI2 = <> 1.8668E-07 + NI4 = <> 4.6062E-08 + B10 = <> 2.7058E-07 +* void +*--- + MIX <> <> + H1 = <> 6.6918E-05 + O16 = <> 3.3459E-05 + ; +* +* terminer execution +* +QUIT "LIST" . -- cgit v1.2.3