# octave w12.txt;

function test12
a = exp (i*pi);
# ans = -1.0000e+00 + 1.2246e-16i
save -append w13.txt a

b = sqrt (2);
# ans =  1.4142
save -append w13.txt b

c = 5; d = sqrt (c);
save -append w13.txt d

save -append w13.txt
end

test12