[MITgcm-support] Can't compile diagnostics_ini_io.F

[gael forget]

Hi Jody, 
not sure if this will help but the error message would seem to suggest that DIAGNOSTICS.h, where 
diagMdsDir and diagMdsDirCreate are now defined, may not have been updated accordingly. 
Cheers,
Gael

On Mar 6, 2017, at 12:47 PM, Jody Klymak <jklymak at uvic.ca> wrote:

> Hi all,
> 
> There have been some changes to the diagnostics package since checkpoint 66c (?) that don’t compile on macOS brew-insstalled gfortran setup.  
> 
> Is it my genmake that is bad, or is the code assuming something that doesn’t work for me? 66b compiles with the same genmake...
> 
> Thanks,   Jody
> 
> <Makefile>
> 
> ```
> valdez:build jklymak$ make
> Update AD_CONFIG.h and make ./mitgcmuv
> make -f Makefile ./mitgcmuv
> cat diagnostics_ini_io.F |  /usr/local/bin/cpp -traditional -P -DWORDLENGTH=4 -DALWAYS_USE_MPI -DALLOW_USE_MPI -DHAVE_SYSTEM -DHAVE_FDATE -DHAVE_ETIME_SBR -DHAVE_CLOC -DHAVE_SETRLSTK -DHAVE_STAT -DHAVE_NETCDF -DHAVE_FLUSH  -I.  | /Users/jklymak/Dropbox/MITgcmCVS/MITgcm/tools/set64bitConst.sh  > diagnostics_ini_io.for
> mpif90 -Wunused -Wuninitialized  -O3 -funroll-loops -ftree-vectorize -ffpe-trap=invalid  -c diagnostics_ini_io.for
> diagnostics_ini_io.for:2038:47:
> 
>        IF ( iL.LT.MAX_LEN_FNAM .AND. diagMdsDir(iL:iL).NE.'/' ) THEN
>                                               1
> Error: Syntax error in IF-expression at (1)
> diagnostics_ini_io.for:2039:8:
> 
>         namBuf(1:iL) = diagMdsDir(1:iL)
>        1
> Error: Unclassifiable statement at (1)
> diagnostics_ini_io.for:2040:24:
> 
>         WRITE(diagMdsDir(1:iL+1),'(2A)') namBuf(1:iL),'/'
>                        1
> Error: Syntax error in WRITE statement at (1)
> diagnostics_ini_io.for:2044:52:
> 
>        WRITE(namBuf,'(3A)') ' mkdir -p ', diagMdsDir(1:iL), ' '
>                                                    1
> Error: Syntax error in WRITE statement at (1)
> diagnostics_ini_io.for:2054:9:
> 
>       ENDIF
>         1
> Error: Expecting END SUBROUTINE statement at (1)
> diagnostics_ini_io.for:2034:37:
> 
>       IF ( diag_mdsio.AND.(diagMdsDir.NE.' ').AND.
>                                     1
> Error: Symbol 'diagmdsdir' at (1) has no IMPLICIT type
> diagnostics_ini_io.for:2035:27:
> 
>      &     diagMdsDirCreate.AND.(mdsioLocalDir.EQ.' ') ) THEN
>                           1
> Error: Symbol 'diagmdsdircreate' at (1) has no IMPLICIT type
> make[1]: *** [diagnostics_ini_io.o] Error 1
> make: *** [fwd_exe_target] Error 2
> ```
> 
> --
> Jody Klymak    
> http://web.uvic.ca/~jklymak/
> 
> 
> 
> 
> 
> _______________________________________________
> MITgcm-support mailing list
> MITgcm-support at mitgcm.org
> http://mitgcm.org/mailman/listinfo/mitgcm-support

-------------- next part --------------
A non-text attachment was scrubbed...
Name: smime.p7s
Type: application/pkcs7-signature
Size: 1843 bytes
Desc: not available
URL: <http://mitgcm.org/pipermail/mitgcm-support/attachments/20170306/260242e2/attachment.p7s>