Parse Succesful!

[Abstract Syntax]
(PDefs [(DFun [Type_int] "main" [] [(SExp [(EApp "printString" [(EString "What string? ")] )] ), (SInit [Type_string] "s" [(EApp "readString" [] )] ), (SExp [(EApp "printString" [(EString "How many times? ")] )] ), (SInit [Type_int] "k" [(EApp "readInt" [] )] ), (SExp [(EApp "printString" [(EApp "replicate" [(EId "k"), (EId "s")] )] )] ), SReturnVoid] ), (DFun [Type_string] "replicate" [(ADecl [Type_int] "k"), (ADecl [Type_string] "s")] [(SInit [Type_int] "i" [(EInt 1)] ), (SInit [Type_string] "r" [(EId "s")] ), (SWhile [(ELt (EId "i") (EId "k"))] [(SBlock [(SExp [(EAss (EId "r") (EPlus (EId "s") (EId "r")))] ), (SExp [(EPIncr [(EId "i")] )] )] )]), (SReturn [(EId "r")] )] )])

[Linearized Tree]
int main () 
{
  printString ("What string? ");
  string s = readString ();
  printString ("How many times? ");
  int k = readInt ();
  printString (replicate (k, s));
  return;
}
string replicate (int k, string s) 
{
  int i = 1;
  string r = s;
  while (i < k) 
  {
    r = s + r;
    i ++;
  }
  return r;
}