mirror of
https://github.com/lcn2/calc.git
synced 2025-08-16 01:03:29 +03:00
133 lines
4.2 KiB
Plaintext
133 lines
4.2 KiB
Plaintext
NAME
|
|
g2gms - convert gradians into gradians, minutes, and seconds
|
|
|
|
SYNOPSIS
|
|
g2gms(grads, g, m, s [,rnd])
|
|
|
|
TYPES
|
|
grads real
|
|
g null-or-real-valued lvalue with assign-to permission
|
|
m null-or-real-valued lvalue with assign-to permission
|
|
s null-or-real-valued lvalue with assign-to permission
|
|
rnd nonnegative integer, defaults to config("mod")
|
|
|
|
return mod(grads, 400, rnd)
|
|
|
|
DESCRIPTION
|
|
Convert grads gradians into g gradians, m minutes, and s seconds.
|
|
|
|
The return value is a normalized number of gradians, and is equivalent
|
|
to the following:
|
|
|
|
return_value = mod(grads, 400, rnd);
|
|
|
|
The argument rnd, if not given, defaults to config("mod").
|
|
For more information on the effects of rnd, see "help mod".
|
|
|
|
Depending on the rounding mode, the return could be a real value
|
|
in the interval [0, 400) or a real value in the interval (-400, 0].
|
|
For the default round mode, the return value is in the interval [0, 400).
|
|
|
|
The g argument will be an integer number of gradians.
|
|
|
|
The value g will be set as if the following were used:
|
|
|
|
g = int(return_value);
|
|
|
|
For some rounding modes, g will be an integer in the interval [0, 400).
|
|
For other rounding modes, g will be an integer in the interval (-400, 0].
|
|
For the default round mode, g is in the interval [0, 400).
|
|
|
|
The m argument will be an integer number of minutes.
|
|
|
|
The value m will be set as if the following were used:
|
|
|
|
tmp = return_value - g;
|
|
tmp_m = tmp * 60;
|
|
free(tmp);
|
|
m = int(tmp_m);
|
|
|
|
For some rounding modes, m will be an integer in the interval [0, 60).
|
|
For other rounding modes, m will be an integer in the interval (-60, 0].
|
|
For the default round mode, m will be in the interval [0, 60).
|
|
|
|
The s argument will be a real number of seconds.
|
|
|
|
The value s will be set as if the following were used:
|
|
|
|
tmp = tmp_m - m;
|
|
free(tmp_m);
|
|
s = tmp * 60;
|
|
free(tmp);
|
|
|
|
For some rounding modes, s will be a real value in the interval [0, 60).
|
|
For other rounding modes, s will be a real value in the interval (-60, 0].
|
|
For the default round mode, s will be in the interval [0, 60).
|
|
|
|
The following shows relationship between the return value and the resulting
|
|
g, m, and s values:
|
|
|
|
return_value == g + m/60 + s/3600;
|
|
|
|
|
|
EXAMPLE
|
|
/* if args are undefined, pre-declare them or assign them as args */
|
|
|
|
; global g, m, s;
|
|
|
|
; print g2gms(12.3456,g,m,s), g, m, s;
|
|
12.3456 12 20 44.16
|
|
; print g2gms(1234.5678,g,m,s), g, m, s;
|
|
34.5678 34 34 4.08
|
|
; print g2gms(-1234.5678,g,m,s), g, m, s;
|
|
365.4322 365 25 55.92
|
|
|
|
; print g2gms(654.321,grad=,min=,sec=), grad, min, sec;
|
|
254.321 254 19 15.6
|
|
; print g2gms(-654.321,grad=,min=,sec=), grad, min, sec;
|
|
145.679 145 40 44.4
|
|
; print g2gms(400.321,grad=,min=,sec=), grad, min, sec;
|
|
0.321 0 19 15.6
|
|
|
|
/* certain non-default rounding modes can return negative values */
|
|
|
|
; print g2gms(654.321,grad=,min=,sec=,1), grad, min, sec;
|
|
-145.679 -145 -40 -44.4
|
|
; print g2gms(-654.321,grad=,min=,sec=,1), grad, min, sec;
|
|
-254.321 -254 -19 -15.6
|
|
; print g2gms(400.321,grad=,min=,sec=,1), grad, min, sec;
|
|
-399.679 -399 -40 -44.4
|
|
|
|
|
|
LIMITS
|
|
none
|
|
|
|
LINK LIBRARY
|
|
none
|
|
|
|
SEE ALSO
|
|
config, d2dm, d2dms, dm2d, dms2d, g2gm, gm2g, gms2g,
|
|
h2hm, h2hms, hm2d, hms2d, mod
|
|
|
|
## Copyright (C) 2021 Landon Curt Noll
|
|
##
|
|
## Calc is open software; you can redistribute it and/or modify it under
|
|
## the terms of the version 2.1 of the GNU Lesser General Public License
|
|
## as published by the Free Software Foundation.
|
|
##
|
|
## Calc is distributed in the hope that it will be useful, but WITHOUT
|
|
## ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
|
|
## or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General
|
|
## Public License for more details.
|
|
##
|
|
## A copy of version 2.1 of the GNU Lesser General Public License is
|
|
## distributed with calc under the filename COPYING-LGPL. You should have
|
|
## received a copy with calc; if not, write to Free Software Foundation, Inc.
|
|
## 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
|
|
##
|
|
## Under source code control: 2021/09/25 17:24:51
|
|
## File existed as early as: 2021
|
|
##
|
|
## chongo <was here> /\oo/\ http://www.isthe.com/chongo/
|
|
## Share and enjoy! :-) http://www.isthe.com/chongo/tech/comp/calc/
|