1 # This file is part of NIT ( http://www.nitlanguage.org ).
3 # Copyright 2004-2008 Jean Privat <jean@pryen.org>
5 # Licensed under the Apache License, Version 2.0 (the "License");
6 # you may not use this file except in compliance with the License.
7 # You may obtain a copy of the License at
9 # http://www.apache.org/licenses/LICENSE-2.0
11 # Unless required by applicable law or agreed to in writing, software
12 # distributed under the License is distributed on an "AS IS" BASIS,
13 # WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
14 # See the License for the specific language governing permissions and
15 # limitations under the License.
17 # A procedural program (without explicit class definition).
18 # This program manipulates arrays of integers.
19 package procedural_array
21 # The sum of the elements of `a'.
22 # Uses a 'for' control structure.
23 fun array_sum
(a
: Array[Int]): Int
32 # The sum of the elements of `a' (alternative version).
33 # Uses a 'while' control structure.
34 fun array_sum_alt
(a
: Array[Int]): Int
45 # The main part of the program.
48 print
(array_sum_alt
(a
))