scanl1

one of the documented procedures in this installation of the ACS

Usage:

scanl1 f xs

What it does:

takes a binary function f and a list {x1 x2 x3 ...} and returns {x1 (f x1 x2) (f (f x1 x2) x3) ...}

Defined in: /web/philip/tcl/ad-functional.tcl

Source code:


    if { [null_p $xs] } {
	error "ERROR: scanl1 is undefined for empty lists."
    } else { 
	scanl $f [head $xs] [tail $xs]
    }