# Ohjelma/Aliohjelma Osub1.m
function [a,b,summa]=koe(a,b)# 
summa=a+b ; erotus=a-b ;     # 
a=a-9     ; # Input muutos   #
endfunction                  #
# __________________________ #
# Kokeilu 1                  #
a=1 ; b=2 ; c=koe(a,b);      #
# __________________________ #
# Kokeilu 2                  #
#a=1 ; b=2 ; [a,b,c]=koe(a,b);#
# __________________________ #
printf("a=%3.1f b=%3.1f c=%3.1f\n",a,b,c)
printf("class(c) = %3.1f\n",c)
# __________________________ #
# Kokeilu 3                  #
#disp(erotus) # Ei output!    #