ftp.nice.ch/peanuts/GeneralData/Documents/books/AlexNeXTSTEPSource.tar.gz#/NSProgramming/Chapter3_OOD/ShapeArea/Rectangle.m

This is Rectangle.m in view mode; [Download] [Up]

#import "Rectangle.h"

@implementation Rectangle

-initHeight:(float)h width:(float)w
{
	[super init];
	height = h;
	width = w;
	return self;
}

-(float)calcArea
{
	return height * width;
}

-free
{
	return [super free];
}

@end

These are the contents of the former NiCE NeXT User Group NeXTSTEP/OpenStep software archive, currently hosted by Netfuture.ch.