@@ -518,6 +518,8 @@ size_t muscle::afterload_time_step(int protocol_index)
518518
519519 double afterload; // the afterload to work against
520520
521+ double afterload_min_init_time_s; // min time in s to initate the afterload
522+
521523 // Code
522524
523525 // Extract the time-step and pCa
@@ -531,6 +533,8 @@ size_t muscle::afterload_time_step(int protocol_index)
531533 afterload = afterload * p_fs_options->afterload_factor_multiplier ;
532534 }
533535
536+ afterload_min_init_time_s = p_fs_options->afterload_min_init_time_s ;
537+
534538 // Check what kind of muscle we have
535539 if ((p_fs_model[0 ]->no_of_half_sarcomeres == 1 ) && (p_sc == NULL ))
536540 {
@@ -578,7 +582,9 @@ size_t muscle::afterload_time_step(int protocol_index)
578582 m_length = m_length + adjustment;
579583 lattice_iterations = p_hs[0 ]->update_lattice (time_step_s, adjustment);
580584
581- if ((afterload_mode == 0 ) && (p_hs[0 ]->hs_force >= afterload))
585+ if ((afterload_mode == 0 ) &&
586+ (m_force >= afterload) &&
587+ (m_time_s >= afterload_min_init_time_s))
582588 {
583589 // Switch to isotonic mode
584590 afterload_mode = 1 ;
@@ -641,7 +647,9 @@ size_t muscle::afterload_time_step(int protocol_index)
641647 // Length control
642648 lattice_iterations = length_control_myofibril_with_series_compliance (protocol_index);
643649
644- if ((afterload_mode == 0 ) && (m_force >= afterload))
650+ if ((afterload_mode == 0 ) &&
651+ (m_force >= afterload) &&
652+ (m_time_s >= afterload_min_init_time_s))
645653 {
646654 afterload_mode = 1 ;
647655 }
0 commit comments