ocean2pisces.F90 compatibility issues with new air-sea
Hi,
Respected sir/madam
I tried to compile croco-dev_2024_CPL_before_release branch
CPL+PISCES
without CPL keys it's able to compile.
almost all branches have this ocean2pisces.F90 file. except 141-new-pisces-version.
**And find this error **
mpiifort -c -O2 -mcmodel=medium -fno-alias -i4 -r8 -fp-model precise -I/home/20cl91p02/NEXTGEN/LIB_INSTALL/NETCDF4_HDF5/include -I/scratch/20cl91p02/NEXTGEN/CONFIG/load_balance/oasis3_mct_install/build/lib/psmile.MPI1 -I/scratch/20cl91p02/NEXTGEN/CONFIG/load_balance/oasis3_mct_install/build/lib/mct -I/home/20cl91p02/NEXTGEN/LIB_INSTALL/NETCDF4_HDF5/include ocean2pisces_.f90 -o ocean2pisces.o ocean2pisces_.f90(769): error #5082: Syntax error, found END-OF-STATEMENT when expecting one of: / // common /exchange_fields_oasis3/ srcv_clname,ssnd_clname, --------------------------------------------------------------^ ocean2pisces_.f90(770): error #5082: Syntax error, found '&' when expecting one of: ; TYPE MODULE ELEMENTAL IMPURE NON_RECURSIVE ... & srcv_nid ,ssnd_nid --------------------------------------^ ocean2pisces_.f90(770): error #6274: This statement must not appear in the specification part of a module. & srcv_nid ,ssnd_nid --------------------------------------^ ocean2pisces_.f90(772): error #6236: A specification statement cannot appear in the executable section. INTEGER :: oasis_time, oasis_runtime
and more
ocean2pisces_.f90(827): error #6404: This name does not have a type, and must have an explicit type. [ISTRP] Istrp = Istr ------^ ocean2pisces_.f90(828): error #6404: This name does not have a type, and must have an explicit type. [IENDP] Iendp = Iend ------^ ocean2pisces_.f90(829): error #6404: This name does not have a type, and must have an explicit type. [JSTRP] Jstrp = Jstr ------^ ocean2pisces_.f90(830): error #6404: This name does not have a type, and must have an explicit type. [JENDP] Jendp = Jend ------^ ocean2pisces_.f90(836): error #6410: This name has not been declared as an array or a function. [GDEPW_N] gdepw_n(i,j,N+2-k) = -(z_w(i,j,k-1)-z_w(i,j,N)) ---------------^
ocean2pisces_.f90(1752): catastrophic error: Too many errors, exiting
compilation aborted for ocean2pisces_.f90 (code 1) gmake: *** [ocean2pisces.o] Error 1
Thank you
Have a good day!