Called by the generic function Cos(x) when x is of type Workspace.
WORKSPACE_COS() | w1=Workspace | cos(w) |
The default procedure definition and the calculation of errors for this procedure is shown below.
PROCEDURE workspace_cos; PARAMETERS w1=workspace; RESULT wres wres = w1 wres.y = cos(w1.y) wres.e = abs( sin(w1.y) * w1.e ) ENDPROCEDURE