|
|
|
|
|
|
|
| ☜ | $%CLOGDraft MDC Standard | ☞ | ||||
CLOG(Z,PREC) ; New ABS,ARG,ZIM,ZRE Set PREC=$Get(PREC,11) Set ABS=$%CABS^MATH(Z) Set ZRE=+Z,ZIM=+$Piece(Z,"%",2) Set ARG=$%ARCTAN^MATH(ZIM/ZRE,PREC) Quit $%LOG^MATH(ABS,PREC)_"%"_ARG
|
|
|
|
|
|
|
Copyright © Standard Documents; 1977-2024 MUMPS Development Committee;
Copyright © Examples: 1995-2024 Ed de Moel;
Copyright © Annotations: 2003-2008 Jacquard Systems Research
Copyright © Annotations: 2008-2024 Ed de Moel.
Some specifications are "approved for inclusion in a future standard". Note that the MUMPS Development Committee cannot guarantee that such future standards will indeed be published.
This page most recently updated on 30-Nov-2011, 20:01:21.
For comments, contact Ed de Moel (demoel@jacquardsystems.com)