Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
Menu
Open sidebar
mpim-sw
libcdi
Commits
2c3f18da
Commit
2c3f18da
authored
Nov 13, 2014
by
Thomas Jahns
🤸
Browse files
Partially revert previous change.
* This way CDI can still be built with pgcc 11.x.
parent
926115a5
Changes
3
Hide whitespace changes
Inline
Side-by-side
src/cdi.h
View file @
2c3f18da
...
...
@@ -785,7 +785,7 @@ void gridDefYbounds(int gridID, const double *ybounds_vec);
/* gridInqYbounds: Get the bounds of a Y-axis */
int
gridInqYbounds
(
int
gridID
,
double
*
ybounds_vec
);
void
gridDefRowlon
(
int
gridID
,
int
nrowlon
,
const
int
rowlon_vec
[
nrowlon
]);
void
gridDefRowlon
(
int
gridID
,
int
nrowlon
,
const
int
rowlon_vec
[]);
void
gridInqRowlon
(
int
gridID
,
int
*
rowlon_vec
);
void
gridChangeType
(
int
gridID
,
int
gridtype
);
...
...
src/grid.c
View file @
2c3f18da
...
...
@@ -1266,7 +1266,7 @@ int gridInqNP(int gridID)
@EndFunction
*/
void
gridDefRowlon
(
int
gridID
,
int
nrowlon
,
const
int
rowlon
[
nrowlon
])
void
gridDefRowlon
(
int
gridID
,
int
nrowlon
,
const
int
rowlon
[])
{
grid_t
*
gridptr
=
(
grid_t
*
)
reshGetVal
(
gridID
,
&
gridOps
);
...
...
src/mo_cdi.f90
View file @
2c3f18da
...
...
@@ -2116,7 +2116,7 @@ module mo_cdi
import
::
c_int
integer
(
kind
=
c_int
),
value
::
gridID
integer
(
kind
=
c_int
),
value
::
nrowlon
integer
(
kind
=
c_int
),
intent
(
in
),
dimension
(
nrowlon
)
::
rowlon_vec
integer
(
kind
=
c_int
),
intent
(
in
),
dimension
(
*
)
::
rowlon_vec
end
subroutine
gridDefRowlon
end
interface
interface
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment