MODULE YOMTNEWT

!     ------------------------------------------------------------------

!*     Global arrays and variables for the truncated Newton algorithm

!         LIDMODEL = .true. => Replace tl-model by identity operator

!     ------------------------------------------------------------------

IMPLICIT NONE

SAVE

LOGICAL :: LIDMODEL

END MODULE YOMTNEWT
