2013-03-25 12:04:10 +00:00
|
|
|
#!/bin/sh
|
2015-01-05 15:45:46 +00:00
|
|
|
# Copyright 2005-2015 ECMWF.
|
2013-03-25 12:04:10 +00:00
|
|
|
#
|
|
|
|
|
# This software is licensed under the terms of the Apache Licence Version 2.0
|
|
|
|
|
# which can be obtained at http://www.apache.org/licenses/LICENSE-2.0.
|
2013-03-25 14:23:07 +00:00
|
|
|
#
|
2013-03-25 12:04:10 +00:00
|
|
|
# In applying this licence, ECMWF does not waive the privileges and immunities granted to it by
|
|
|
|
|
# virtue of its status as an intergovernmental organisation nor does it submit to any jurisdiction.
|
2013-03-25 14:23:07 +00:00
|
|
|
#
|
2013-03-25 12:04:10 +00:00
|
|
|
same=`./same_int_long`
|
|
|
|
|
|
|
|
|
|
if [ $same -eq 1 ]
|
|
|
|
|
then
|
2013-06-28 17:52:17 +00:00
|
|
|
long=grib_f90_int.f90
|
2013-03-25 12:04:10 +00:00
|
|
|
else
|
2013-06-28 17:52:17 +00:00
|
|
|
long=grib_f90_long_int.f90
|
2013-03-25 12:04:10 +00:00
|
|
|
fi
|
2013-06-28 17:52:17 +00:00
|
|
|
|
|
|
|
|
same=`./same_int_size_t`
|
|
|
|
|
|
|
|
|
|
if [ $same -eq 1 ]
|
|
|
|
|
then
|
|
|
|
|
sizet=grib_f90_int_size_t.f90
|
|
|
|
|
else
|
|
|
|
|
sizet=grib_f90_long_size_t.f90
|
|
|
|
|
fi
|
|
|
|
|
|
|
|
|
|
cat grib_f90_head.f90 $long $sizet grib_f90_tail.f90 > grib_f90.f90
|
2013-03-25 12:04:10 +00:00
|
|
|
|
