SABER
bump_main.cc
Go to the documentation of this file.
1
/*!----------------------------------------------------------------------
2
main: bump_main
3
Purpose: command line arguments parsing and call to the BUMP library
4
Author: Benjamin Menetrier
5
Licensing: this code is distributed under the CeCILL-C license
6
Copyright © 2015-... UCAR, CERFACS, METEO-FRANCE and IRIT
7
----------------------------------------------------------------------*/
8
9
#include <string.h>
10
11
#include "eckit/runtime/Main.h"
12
13
extern
"C"
{
14
void
bump_main_f90
(
const
int
&,
const
char
*,
const
int
&,
const
char
*);
15
}
16
17
int
main
(
int
argc,
char
** argv) {
18
if
(argc != 3)
return
1;
19
eckit::Main::initialise(argc, argv);
20
int
n1 = strlen(argv[1]);
21
int
n2 = strlen(argv[2]);
22
bump_main_f90
(n1, argv[1], n2, argv[2]);
23
return
0;
24
}
main
int main(int argc, char **argv)
Definition:
bump_main.cc:17
bump_main_f90
void bump_main_f90(const int &, const char *, const int &, const char *)
fv3-bundle
saber
test
mains
bump_main.cc
Generated on Sun Oct 25 2020 09:22:31 for SABER by
1.8.18