# Kommenttirivi: Tama on octave ohjelmani Omalli9A.m
clear ; clc            # Poistetaan ... Tyhjennetaan ...
filename = 'OPmalli9.dat';
fid=fopen(filename,'r');
[x,nx]=fscanf(fid, '%s', [1,1]);
[y,ny]=fscanf(fid, '%s%s%s%s%s%s', [6,1]);
[z,nz]=fscanf(fid, '%g%g%g%g%g%g', [6,Inf]);
fclose(fid);
printf("x = %s,nx = %f\n",x,nx)         # Tarkistus
printf("y = %s,ny = %f\n",y,ny)         # Tarkistus
date=z(1,:);                            # 1 Sarake
printf("date = %f,%f,%f\n",date)        # Tarkistus
printf("class(date)= %s\n",class(date)) # Tarkistus
