Opened 8 years ago
Closed 8 years ago
#189 closed defect (fixed)
thermosoil_readjust must be called only if ok_freeze_thermix is active
Reported by: | ajornet | Owned by: | somebody |
---|---|---|---|
Priority: | major | Milestone: | |
Component: | Physical processes | Version: | trunc |
Keywords: | Cc: |
Description
thermosoil_readjust must be called only when ok_freeze_thermix is active. This is due to pcappa_supp that is used within the subroutine. Otherwise there is an exception.
Regarding thermosoil, pcappa_supp is only initialized when:
IF (ok_freeze_thermix) THEN ALLOCATE (pcappa_supp(kjpindex,ngrnd,nvm),stat=ier) IF (ier /= 0) CALL ipslerr_p(3,'thermosoil_initialize', 'Error in allocation of pcapa_supp','','') END IF
Proposed solution: [2782] (changeset)
Change History (2)
comment:1 Changed 8 years ago by jgipsl
comment:2 Changed 8 years ago by jgipsl
- Resolution set to fixed
- Status changed from new to closed
Note: See
TracTickets for help on using
tickets.
OK_ECORR can not be activated without having ok_freeze_thermix=y. Add a stop in the model if ok_ecorr is activated without ok_freeze_thermix. Done in the trunk rev [2896].