LOGICAL diag_mdsio, diag_mnc, useMissingValue
& diag_mdsio, diag_mnc, useMissingValue
IF ( useMissingValue .AND. .NOT. diag_mnc ) THEN
IF ( diag_mnc.AND.(diagMdsDir.NE.' ') ) THEN
IF (useMNC .AND. diag_mnc) THEN
diag_mnc = useMNC
diag_mnc = diag_mnc .AND. useMNC
diagSt_mnc = diag_mnc
diag_mnc = .FALSE.
diag_mdsio = (.NOT. diag_mnc) .OR. outputTypesInclusive
diag_pickup_read_mnc = diag_pickup_read_mnc .AND. diag_mnc
diag_pickup_write_mnc = diag_pickup_write_mnc .AND. diag_mnc
CALL WRITE_0D_L( diag_mnc, INDEX_NONE,
& dumpAtLast, diag_mnc, useMissingValue,