IF (useMNC .AND. monitor_mnc) THEN
IF (useMNC) THEN
IF (useMNC .AND. PTRACERS_monitor_mnc) mon_write_mnc = .TRUE.
PTRACERS_timeave_mnc = timeave_mnc .AND. useMNC
PTRACERS_snapshot_mnc = snapshot_mnc .AND. useMNC
PTRACERS_monitor_mnc = monitor_mnc .AND. useMNC
PTRACERS_pickup_write_mnc = pickup_write_mnc .AND. useMNC
PTRACERS_pickup_read_mnc = pickup_read_mnc .AND. useMNC
& PTRACERS_timeave_mnc .AND. useMNC
& PTRACERS_snapshot_mnc .AND. useMNC
& PTRACERS_monitor_mnc .AND. useMNC .AND. monitor_mnc
& PTRACERS_pickup_write_mnc .AND. useMNC
& PTRACERS_pickup_read_mnc .AND. useMNC
IF (useMNC .AND. SHELFICE_tave_mnc) THEN
IF ( useMNC .AND. SHELFICE_dump_mnc ) THEN
IF ( useMNC .AND. (shelfice_tave_mnc.OR.shelfice_dump_mnc)
LOGICAL useMNC
& usefizhi, usegridalt, useDiagnostics, useMNC,
GM_MNC = GM_MNC .AND. useMNC
GM_MNC = useMNC
IF (useMNC .AND. diag_mnc) THEN
diag_mnc = useMNC
diag_mnc = diag_mnc .AND. useMNC
diagSt_mnc = diagSt_mnc .AND. useMNC
IF ( useMNC .AND. aim_snapshot_mnc ) THEN
IF (useMNC .AND. aim_timeave_mnc) THEN
aim_timeave_mnc = timeave_mnc .AND. useMNC
aim_snapshot_mnc = snapshot_mnc .AND. useMNC
aim_pickup_write_mnc = pickup_write_mnc .AND. useMNC
aim_pickup_read_mnc = pickup_read_mnc .AND. useMNC
& aim_timeave_mnc .AND. useMNC
& aim_snapshot_mnc .AND. useMNC
& aim_pickup_write_mnc .AND. useMNC
& aim_pickup_read_mnc .AND. useMNC
print *, 'ph-mnc in addummy param ', useMNC
IF (useMNC .AND. autodiff_mnc) THEN
IF ( useMNC ) THEN
IF (useMNC.AND. pickup_write_mnc) THEN
IF ( useMNC .and. fizhi_mnc_read_pickup ) THEN
if (useMNC) then
IF (useMNC .AND. pickup_write_mnc) THEN
IF (useMNC .AND. pickup_read_mnc) THEN
IF ( useMNC .AND. writegrid_mnc ) THEN
ASKPARAML = useMNC
IF (useMNC .AND. snapshot_mnc) THEN
useMNC =.FALSE.
& useMNC,
IF (useMNC .AND. readgrid_mnc) THEN
IF (KPPwriteState .AND. useMNC .AND. snapshot_mnc) THEN
IF (KPPwriteState .AND. useMNC .AND. timeave_mnc) THEN
MYPA_MNC = useMNC
MYPA_MNC = MYPA_MNC .AND. useMNC
IF ( useMNC.AND.timeave_mnc ) THEN
IF (useMNC .AND. timeave_mnc) THEN
IF (useMNC .AND. mon_write_mnc) THEN
IF (useMNC .AND. cpl_timeave_mnc) THEN
IF (useMNC .AND. thSIce_mon_mnc) THEN
IF ( useMNC .AND. thSIce_tave_mnc ) THEN
IF (useMNC .AND. snapshot_mnc .AND. writeDiag) THEN
IF ( useMNC .AND. land_mon_mnc ) THEN
land_timeave_mnc = timeave_mnc .AND. useMNC
land_snapshot_mnc = snapshot_mnc .AND. useMNC
land_mon_mnc = monitor_mnc .AND. useMNC
land_pickup_write_mnc = pickup_write_mnc .AND. useMNC
land_pickup_read_mnc = pickup_read_mnc .AND. useMNC
land_timeave_mnc = useMNC .AND. land_timeave_mnc
land_snapshot_mnc = useMNC .AND. land_snapshot_mnc
land_mon_mnc = useMNC .AND. land_mon_mnc
land_pickup_write_mnc = useMNC .AND. land_pickup_write_mnc
land_pickup_read_mnc = useMNC .AND. land_pickup_read_mnc
IF ( useMNC .AND. SEAICE_dump_mnc ) THEN
IF (useMNC .AND. SEAICE_tave_mnc) THEN
IF ( useMNC .AND.
IF (useMNC .AND. SEAICE_mon_mnc) THEN