Skip to content
Snippets Groups Projects
Commit 648e28cf authored by WAUTELET Philippe's avatar WAUTELET Philippe
Browse files

Philippe 13/09/2023: profilers: do computation only if profiler is locally present

parent bea94e76
No related branches found
No related tags found
No related merge requests found
......@@ -212,6 +212,8 @@ IF ( .NOT. TPROFILERS_TIME%STORESTEP_CHECK_AND_SET( IN ) ) RETURN !No profiler s
!* 8. DATA RECORDING
! --------------
!
IF ( NUMBPROFILER_LOC == 0 ) RETURN ! No profiler on this process
ZTEMP(:,:,:)=PTH(:,:,:)*(PP(:,:,:)/ XP00) **(XRD/XCPD)
! Theta_v
ZTHV(:,:,:) = PTH(:,:,:) / (1.+WATER_SUM(PR(:,:,:,:)))*(1.+PR(:,:,:,1)/ZRDSRV)
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment