Searched refs:actual_ener_change (Results 1 – 2 of 2) sorted by relevance
2274 REAL(KIND=dp) :: actual_ener_change, ener_ratio, & local2301 actual_ener_change = opt_embed%w_func(opt_embed%i_iter) - &2304 ener_ratio = actual_ener_change/pred_ener_change2308 IF (actual_ener_change .GT. 0.0_dp) THEN ! If energy increases2319 IF (ABS(actual_ener_change) .GE. opt_embed%allowed_decrease) THEN