demos/fortran_sum.dem.sce


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16

//
// This file is released under the 3-clause BSD license. See COPYING-BSD.

function demo_fortran_sum()

    mode(-1);
    lines(0);

    disp("fortran_sum(3,4)");
    disp(fortran_sum(3,4));

endfunction

demo_fortran_sum();
clear demo_fortran_sum;