this is simple refal compiler