@@ -260,63 +260,6 @@ function gamma_loop(
260260 return converged, gamma_new, alpha_array, Umag_array
261261end
262262
263- """
264- calculate_artificial_damping(solver::Solver, gamma::Vector{Float64},
265- alpha::Vector{Float64}, stall_angle_list::Vector{Float64})
266-
267- Calculate artificial damping for numerical stability.
268- """
269- function calculate_artificial_damping (
270- solver:: Solver ,
271- gamma:: Vector{Float64} ,
272- alpha:: Vector{Float64} ,
273- stall_angle_list:: Vector{Float64}
274- )
275- # Check for stall condition
276- is_stalled = false
277- if solver. aerodynamic_model_type == " LLT" ||
278- (solver. artificial_damping. k2 == 0 && solver. artificial_damping. k4 == 0 )
279- return zeros (length (gamma)), is_stalled
280- end
281-
282- for (ia, alpha_i) in enumerate (alpha)
283- if alpha_i > stall_angle_list[ia]
284- is_stalled = true
285- break
286- end
287- end
288-
289- ! is_stalled && return zeros (length (gamma)), is_stalled
290-
291- # Calculate damping
292- n_gamma = length (gamma)
293- damp = zeros (n_gamma)
294-
295- for ig in 1 : n_gamma
296- # Handle boundary cases
297- gim2, gim1, gi, gip1, gip2 = if ig == 1
298- gamma[1 ], gamma[1 ], gamma[1 ], gamma[2 ], gamma[3 ]
299- elseif ig == 2
300- gamma[1 ], gamma[1 ], gamma[2 ], gamma[3 ], gamma[4 ]
301- elseif ig == n_gamma - 1
302- gamma[n_gamma- 3 ], gamma[n_gamma- 2 ], gamma[n_gamma- 1 ], gamma[n_gamma], gamma[n_gamma]
303- elseif ig == n_gamma
304- gamma[n_gamma- 2 ], gamma[n_gamma- 1 ], gamma[n_gamma], gamma[n_gamma], gamma[n_gamma]
305- else
306- gamma[ig- 2 ], gamma[ig- 1 ], gamma[ig], gamma[ig+ 1 ], gamma[ig+ 2 ]
307- end
308-
309- dif2 = (gip1 - gi) - (gi - gim1)
310- dif4 = (gip2 - 3.0 * gip1 + 3.0 * gi - gim1) -
311- (gip1 - 3.0 * gi + 3.0 * gim1 - gim2)
312-
313- damp[ig] = solver. artificial_damping. k2 * dif2 -
314- solver. artificial_damping. k4 * dif4
315- end
316-
317- return damp, is_stalled
318- end
319-
320263"""
321264 smooth_circulation(circulation::Vector{Float64},
322265 smoothness_factor::Float64,
0 commit comments