diff --git a/src/common/turb/turb.F90 b/src/common/turb/turb.F90 index 2ddae8f94cc25f6637df8af80fd1e25618883456..38c17000f4efe4a59611a5c61b64019227531264 100644 --- a/src/common/turb/turb.F90 +++ b/src/common/turb/turb.F90 @@ -1247,28 +1247,6 @@ END IF IF(PRESENT(PLEM)) PLEM = ZLM !---------------------------------------------------------------------------- ! - -print*,"PTHLT = ",MINVAL(PTHLT),MAXVAL(PTHLT) -print*," PRT = ",MINVAL(PRT),MAXVAL(PRT) -print*," PRUS = ",MINVAL(PRUS),MAXVAL(PRUS) -print*," PRVS = ",MINVAL(PRVS),MAXVAL(PRVS) -print*," PRWS = ",MINVAL(PRWS),MAXVAL(PRWS) -print*," PRTHLS = ",MINVAL(PRTHLS),MAXVAL(PRTHLS) -print*," PRTKES = ",MINVAL(PRTKES),MAXVAL(PRTKES) -print*," PRRS = ",MINVAL(PRRS),MAXVAL(PRRS) -print*," PRSVS = ",MINVAL(PRSVS),MAXVAL(PRSVS) -print*," PSIGS = ",MINVAL(PSIGS),MAXVAL(PSIGS) -print*," PWTH = ",MINVAL(PWTH),MAXVAL(PWTH) -print*," PWRC = ",MINVAL(PWRC),MAXVAL(PWRC) -print*," PWSV = ",MINVAL(PWSV),MAXVAL(PWSV) -print*," PTP = ",MINVAL(PTP),MAXVAL(PTP) -print*," PTPMF = ",MINVAL(PTPMF),MAXVAL(PTPMF) -print*," PDP = ",MINVAL(PDP),MAXVAL(PDP) -print*," PTDIFF = ",MINVAL(PTDIFF),MAXVAL(PTDIFF) -print*," PTDISS = ",MINVAL(PTDISS),MAXVAL(PTDISS) - - - IF (LHOOK) CALL DR_HOOK('TURB',1,ZHOOK_HANDLE) CONTAINS !