/* inlining functions, and passing them to other functions.
   Can't have function pointers like you can in C in Java.

   Must create an interface, then instantiate the interface at
   run time.
*/


interface function   // too bad, can't parametrize interface with type
{
   int f(int x);
}


public class inline
{

    // function to apply a "function" object to each element of an int array:
    public static void map(int[] A, function fun)
    {
	for(int i=0;i<A.length;i++) A[i] = fun.f(A[i]);
    }


    public static void main(String[] args)
    {
	function f1, f2;
	
	f1 = new function()
	 {
	      public int f(int x) { return x+x; }
	 };

	f2 = new function()
	 {
	      public int f(int x) { return x*x; }	      
	 };
	

        int[] A = {1,2,3,4,5};
	map(A,f2);
        for(int i=0;i<A.length;i++) System.out.print(A[i]+" ");
	System.out.println("");
	map(A,f1);
        for(int i=0;i<A.length;i++) System.out.print(A[i]+" ");
	System.out.println("");

    } // main
} // class inline


/*

    in Scheme, you can pass functions much more easily:

    here, map is for linked lists;

    (define (map l f)  ; l is list, f is lambda term
       (if (null? l) l (cons (f (car l)) (map (cdr l) f))))

    (map '(1 2 3 4) (lambda (x) (+ x x)))

    (map '(1 2 3 4) (lambda (x) (* x x)))

   
*/