Workspace_negated()

Called by the generic function -x when x is of type Workspace.

WORKSPACE_NEGATED() w1=Workspace -w

Workspace_negated

The default procedure definition and the calculation of errors for this procedure is shown below.

PROCEDURE workspace_negated; PARAMETERS w1=workspace; RESULT wres
	wres=w1
	wres.y = -w1.y
ENDPROCEDURE