1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23
|
AUthor: Alastair McKinstry <mckinstry@debian.org>
Description: Fix compile error on gfortran 7.2 with different sized-strings
Last-Updated: 2017-12-13
Forwarded: no
Index: cdftools-3.0.2/src/modcdfnames_CMIP6.h90
===================================================================
--- cdftools-3.0.2.orig/src/modcdfnames_CMIP6.h90
+++ cdftools-3.0.2/src/modcdfnames_CMIP6.h90
@@ -155,11 +155,11 @@
INTEGER(KIND=4) :: nn_sqdvar = 4
INTEGER(KIND=4), PRIVATE :: ji
CHARACTER(LEN=15), DIMENSION(jp_sqdvarmax) :: cn_sqdvar = &
- & (/'uo','vo','wo','zos',(' ', ji=jp_sqdvarmax-5,jp_sqdvarmax) /)
+ & (/'uo ','vo ','wo ','zos',(' ', ji=jp_sqdvarmax-5,jp_sqdvarmax) /)
! variables eligible for 3rd moment computation when performing cdfmoy
INTEGER(KIND=4), PARAMETER :: jp_cubvarmax=10
INTEGER(KIND=4) :: nn_cubvar = 2
CHARACTER(LEN=15), DIMENSION(jp_cubvarmax) :: cn_cubvar = &
- & (/'zos','thetao',(' ', ji=3,jp_cubvarmax) /)
+ & (/'zos ','thetao',(' ', ji=3,jp_cubvarmax) /)
|