Skip to content

Commit

Permalink
ADPRES v.0.1 ALPHA
Browse files Browse the repository at this point in the history
  • Loading branch information
@imronuke
imronuke authored Apr 11, 2017
1 parent d8918a4 commit 06bc08f
Show file tree
Hide file tree
Showing 22 changed files with 9,126 additions and 0 deletions.
19 changes: 19 additions & 0 deletions Help
View file
Original file line number Diff line number Diff line change
@@ -0,0 +1,19 @@
FOR UNIX SYSTEM (I AM USING CYGWIN IN WINDOWS):
1. COMPILE THE CODE USING GFORTRAN (OR OTHER FORTRAN COMPILERS) AS FOLLOW:

gfortran mod_data.f90 mod_InpOutp.f90 mod_nodal.f90 ADPRES.f90 -O4 -o adpres

2. THE COPY PASTE THE EXECUTABLE FILE INTO INPUT FOLDER, THEN RUN ADPRES USING COMMAND

./adpres

3. I HAVEN'T TRIED FOR WINDOWS.

4. ANY QUESTIONS, COMMENTS AND/OR FEEDBACKS CAN BE EMAILED TO:
muhammad.imron@adpoly.ac.ae
makrus.imron@gmail.com

5. THANK YOU.

"The best of people are those that bring most benefit to the rest of mankind." (PROPHET)

45 changes: 45 additions & 0 deletions smpl/IAEA2D
View file
Original file line number Diff line number Diff line change
@@ -0,0 +1,45 @@
! IAEA2D input data
! 2 Dimensional Problem
! NODE SIZE = 20 CM
! MOSRA K-EFF = 1.03393
! ADPRES K-EFF = 1.033930

%MODE
FORWARD
%CASE
IAEA2D
PROBLEM TEST
%XSEC
2 4 ! Number of groups and number of materials
! sigtr siga nu*sigf sigf chi sigs_g1 sigs_g2
! MATERIAL 1
0.222222 0.010 0.000 0.000 1.0 0.1922 0.020
0.833333 0.080 0.135 0.135 0.0 0.000 0.7533 ! MAT1 : Outer Fuel
0.222222 0.010 0.000 0.000 1.0 0.1922 0.020
0.833333 0.085 0.135 0.135 0.0 0.000 0.7483 ! MAT2 : Inner Fuel
0.222222 0.0100 0.000 0.000 1.0 0.1922 0.020
0.833333 0.1300 0.135 0.135 0.0 0.000 0.7033 ! MAT3 : Inner Fuel + Control Rod
0.166667 0.000 0.000 0.000 0.0 0.1267 0.040
1.111111 0.010 0.000 0.000 0.0 0.000 1.1011 ! MAT4 : Reflector
%GEOM
9 9 2 !nx, ny, nz
10.0 8*20.0 !x-direction assembly size in cm
1 8*1 !x-direction assembly divided into 20 cm each
10.0 8*20.0 !y-direction assembly size in cm
1 8*1 !y-direction assembly divided into 20 cm each
2*10 !z-direction assembly size in cm
1 1 !z-direction assembly divided into 20 cm each
1 !np number of planar type
1 1 !planar assignment (from bottom to top)
! Planar_type_1
3 2 2 2 3 2 2 1 4
2 2 2 2 2 2 2 1 4
2 2 2 2 2 2 1 1 4
2 2 2 2 2 2 1 4 4
3 2 2 2 3 1 1 4 0
2 2 2 2 1 1 4 4 0
2 2 1 1 1 4 4 0 0
1 1 1 4 4 4 0 0 0
4 4 4 4 0 0 0 0 0
! Boundary conditions x=1 (west), x=max (east), y=1 (north), y=max (south), z=1 (bottom), z=max (top)
1 0 1 0 1 1
673 changes: 673 additions & 0 deletions smpl/IAEA2D.out
View file

Large diffs are not rendered by default.

44 changes: 44 additions & 0 deletions smpl/IAEA2Dx
View file
Original file line number Diff line number Diff line change
@@ -0,0 +1,44 @@
! IAEA2D input data
! 2 Dimensional Problem
! NODE SIZE = 20 CM
! Orientation 0 deg t0 90 deg

%MODE
FORWARD
%CASE
IAEA2D
PROBLEM TEST
%XSEC
2 4 ! Number of groups and number of materials
! sigtr siga nu*sigf sigf chi sigs_g1 sigs_g2
! MATERIAL 1
0.222222 0.010 0.000 0.000 1.0 0.1922 0.020
0.833333 0.080 0.135 0.135 0.0 0.000 0.7533 ! MAT1 : Outer Fuel
0.222222 0.010 0.000 0.000 1.0 0.1922 0.020
0.833333 0.085 0.135 0.135 0.0 0.000 0.7483 ! MAT2 : Inner Fuel
0.222222 0.0100 0.000 0.000 1.0 0.1922 0.020
0.833333 0.1300 0.135 0.135 0.0 0.000 0.7033 ! MAT3 : Inner Fuel + Control Rod
0.166667 0.000 0.000 0.000 0.0 0.1267 0.040
1.111111 0.010 0.000 0.000 0.0 0.000 1.1011 ! MAT4 : Reflector
%GEOM
9 9 2 !nx, ny, nz
10.0 8*20.0 !x-direction assembly size in cm
8*1 1 !x-direction assembly divided into 20 cm each
8*20.0 10.0 !y-direction assembly size in cm
1 8*1 !y-direction assembly divided into 20 cm each
2*10.0 !z-direction assembly size in cm
1 1 !z-direction assembly divided into 20 cm each
1 !np number of planar type
1 1 !planar assignment (from bottom to top)
! Planar_type_1
4 4 4 4 0 0 0 0 0
1 1 1 4 4 4 0 0 0
2 2 1 1 1 4 4 0 0
2 2 2 2 1 1 4 4 0
3 2 2 2 3 1 1 4 0
2 2 2 2 2 2 1 4 4
2 2 2 2 2 2 1 1 4
2 2 2 2 2 2 2 1 4
3 2 2 2 3 2 2 1 4
! Boundary conditions x=1 (west), x=max (east), y=1 (north), y=max (south), z=1 (bottom), z=max (top)
1 0 0 1 1 1
753 changes: 753 additions & 0 deletions smpl/IAEA2Dx.out
View file

Large diffs are not rendered by default.

74 changes: 74 additions & 0 deletions smpl/IAEA3D
View file
Original file line number Diff line number Diff line change
@@ -0,0 +1,74 @@
! IAEA3D input data
! NODE SIZE = 20 cm
! MOSRA K-EFF : 1.02897
! ADPRES K-EFF : 1.028969
%MODE
FORWARD
%CASE
IAEA3D
20 CM NODE SIZE
% XSEC
2 5 ! Number of groups and number of materials
! sigtr siga nu*sigf sigf chi sigs_g1 sigs_g2
0.222222 0.010 0.000 0.000 1.0 0.1922 0.020
0.833333 0.080 0.135 0.135 0.0 0.000 0.7533 ! MAT1 : Outer Fuel
0.222222 0.010 0.000 0.000 1.0 0.1922 0.020
0.833333 0.085 0.135 0.135 0.0 0.000 0.7483 ! MAT2 : Inner Fuel
0.222222 0.0100 0.000 0.000 1.0 0.1922 0.020
0.833333 0.1300 0.135 0.135 0.0 0.000 0.7033 ! MAT3 : Inner Fuel + Control Rod
0.166667 0.000 0.000 0.000 0.0 0.1267 0.040
1.111111 0.010 0.000 0.000 0.0 0.000 1.1011 ! MAT4 : Reflector
0.166667 0.000 0.000 0.000 0.0 0.000 0.040
1.111111 0.055 0.000 0.000 0.0 0.000 0.000 ! MAT5 : Reflector + Control Rod
%GEOM
9 9 19 !nx, ny, nz
10 8*20 !x-direction assembly size in cm
1 8*1 !x-direction assembly divided into 20 cm each
10 8*20 !y-direction assembly size in cm
1 8*1 !y-direction assembly divided into 20 cm each
19*20 !z-direction nodal in cm
19*1 !z-direction assembly divided into 20 cm each
4 !np number of planar type
1 13*2 4*3 4 !planar assignment (from bottom to top)
! Planar_type_1 (Bottom Reflector)
4 4 4 4 4 4 4 4 4
4 4 4 4 4 4 4 4 4
4 4 4 4 4 4 4 4 4
4 4 4 4 4 4 4 4 4
4 4 4 4 4 4 4 4 0
4 4 4 4 4 4 4 4 0
4 4 4 4 4 4 4 0 0
4 4 4 4 4 4 0 0 0
4 4 4 4 0 0 0 0 0
! Planar_type_2 (Fuel)
3 2 2 2 3 2 2 1 4
2 2 2 2 2 2 2 1 4
2 2 2 2 2 2 1 1 4
2 2 2 2 2 2 1 4 4
3 2 2 2 3 1 1 4 0
2 2 2 2 1 1 4 4 0
2 2 1 1 1 4 4 0 0
1 1 1 4 4 4 0 0 0
4 4 4 4 0 0 0 0 0
! Planar_type_3 (Fuel+Partial Control Rods)
3 2 2 2 3 2 2 1 4
2 2 2 2 2 2 2 1 4
2 2 3 2 2 2 1 1 4
2 2 2 2 2 2 1 4 4
3 2 2 2 3 1 1 4 0
2 2 2 2 1 1 4 4 0
2 2 1 1 1 4 4 0 0
1 1 1 4 4 4 0 0 0
4 4 4 4 0 0 0 0 0
! Planar_type_4 (Top reflectors)
5 4 4 4 5 4 4 4 4
4 4 4 4 4 4 4 4 4
4 4 5 4 4 4 4 4 4
4 4 4 4 4 4 4 4 4
5 4 4 4 5 4 4 4 0
4 4 4 4 4 4 4 4 0
4 4 4 4 4 4 4 0 0
4 4 4 4 4 4 0 0 0
4 4 4 4 0 0 0 0 0
! Boundary conditions x=1 (west), x=max (east), y=1 (north), y=max (south), z=1 (bottom), z=max (top)
1 0 1 0 0 0
Loading

0 comments on commit 06bc08f

Please sign in to comment.