Workspace_sqrt()

Called by the generic function Sqrt(x) when x is of type Workspace.

WORKSPACE_SQRT() w1=Workspace sqrt(w)

Workspace_sqrt

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

PROCEDURE workspace_sqrt; PARAMETERS w1=workspace; RESULT wres
	wres = w1
	wres.y = sqrt(w1.y)
	wres.e = w1.e / (2.0 * wres.y)
ENDPROCEDURE