ftp.nice.ch/pub/next/science/mathematics/RareMathToolDemo.N.bs.tar.gz#/Sample/Controller.m

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

/* Generated by Interface Builder */

#import "Controller.h"
#import <appkit/Application.h>
#import "MathTool.h"
#import "MathGraph.h"
#import <appkit/Window.h>
#import <appkit/ScrollView.h>
#import <appkit/Font.h>
#import <appkit/Text.h>

@implementation Controller

- appDidInit:sender
{
   [mathTool initMath:self];
   [mathTool executeCommand:"Clear[x]; Clear[y]" resultType:NONE];
   [self makeKeyAndOrderFront:self];
   return self;
}
   
- plot:sender
{
    [mathTool executeCommand:"Plot3D[Sin[x y], {x, -2, 2}, {y, -2, 2}]" resultType:GRAPHICS];
    [mathGraph display:[mathTool graphicsString]];
    return self;
}

@end

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