Minor debug code changes
Added procedure InitializeWithData