This post was from a previous version of the WRF&MPAS-A Support Forum. New replies have been disabled and if you have follow up questions related to this post, then please start a new thread from the forum home page.
Ming Chen said:Would you please give me more information about this case, like the namelist.input and how you initialize the plume. The plot is for domain 2, I guess?
IF (config_flags%tracer_opt .eq. 2) THEN
DO j = (jde + jds)/2, (jde + jds)/2, 1
DO i = 3*(ide + ids)/4, 3*(ide + ids)/4, 1
IF ( its .LE. i .and. ite .GE. i .and. jts .LE. j .and. jte .GE. j ) THEN
tracer(i, 1, j, P_tr17_1) = 0.
! tracer(i, 1, j, P_tr17_2) = 1.
! tracer(i, 1, j, P_tr17_3) = 1.
! tracer(i, 1, j, P_tr17_4) = 1.
! tracer(i, 1, j, P_tr17_5) = 1.
! tracer(i, 1, j, P_tr17_6) = 1.
! tracer(i, 1, j, P_tr17_7) = 1.
! tracer(i, 1, j, P_tr17_8) = 1.
END IF
END DO
END DO
END IF
IF (config_flags%tracer_opt .eq. 2) THEN
DO j = (jde + jds)/2, (jde + jds)/2, 1
DO i = 3*(ide + ids)/4, 3*(ide + ids)/4, 1
IF ( ips .LE. i .and. ipe .GE. i .and. jps .LE. j .and. jpe .GE. j ) THEN
tracer(i, 1, j, P_tr17_1) = 1.
! tracer(i, 1, j, P_tr17_2) = 1.
! tracer(i, 1, j, P_tr17_3) = 1.
! tracer(i, 1, j, P_tr17_4) = 1.
! tracer(i, 1, j, P_tr17_5) = 1.
! tracer(i, 1, j, P_tr17_6) = 1.
! tracer(i, 1, j, P_tr17_7) = 1.
! tracer(i, 1, j, P_tr17_8) = 1.
END IF
END DO
END DO
END IF