From 009a602ebad0db69c40f46d3c6c857feed32cf30 Mon Sep 17 00:00:00 2001 From: Quentin Rodier <quentin.rodier@meteo.fr> Date: Fri, 11 Oct 2019 12:09:17 +0200 Subject: [PATCH] Philippe 11/10/2019: minor correction for ifort compiler v16.0.1 --- src/SURFEX/modd_netcdf_sfx.F90 | 6 ------ src/SURFEX/read_pgd_netcdf.F90 | 2 -- 2 files changed, 8 deletions(-) diff --git a/src/SURFEX/modd_netcdf_sfx.F90 b/src/SURFEX/modd_netcdf_sfx.F90 index 721560643..b619fccc5 100644 --- a/src/SURFEX/modd_netcdf_sfx.F90 +++ b/src/SURFEX/modd_netcdf_sfx.F90 @@ -5,14 +5,8 @@ ! Author: P. Wautelet 18/09/2019 module modd_netcdf_sfx -#ifdef SFX_MNH -use modd_netcdf, only: IDCDF_KIND -#endif - implicit none -#ifndef SFX_MNH integer, parameter :: IDCDF_KIND = selected_int_kind( 8 ) -#endif end module modd_netcdf_sfx diff --git a/src/SURFEX/read_pgd_netcdf.F90 b/src/SURFEX/read_pgd_netcdf.F90 index 5e417d049..56f052697 100644 --- a/src/SURFEX/read_pgd_netcdf.F90 +++ b/src/SURFEX/read_pgd_netcdf.F90 @@ -35,8 +35,6 @@ USE MODD_SURF_ATM_GRID_n, ONLY : SURF_ATM_GRID_t USE MODD_SURF_ATM_n, ONLY : SURF_ATM_t USE MODD_SSO_n, ONLY : SSO_t ! -USE MODE_READ_CDF, ONLY : IDCDF_KIND - USE MODI_ABOR1_SFX USE MODI_READ_AND_SEND_MPI -- GitLab