note
 	description: "menus application root class"
 	date: "$Date$"
 	revision: "$Revision$"
 
 class
 	APPLICATION
 
 inherit
 	ARGUMENTS
 
 create
 	make
 
 feature
 	person: PERSON
 	acc: ACCOUNT
 	balance: INTEGER
 
 feature {NONE} -- Initialization
 
 	make
 			-- Run application.
 		do
 			--| Add your code here
 			create acc.open ("Bob Johnson", 2300)
 			person := acc.owner
 			balance := acc.balance
 
 			print (person.name + "%N--------------%N")
 
 			acc.deposit (2300)
 			print ("Initial: ")
 			print (balance)
 			print (" %N")
 
 			if acc.may_withdraw (50) then
 				acc.withdraw (3600)
 			end
 			print ("Final:   ")
 			print (acc.balance)
 			print (" %N")
 
 			print ("%N%NLedger:%N--------%N")
 
 			acc.print_transactions
 		end
 
 end