File tree Expand file tree Collapse file tree 2 files changed +1
-12
lines changed
Expand file tree Collapse file tree 2 files changed +1
-12
lines changed Original file line number Diff line number Diff line change @@ -16,6 +16,7 @@ subroutine f_aero_data_ctor(ptr_c) bind(C)
1616 type (c_ptr), intent (out ) :: ptr_c
1717
1818 allocate (ptr_f)
19+ call fractal_set_spherical(ptr_f% fractal)
1920 ptr_c = c_loc(ptr_f)
2021 end subroutine
2122
Original file line number Diff line number Diff line change @@ -100,9 +100,6 @@ def test_rad2vol_sphere():
100100 # arrange
101101 sut = ppmc .AeroData (AERO_DATA_CTOR_ARG_MINIMAL )
102102 radius = 1e-6
103- sut .frac_dim = 3.0
104- sut .vol_fill_factor = 1.0
105- sut .prime_radius = 1e-8
106103
107104 # act
108105 value = sut .rad2vol (radius )
@@ -134,9 +131,6 @@ def test_vol2rad_sphere():
134131 # arrange
135132 sut = ppmc .AeroData (AERO_DATA_CTOR_ARG_MINIMAL )
136133 vol = 4.19e-18
137- sut .frac_dim = 3.0
138- sut .vol_fill_factor = 1.0
139- sut .prime_radius = 1e-8
140134
141135 # act
142136 value = sut .vol2rad (vol )
@@ -169,9 +163,6 @@ def test_diam2vol_sphere():
169163 # arrange
170164 sut = ppmc .AeroData (AERO_DATA_CTOR_ARG_MINIMAL )
171165 diam = 2e-6
172- sut .frac_dim = 3.0
173- sut .vol_fill_factor = 1.0
174- sut .prime_radius = 1e-8
175166
176167 # act
177168 vol = sut .diam2vol (diam )
@@ -203,9 +194,6 @@ def test_vol2diam_sphere():
203194 # arrange
204195 sut = ppmc .AeroData (AERO_DATA_CTOR_ARG_MINIMAL )
205196 vol = 4.19e-18
206- sut .frac_dim = 3.0
207- sut .vol_fill_factor = 1.0
208- sut .prime_radius = 1e-8
209197
210198 # act
211199 value = sut .vol2diam (vol )
You can’t perform that action at this time.
0 commit comments