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.
! Determine simulation start time
ierr = 0
CALL nl_get_simulation_start_year ( 1 , simulation_start_year )
CALL nl_get_simulation_start_month ( 1 , simulation_start_month )
CALL nl_get_simulation_start_day ( 1 , simulation_start_day )
CALL nl_get_simulation_start_hour ( 1 , simulation_start_hour )
CALL nl_get_simulation_start_minute ( 1 , simulation_start_minute )
CALL nl_get_simulation_start_second ( 1 , simulation_start_second )
WRITE ( simulation_start_date , FMT = '(I4.4,"-",I2.2,"-",I2.2,"_",I2.2,":",I2.2,":",I2.2)' ) &
simulation_start_year,simulation_start_month,simulation_start_day,simulation_start_hour, &
simulation_start_minute,simulation_start_second
! WRITE(message,*)'wrf_timeseries: SIMULATION_START_DATE = ',simulation_start_date(1:19)
! CALL wrf_debug ( 0, TRIM( message ) )
grid%ts_qnccn_profile(n,i,k) = moist(ix,k,iy,p_qnn)
I changed the Registry.EM_COMMON and wrf_timeseries.F files.state real rimi ikj misc 1 - irh "RIMI" "riming intensity" "fraction"
wrf_timeseries.f90:428:69:
grid%ts_rimi_profile(n,i,k) = grid%moist(ix,k,iy,p_rimi)
1
Error: Symbol ‘p_rimi’ at (1) has no IMPLICIT type