(*---------------------------------------------------------------------------
    :Program.    Ein Tischrechner
    :Author.     Philippe Gressly
    :Address.    Näfenhaus, CH-8926 Kappel a/Albis
    :Phone.
    :Shortcut.   [Philu]
    :Version.    1.0
    :Date.       (10.) 1989
    :Copyright.  PD.
    :Language.   Modula-II
    :Translator. M2Amiga
    :Imports.    UPN
    :UpDate.
    :Contents.   Ein TischRechner
---------------------------------------------------------------------------*)
                                                                20.10.1989

UPN Version 1.0 (Oktober 1989)
==============================

     Das Programm ist recht einfach in seiner Bedienung. Zum starten
schreibst Du einfach "Rechner" vom CLI aus, oder Du klickst die Ikone an im
Workbench. Nach einer Einleitungszeile erwartet der Rechner bereits den
ersten Befehl. Es gibt drei Möglichkeiten, einen Befehl zu geben.

a)  Nachdem der Rechner das "»"-Zeichen zeigt kannst Du einfach eine Formel
    eingeben. Zum Beispiel:
   »Sin(0.5)
    oder
   »4+5+fact(6)-cos(ln(6))
    Danach wird auf der Folgenden Zeile ein Resultat angezeigt. Es kann aber
    auch sein, daß in der Formel ein Fehler war. Meistens wird das aber
    gemerkt und angezeigt.
b)  Man kann auch einer Variable etwas zuweisen:
   »ErdRadius=6.3710E6
    oder
   »Caesium=1.94
    Zu beachten ist, daß nur das Amerikanische Alfabet gebraucht werden darf.
    Also nur "a".."z" und "A".."Z".
    Rechts des Gleichheitszeichens können aber nicht nur Konstante, sondern
    auch Variable und Formeln, ja sogar Formelm mit Variablen stehen:
   »Umfang=Erdradius*2*PI
    (Die Konstanten sind PI(3.1415...) und E(2.71828...))
c)  mit dem ? können alle Variablen angezeigt werden.
   »?


     Wer das Programm beenden will, kann das mit dem Punkt "." tun. Ausser
das Programm wurde von der Workbench gestartet. Dann muß noch das
CloseGadget gedrückt werden.

*************************************************************************

FUNKTIONEN: (implementiert in UPN Version 2.6)

  (* Trigonometrische Funktionen :*)
  COS, SIN, TAN,
  ATAN,
  COSh, SINh, TANh,    (* Hyperbolische Funktionen   *)
  ACOSh, ASINh, ATANh,
  RtoD, DtoR,          (* RADIAN DEGREE Umwandlungen *)
  (* sonstige Funktionen *)
  SQRT                 (* Quadratwurzel              *)
  SIGN                 (* Vorzeichen                 *)
  FACT                 (* Fakultät                   *)
  EXP,                 (* Exponential                *)
  LN                   (* Logarithmus zur Basis e    *)
  LOG                  (* Logarithmus zur Basis 10   *)

(* bei genauer Studie des Programms sollte es ein Leichtes sein, noch
   eigene unäre Funktionsproceduren einzubinden.
 *)

**************************************************************************

Copyright:

   Das Modul LRealConvert ist zum grossen Teil bei der Firma Logitech
abgeschaut. Die meisten ModulaII Compiler werden jedoch eine entsprechende
Procedur zur Verfügung stellen. Wir mussten diese Procedur importieren, da
die gegenwärtige Version des Modula II compilers 2.4 (MacMETH) an der UNI
Zürich noch keinerlei StringToReal Proceduren zur Verfügung stellt, im
Handbuch dazu aber bereits eingetragen war. Wir kamen spät auf die Welt, als
wir in allen Definition Modules keine passende Prozedur fanden!

**************************************************************

Viele Erleichterungen wünscht Euch
Philippe Gressly
Näfenhaus
CH-8926 Kappel a/A