IF ( optimcycle.NE.0 .AND. doMainUnpack ) THEN
IF ( ( optimcycle.EQ.0 .OR. (.NOT. doMainUnpack) )
IF ( ( optimcycle.EQ.0 .OR. (.NOT. doMainUnpack) ) ) THEN
& .AND. doMainUnpack ) THEN
& doMainUnpack, doMainPack, doAdmtlmBypassAD, delZexp
& doMainUnpack,
logical doMainUnpack
& doMainUnpack, doMainPack,
doMainUnpack = .TRUE.