OOP: Profit
P | N


Object subclass: #Profit

instanceVariableNames: 'gateCount margin ' "Fixed it from the picture"

classVariableNames: ''

poolDictionaries: ''

category: 'Counts' "Probably shouldn't be this"

Profit methodsFor: 'calculate'

initialize: aCount

gateCount := aCount.

margin := 0.25.

total

^ margin * (gateCount value).


Previous | Next


Last modified at 7/8/97; 10:04:39 AM
Other Links of Interest
College of Computing | EduTech Institute | GVU Center
Mark Guzdial | Papers | CS 2390 Spring '97 Home Page | STABLE | MMC-CaMILE