Compile error when undefine EMINUSP and define ICE_THERMO

Bug reports, work arounds and fixes

Moderators: arango, robertson

Post Reply
Message
Author
remy
Posts: 2
Joined: Tue Jan 23, 2018 3:24 pm
Location: ECNU-SKLEC

Compile error when undefine EMINUSP and define ICE_THERMO

#1 Post by remy » Thu Feb 22, 2018 12:36 pm

These error present in coawst[version 1225],and I find same code in roms-ice[kate_svn].

Code: Select all

#undefine EMINUSP
#define ICE_MODEL
#define ICE_THERMO

bulk_flux.f90(932): error #6634: The shape matching rules of actual arguments and dummy arguments have been violated.   [EMINUSP]
     &                    evap, EminusP,                                &
--------------------------------^
I modified bulk_flux.F in this way,then compile and run case successfully.

Code: Select all

# if defined EMINUSP || (defined ICE_MODEL && defined ICE_THERMO)
=>
# if defined EMINUSP || (defined ICE_MODEL && defined ICE_THERMO && defined EMINUSP)
Is it correct?

User avatar
kate
Posts: 3704
Joined: Wed Jul 02, 2003 5:29 pm
Location: IMS/UAF, USA

Re: Compile error when undefine EMINUSP and define ICE_THERM

#2 Post by kate » Thu Feb 22, 2018 4:06 pm

Which boils down to simply:

Code: Select all

#ifdef EMINUSP
Frankly, I have not used regular bulk_flux.F since we put in the ccsm_flux.F with the Large and Yeager scheme.

Post Reply