ctrlSmoothCorrel2D = useSmoothCorrel2DinAdMode
& ctrlSmoothCorrel2D
ctrlSmoothCorrel2D = useSmoothCorrel2DinFwdMode
& ctrlSmoothCorrel2D,
logical ctrlSmoothCorrel2D, ctrlSmoothCorrel3D
IF ( ctrlSmoothCorrel2D ) THEN
IF ( .NOT.ctrlSmoothCorrel2D ) THEN
& doInitXX, ctrlSmoothCorrel3D, ctrlSmoothCorrel2D,
ctrlSmoothCorrel2D = .TRUE.
ctrlSmoothCorrel2D = .FALSE.
useSmoothCorrel2DinFwdMode = ctrlSmoothCorrel2D
& useSmoothCorrel2DinAdMode .AND. ctrlSmoothCorrel2D
&'ctrlSmoothCorrel2D: ',ctrlSmoothCorrel2D