chs@dhcp31-160% ml                  ~/wrk/cs/teaching/ics141/ml
Moscow ML version 2.00 (June 2000)
Enter `quit();' to quit.
- use "zerodups.ms";
! Cannot find file zerodups.ms
- use "zerodups.ml";
[opening file "zerodups.ml"]
> val zerodups = fn : int list -> int list
> val it = [1, 2, 0, 3, 0, 4, 0] : int list
[closing file "zerodups.ml"]
> val it = () : unit
- zerodups [2,2];
> val it = [2, 0] : int list
- 
chs@dhcp31-160% vim zerodups.ml     ~/wrk/cs/teaching/ics141/ml
chs@dhcp31-160% ml                  ~/wrk/cs/teaching/ics141/ml
Moscow ML version 2.00 (June 2000)
Enter `quit();' to quit.
- use "zerodups.ml";
[opening file "zerodups.ml"]
> val zerodups = fn : int list -> int list
> val it = [1, 2, 0, 3, 0, 4, 0] : int list
[closing file "zerodups.ml"]
> val it = () : unit
-                   
chs@dhcp31-160% ml                  ~/wrk/cs/teaching/ics141/ml
Moscow ML version 2.00 (June 2000)
Enter `quit();' to quit.
- val x = 5;
> val x = 5 : int
- fun f y = x + y;
> val f = fn : int -> int
- val x = 10;
> val x = 10 : int
- f 1;
> val it = 6 : int
- fun g n = z + n;
! Toplevel input:
! fun g n = z + n;
!           ^
! Unbound value identifier: z
-