Compute EM trajectory

RowBox[{Timing, [, RowBox[{RowBox[{em,  , =,  , RowBox[{EM, [, RowBox[{xd, ,, initialModel, ,, 0.001}], ]}]}], ;}], ]}]

RowBox[{{, RowBox[{RowBox[{0.,  , Second}], ,, Null}], }}]


Created by Mathematica  (September 8, 2003)