Gradient descent: Difference between revisions

Content added Content deleted
Line 62: Line 62:
BEGIN
BEGIN
[ LWB x : UPB x ]LONG REAL z;
[ LWB x : UPB x ]LONG REAL z;
[ LWB x : UPB x ]LONG REAL y := x[ AT 0 ];
[ LWB x : UPB x ]LONG REAL y := x;
LONG REAL g0 := g( x );
LONG REAL g0 := g( x );
FOR i FROM LWB x TO UPB x DO
FOR i FROM LWB x TO UPB x DO