will come back with INTEGRATE (Expression) as its answer.)      C. An OLS Utilities package for allowing users to more easily         manipulate the numerical vectors describing the         expressions,i.e., setting up linear and logarithmic sweeps for         the various plots, describing the scale of the plots on the OLS         screens.      D. The ability to have an OLS program written from a MATHLAB         function, including IF, THEN, ELSE, DO,etc.  This would most         likely require a more sophisticated parse than is done in the         current implementation.EXAMPLE   An example is included in which a UCSB user:      A. Logs into MATHLAB,      B. Initializes the "SAVE" function,      C. Generates a polynomial function and its derivative and         integral,Parrish & Pickins                                               [Page 5]RFC 525                MIT-MATHLAB MEETS UCSB-OLS            1 June 1973      D. Logs out of MATHLAB,      E. Creates the retrieval job,      F. Waits and then displays the resultant user programs,      G. and, finally, creates the X variable and plots the functions.   Although the sample OLS manipulations are very simple ones it should   be noted that the user could compare the retrieved functions with   numerical models or even use the functions as subroutines in higher   level algorithms.  Usage of this combined numeric-symbolic system is   limited to the imagination of the user.   The example follows:   USER TELNET                    Connection to MATHLAB from UCSB   LOGIN TO MIT-ML                     "II LOG MIT-ML RETURN"   MIT MATHLAB PDP-10   ML ITS.796. DDT.514.   9. USERS   :LOGIN WMP                              Login to MIT-MATHLAB.   :MACSYMA                                Call up MACSYMA   THIS IS MACSYMA 212   USE " INSTEAD OF ?   SEE UPDATE > MACSYM;   FIX 212 DSK MACSYM BEING LOADED   LOADING DONE   (C1) BATCH(BATCH,UTILS);                Load BATCH UTILS file.   (UREAD BATCH UTILS DSK WMP) FILE NOT FOUND   (C2) BATCH(BATCH,UTILS,DSK,UCSB);   (C2) LISTX:();   (D2)                                    ()   (C3) ADDLIST(X):=LISTX:CONS(X,LISTX);   (D3)                   ADDLIST(X) := (LISTX : CONS(X, LISTX))Parrish & Pickins                                               [Page 6]RFC 525                MIT-MATHLAB MEETS UCSB-OLS            1 June 1973   (C4) SAVE(FILENAME):=APPLY(STRINGOUT,APPEND(              CONS((FILENAME,BATCH,DSK,UCSB),REVERSE(LISTX)),("?")));   (D4) SAVE(FILENAME) :=        APPLY(STRINGOUT,APPEND(CONS((FILENAME, BATCH, DSK, UCSB),        REVERSE(LISTX)),(?)))   (D5)                                          BATCH DONE   (C6) (X**2+3)/(X+1);                                                2                                               X  + 3   (D6)                                        -------                                                X + 1   (C7) INTEGRATE(%,X);   SIN FASL DSK MACSYM BEING LOADED   LOADING DONE                                2                                              X  - 2 X   (D7)                                      ----------  + 4 LOG(X + 1)                                                2   (C8) ADDLIST('D6);   (D8)                                       (D6)   (C9) ADDLIST('D7);   (D9)                               (D7, D6)   Use ADDLIST function                                        to save line numbers D6 and D7.   (C10) DIFF(D6,X);                                              2                                     2 X     X  + 3   (D10)                            ----  -  ------                                     X+1          2                                             (X+1)   (C11) ADDLIST('D10);   (D11)                      (D10, D7, D6)   Use ADDLIST function to                                              save line number D10.   (C12) SAVE(MYFILE);   (D12)                     (D6, D7, D10, ?)  Write list of lines out                                                  to a disk file using   (C13) *********Z     Leave MACSYMA                   SAVE function.   25156)    .IOT 1,1   :LISTF UCSB   DSK UCSBParrish & Pickins                                               [Page 7]RFC 525                MIT-MATHLAB MEETS UCSB-OLS            1 June 1973   FREE BLCCKS UO #1 241 U1 #3 345 U2 #5 379   3    ATTN     BATCH  1  5/23/73  13:53:11   1    BATCH    UTILS  1  5/23/73  13:11:43   3    DEMO     WMP    1  5/26/73  15:29:26   5    DEMO1    BATCH  1  4/29/73  22:41:17   1    DEMO99   BATCH  1  5/25/73  00:07:15   5    MYFILE   BATCH  1  5/31/73  12:41:50 <-- file is in directory   1    _MSGS_   UCSB   0  5/26/73  21:13:53     at MATHLAB   :LOGOUT                                               Logout and disconnect.   -------------------------------------------------------------------   ML ITS 796 CONSOLE 24 FREE. 12:42:35   DISCONNECTION COMPLETE   WORK AREAS UPDATED                         Load Retrieval program   LOAD MATHLAB                             "SYST LOAD MATHLAB RETURN"   FILE LOADED                                          "USER LO (+)"   RETRIEVE EXPRESSIONS   --------------------   MATHLAB FILE? (EXP)   -->MYFILE-->MYFILE.                    "MYFILE ENTER"   OLS FILE?  (MYFILE)   -->demo11-->demo11                     "demo11 ENTER"   OLS FILE   PROTECT CODE?  ()                      "demo11 ENTER"   -->DEMO-->demo11   BATCH JOBNAME? (MYFILE)                "PARSET ENTER"   -->PARSET-->PARSET.   PRESS ENTER TO SUBMIT JOB              "ENTER"   VOLUME NEEDED=   JOB SUBMITTED   JOB TO RETRIEVE MATHLAB   EXPRESSIONS IS NOW IN   UCSB-MOD75 BATCH QUEUE.    Some time elapses and batch job is run.                              Load the retrieved program.   WORK AREAS UPDATED         "SYST LOAD demo11 RETURN"   LOAD demo11   FILE LOADEDParrish & Pickins                                               [Page 8]RFC 525                MIT-MATHLAB MEETS UCSB-OLS            1 June 1973                          Display the returned expressions.   (USER LI (+))                    "USER I DISPLAY (+)"   ------------------------------------------------------------------   LII REAL LOAD ((X**2 (+)  3)/(X (+) 1)):   (USER LI (-))                    "USER I DISPLAY (-)"   LII REAL LOAD ((X**2 (-) 2*X)/2 + 4* LOG (X (+) 1)):   ------------------------------------------------------------------   (USER L1 (*))                      "USER I DISPLAY (*)"   LII REAL LOAD (2*X/(X (+) 1) <> (X**2 (+) 3)/(X (+) 1)**2):   USER LI SQ UNDEFINED             "USER DISPLAY SQ"   [The following figure is available in the .ps and .pdf version of   this document:]   Sample OLS Curves Generated for -.5 < x < 4.5                                       -   -Endnotes [1]  Supported on a PDP-10 System at MIT and available for the use at      UCSB by the way of APRA Network. [2] [In this memo, the notation "(+)", "(-)", and "(*)" has been      substituted for a circle enclosing a +, -, and * symbol,      respectively.]           [This RFC was put into machine readable form for entry]      [into the online RFC archives by Helene Morin, Via Genie 12/1999]Parrish & Pickins                                               [Page 9]