GRASS GIS 8 Programmer's Manual
8.3.2(2024)-exported
Loading...
Searching...
No Matches
xshiftr.c
Go to the documentation of this file.
1
#include <grass/gis.h>
2
#include <grass/raster.h>
3
#include <grass/calc.h>
4
5
/****************************************************************
6
shiftr(a,b) = a >> b
7
****************************************************************/
8
9
int
f_shiftr
(
int
argc,
const
int
*argt,
void
**args)
10
{
11
CELL *res = args[0];
12
CELL *arg1 = args[1];
13
CELL *arg2 = args[2];
14
int
i;
15
16
if
(argc < 2)
17
return
E_ARG_LO;
18
if
(argc > 2)
19
return
E_ARG_HI;
20
21
if
(argt[1] != CELL_TYPE || argt[2] != CELL_TYPE)
22
return
E_ARG_TYPE;
23
24
if
(argt[0] != CELL_TYPE)
25
return
E_RES_TYPE;
26
27
for
(i = 0; i <
columns
; i++) {
28
if
(IS_NULL_C(&arg1[i]) || IS_NULL_C(&arg2[i]))
29
SET_NULL_C(&res[i]);
30
else
31
res[i] = arg1[i] >> arg2[i];
32
}
33
34
return
0;
35
}
columns
int columns
Definition
calc.c:11
f_shiftr
int f_shiftr(int argc, const int *argt, void **args)
Definition
xshiftr.c:9
calc
xshiftr.c
Generated on Fri May 24 2024 09:06:59 for GRASS GIS 8 Programmer's Manual by
1.9.8