For  k = 1 to
    For to D  {
      
      initial_   initial_
    }
Solving  
R_ =
R_ =
R_ =
R_ =
initial_ =
}
k= TD
Ford = 1 to D{
     =
    initial_ = initial_
    }
Solving  
R_ =
R_ =
R_ =
R_ =
}
Pseudocode 1