mumps-demo/README.md

7.9 KiB

MUMPS Examples

MUMPS ("Massachusetts General Hospital Utility Multi-Programming System"), or M, is a general-purpose computer programming language originally designed in 1966 for the healthcare industry. Its differentiating feature is its "built-in" database, enabling high-level access to disk storage using simple symbolic program variables and subscripted arrays; similar to the variables used by most languages to access main memory. Read more...

The implementations currently available are:

The examples in this tutorial are run with GT.M.

Prerequisites

Additional Documentation

GPL Mumps


Quick Setup

To install GT.M on Debian based OS:

apt-get install fis-gtm

Set up the environment variables:

cd /usr/lib/x86_64-linux-gnu/fis-gtm/V6.3-003A_x86_64
source gtmprofile

Open the GT.M prompt:

gtm

GTM>write "Hello world"
Hello world
GTM>halt

To uninstall GT.M:

apt-get purge fis-gtm

Run the Examples

Copy the examples into your ~/.fis-gtm/V6.3-003A_x86_64/r folder and run:

mumps -run ^HelloWorld

1. The Very Basics

HelloWorld.m

Hello world

HelloWorldInLoop.m

Hello world
Hello world
Hello world
Hello world
Hello world
Hello world
Hello world
Hello world
Hello world
Hello world

HelloWorldInAnotherLoop.m

Hello world
Hello world
Hello world
Hello world
Hello world
Hello world
Hello world
Hello world
Hello world
Hello world

HelloWorldInNestedLoop.m

1:1 Hello world
1:2 Hello world
1:3 Hello world
1:4 Hello world
1:5 Hello world
2:1 Hello world
2:2 Hello world
2:3 Hello world
2:4 Hello world
2:5 Hello world

ArithmeticOperations.m

There were 7 apples, 8 pears and 9 oranges,
a total of 24 fruits in a basket.
Then, something happened:
1 apple, 2 pears and 0 oranges were eaten!
Now there are 21 fruits in the basket,
the average fruit value is 7.

Arrays.m

Approaching the solar system:
Mercury
Venus
Earth
Mars
Jupiter
Saturn
Uranus
Neptune
Pluto

September 2019:
26 27 28 29 30 31 1
2 3 4 5 6 7 8
9 10 11 12 13 14 15
16 17 18 19 20 21 22
23 24 25 26 27 28 29
30 1 2 3 4 5 6

Genealogical tree:
Harry and Emily had Jack

Associative array:
Have you ever been to London?

ArraysShortened.m

The output obtained is the same as that in Arrays.m

2. User Defined Functions

FactorialByReference.m

Enter n: 5
5! = 120

FactorialByValue.m

Enter n: 5
5! = 120

Fibonacci.m

Enter n: 9
F(9) = 34

3. Routines

Main.m

Hello!
Enter n: 9

areaCircle(9) = 254.469
fibonacci(9) = 34
factorialByVal(9) = 362880
factorialByRef(9) = 362880

For further details also visit MyMathRoutines.m

4. Databases

GenealogicalTree.m

Genealogical tree:
^gtree(0,1,1) is Jessica
$data(^gtree(0,2)) is 0
$data(^gtree(0,1,1,1)) is 1
$data(^gtree(0,0,0,0,0)) is 10
$data(^gtree(0)) is 11

Removing tree...
$data(^gtree(0,2)) is 0
$data(^gtree(0,1,1,1)) is 0
$data(^gtree(0,0,0,0,0)) is 0
$data(^gtree(0)) is 0

basic-crud/Main.m

User successfully created!
User successfully created!

User successfully fetched!
username: alice
email: alice-jones@no-reply.com
fullname: Alice Jones

User successfully updated!

User successfully fetched!
username: amelia
email: amelia-roberts@no-reply.com
fullname: Amelia Roberts

User successfully deleted!

User successfully fetched!
username:
email:
fullname:

Database successfully dropped!

For further details also visit:

basic-blog/Main.m

User successfully created!
User successfully created!
Post successfully created!
Post successfully created!
Comment successfully created!
Comment successfully created!

Post successfully fetched!
slug: lorem-ipsum
title: Lorem ipsum
description: Lorem ipsum dolor sit amet, consectetur adipiscing elit, sed do eiusmod tempor incididunt ut labore et dolore magna aliqua.
id_user: 1

Comment successfully fetched!
description: Thank you so much for sharing this.
id_post: 2

Database successfully dropped!

For further details also visit:


Contributions

Would you help make this tutorial better? Contributions are welcome.

Many thanks.