& PTRACERS_pickup_write_mnc, PTRACERS_pickup_read_mnc
CALL WRITE_0D_L( PTRACERS_pickup_write_mnc, INDEX_NONE,
PTRACERS_pickup_write_mnc = useMNC .AND. pickup_write_mnc
PTRACERS_pickup_write_mnc = .FALSE.
PTRACERS_pickup_write_mnc = useMNC .AND. PTRACERS_pickup_write_mnc
PTRACERS_pickup_write_mdsio = (.NOT. PTRACERS_pickup_write_mnc)
& PTRACERS_pickup_write_mnc,
IF ( useMNC .AND. PTRACERS_pickup_write_mnc ) THEN
IF ( PTRACERS_pickup_write_mnc ) THEN