SCALE-RM
Functions/Subroutines | Variables
mod_atmos_phy_bl_vars Module Reference

module atmosphere / physics / PBL More...

Functions/Subroutines

subroutine, public atmos_phy_bl_vars_setup
 Setup. More...
 
subroutine, public atmos_phy_bl_vars_finalize
 Finalize. More...
 
subroutine, public atmos_phy_bl_vars_fillhalo
 HALO Communication. More...
 
subroutine, public atmos_phy_bl_vars_restart_open
 Open restart file for read. More...
 
subroutine, public atmos_phy_bl_vars_restart_read
 Read restart. More...
 
subroutine, public atmos_phy_bl_vars_restart_create
 Create restart file. More...
 
subroutine, public atmos_phy_bl_vars_restart_enddef
 Exit netCDF define mode. More...
 
subroutine, public atmos_phy_bl_vars_restart_close
 Close restart file. More...
 
subroutine, public atmos_phy_bl_vars_restart_def_var
 Write restart. More...
 
subroutine, public atmos_phy_bl_vars_restart_write
 Write restart. More...
 
subroutine atmos_phy_bl_vars_check
 

Variables

integer, public qs
 
integer, public qe
 
logical, public atmos_phy_bl_restart_output = .false.
 output restart file? More...
 
character(len=h_long), public atmos_phy_bl_restart_in_basename = ''
 Basename of the input file. More...
 
logical, public atmos_phy_bl_restart_in_aggregate
 Switch to use aggregate file. More...
 
logical, public atmos_phy_bl_restart_in_postfix_timelabel = .false.
 Add timelabel to the basename of input file? More...
 
character(len=h_long), public atmos_phy_bl_restart_out_basename = ''
 Basename of the output file. More...
 
logical, public atmos_phy_bl_restart_out_aggregate
 Switch to use aggregate file. More...
 
logical, public atmos_phy_bl_restart_out_postfix_timelabel = .true.
 Add timelabel to the basename of output file? More...
 
character(len=h_mid), public atmos_phy_bl_restart_out_title = 'ATMOS_PHY_BL restart'
 title of the output file More...
 
character(len=h_short), public atmos_phy_bl_restart_out_dtype = 'DEFAULT'
 REAL4 or REAL8. More...
 
logical, public atmos_phy_bl_mix_tracers = .true.
 
real(rp), dimension(:,:,:), allocatable, public atmos_phy_bl_rhou_t
 
real(rp), dimension(:,:,:), allocatable, public atmos_phy_bl_rhov_t
 
real(rp), dimension(:,:,:), allocatable, public atmos_phy_bl_rhot_t
 
real(rp), dimension(:,:,:,:), allocatable, target, public atmos_phy_bl_rhoq_t
 
real(rp), dimension(:,:), allocatable, public atmos_phy_bl_zi
 
real(rp), dimension(:,:), allocatable, public atmos_phy_bl_sflx_buoy
 
real(rp), dimension(:,:,:), allocatable, public atmos_phy_bl_ql
 
real(rp), dimension(:,:,:), allocatable, public atmos_phy_bl_cldfrac
 

Detailed Description

module atmosphere / physics / PBL

Description
Container for mod_atmos_phy_bl
Author
Team SCALE
NAMELIST
  • PARAM_ATMOS_PHY_BL_VARS
    nametypedefault valuecomment
    ATMOS_PHY_BL_RESTART_IN_BASENAME character(len=H_LONG) '' Basename of the input file
    ATMOS_PHY_BL_RESTART_IN_AGGREGATE logical Switch to use aggregate file
    ATMOS_PHY_BL_RESTART_IN_POSTFIX_TIMELABEL logical .false. Add timelabel to the basename of input file?
    ATMOS_PHY_BL_RESTART_OUTPUT logical .false. output restart file?
    ATMOS_PHY_BL_RESTART_OUT_BASENAME character(len=H_LONG) '' Basename of the output file
    ATMOS_PHY_BL_RESTART_OUT_AGGREGATE logical Switch to use aggregate file
    ATMOS_PHY_BL_RESTART_OUT_POSTFIX_TIMELABEL logical .true. Add timelabel to the basename of output file?
    ATMOS_PHY_BL_RESTART_OUT_TITLE character(len=H_MID) 'ATMOS_PHY_BL restart' title of the output file
    ATMOS_PHY_BL_RESTART_OUT_DTYPE character(len=H_SHORT) 'DEFAULT' REAL4 or REAL8
    ATMOS_PHY_BL_MIX_TRACERS logical .true.

History Output
No history output

Function/Subroutine Documentation

◆ atmos_phy_bl_vars_setup()

subroutine, public mod_atmos_phy_bl_vars::atmos_phy_bl_vars_setup

Setup.

Definition at line 101 of file mod_atmos_phy_bl_vars.F90.

101  use scale_prc, only: &
102  prc_abort
103  use scale_const, only: &
104  undef => const_undef
105  implicit none
106 
107  namelist / param_atmos_phy_bl_vars / &
108  atmos_phy_bl_restart_in_basename, &
109  atmos_phy_bl_restart_in_aggregate, &
110  atmos_phy_bl_restart_in_postfix_timelabel, &
111  atmos_phy_bl_restart_output, &
112  atmos_phy_bl_restart_out_basename, &
113  atmos_phy_bl_restart_out_aggregate, &
114  atmos_phy_bl_restart_out_postfix_timelabel, &
115  atmos_phy_bl_restart_out_title, &
116  atmos_phy_bl_restart_out_dtype, &
117  atmos_phy_bl_mix_tracers
118 
119  integer :: ierr
120  integer :: iv
121  !---------------------------------------------------------------------------
122 
123  log_newline
124  log_info("ATMOS_PHY_BL_vars_setup",*) 'Setup'
125 
126  allocate( atmos_phy_bl_rhou_t(ka,ia,ja) )
127  allocate( atmos_phy_bl_rhov_t(ka,ia,ja) )
128  allocate( atmos_phy_bl_rhot_t(ka,ia,ja) )
129  allocate( atmos_phy_bl_rhoq_t(ka,ia,ja,qa) )
130  atmos_phy_bl_rhou_t(:,:,:) = undef
131  atmos_phy_bl_rhov_t(:,:,:) = undef
132  atmos_phy_bl_rhot_t(:,:,:) = undef
133  atmos_phy_bl_rhoq_t(:,:,:,:) = undef
134  !$acc enter data create(ATMOS_PHY_BL_RHOU_t,ATMOS_PHY_BL_RHOV_t,ATMOS_PHY_BL_RHOT_t,ATMOS_PHY_BL_RHOQ_t)
135 
136  allocate( atmos_phy_bl_zi(ia,ja) )
137  atmos_phy_bl_zi(:,:) = undef
138  !$acc enter data create(ATMOS_PHY_BL_Zi)
139 
140  allocate( atmos_phy_bl_sflx_buoy(ia,ja) )
141  atmos_phy_bl_sflx_buoy(:,:) = undef
142  !$acc enter data create(ATMOS_PHY_BL_SFLX_BUOY)
143 
144  allocate( atmos_phy_bl_ql(ka,ia,ja) )
145  allocate( atmos_phy_bl_cldfrac(ka,ia,ja) )
146  atmos_phy_bl_ql(:,:,:) = undef
147  atmos_phy_bl_cldfrac(:,:,:) = undef
148  !$acc enter data create(ATMOS_PHY_BL_QL,ATMOS_PHY_BL_cldfrac)
149 
150  !--- read namelist
151  rewind(io_fid_conf)
152  read(io_fid_conf,nml=param_atmos_phy_bl_vars,iostat=ierr)
153  if( ierr < 0 ) then !--- missing
154  log_info("ATMOS_PHY_BL_vars_setup",*) 'Not found namelist. Default used.'
155  elseif( ierr > 0 ) then !--- fatal error
156  log_error("ATMOS_PHY_BL_vars_setup",*) 'Not appropriate names in namelist PARAM_ATMOS_PHY_BL_VARS. Check!'
157  call prc_abort
158  endif
159  log_nml(param_atmos_phy_bl_vars)
160 
161  log_newline
162  log_info("ATMOS_PHY_BL_vars_setup",*) '[ATMOS_PHY_BL] prognostic/diagnostic variables'
163  log_info_cont('(1x,A,A24,A,A48,A,A12,A)') &
164  ' |', 'VARNAME ','|', &
165  'DESCRIPTION ', '[', 'UNIT ', ']'
166  do iv = 1, vmax
167  log_info_cont('(1x,A,I3,A,A24,A,A48,A,A12,A)') &
168  'NO.',iv,'|',var_name(iv),'|',var_desc(iv),'[',var_unit(iv),']'
169  enddo
170 
171  log_newline
172  if ( atmos_phy_bl_restart_in_basename /= '' ) then
173  log_info("ATMOS_PHY_BL_vars_setup",*) 'Restart input? : YES, file = ', trim(atmos_phy_bl_restart_in_basename)
174  log_info("ATMOS_PHY_BL_vars_setup",*) 'Add timelabel? : ', atmos_phy_bl_restart_in_postfix_timelabel
175  else
176  log_info("ATMOS_PHY_BL_vars_setup",*) 'Restart input? : NO'
177  endif
178  if ( atmos_phy_bl_restart_output &
179  .AND. atmos_phy_bl_restart_out_basename /= '' ) then
180  log_info("ATMOS_PHY_BL_vars_setup",*) 'Restart output? : YES, file = ', trim(atmos_phy_bl_restart_out_basename)
181  log_info("ATMOS_PHY_BL_vars_setup",*) 'Add timelabel? : ', atmos_phy_bl_restart_out_postfix_timelabel
182  else
183  log_info("ATMOS_PHY_BL_vars_setup",*) 'Restart output? : NO'
184  atmos_phy_bl_restart_output = .false.
185  endif
186 
187  return

References atmos_phy_bl_cldfrac, atmos_phy_bl_mix_tracers, atmos_phy_bl_ql, atmos_phy_bl_restart_in_aggregate, atmos_phy_bl_restart_in_basename, atmos_phy_bl_restart_in_postfix_timelabel, atmos_phy_bl_restart_out_aggregate, atmos_phy_bl_restart_out_basename, atmos_phy_bl_restart_out_dtype, atmos_phy_bl_restart_out_postfix_timelabel, atmos_phy_bl_restart_out_title, atmos_phy_bl_restart_output, atmos_phy_bl_rhoq_t, atmos_phy_bl_rhot_t, atmos_phy_bl_rhou_t, atmos_phy_bl_rhov_t, atmos_phy_bl_sflx_buoy, atmos_phy_bl_zi, scale_const::const_undef, scale_atmos_grid_cartesc_index::ia, scale_io::io_fid_conf, scale_atmos_grid_cartesc_index::ja, scale_atmos_grid_cartesc_index::ka, scale_prc::prc_abort(), and scale_tracer::qa.

Referenced by mod_atmos_vars::atmos_vars_setup().

Here is the call graph for this function:
Here is the caller graph for this function:

◆ atmos_phy_bl_vars_finalize()

subroutine, public mod_atmos_phy_bl_vars::atmos_phy_bl_vars_finalize

Finalize.

Definition at line 193 of file mod_atmos_phy_bl_vars.F90.

193  implicit none
194  !---------------------------------------------------------------------------
195 
196  log_newline
197  log_info("ATMOS_PHY_BL_vars_finalize",*) 'Finalize'
198 
199  !$acc exit data delete(ATMOS_PHY_BL_RHOU_t,ATMOS_PHY_BL_RHOV_t,ATMOS_PHY_BL_RHOT_t,ATMOS_PHY_BL_RHOQ_t)
200  deallocate( atmos_phy_bl_rhou_t )
201  deallocate( atmos_phy_bl_rhov_t )
202  deallocate( atmos_phy_bl_rhot_t )
203  deallocate( atmos_phy_bl_rhoq_t )
204 
205  !$acc exit data delete(ATMOS_PHY_BL_Zi)
206  deallocate( atmos_phy_bl_zi )
207 
208  !$acc exit data delete(ATMOS_PHY_BL_SFLX_BUOY)
209  deallocate( atmos_phy_bl_sflx_buoy )
210 
211  !$acc exit data delete(ATMOS_PHY_BL_QL,ATMOS_PHY_BL_cldfrac)
212  deallocate( atmos_phy_bl_ql )
213  deallocate( atmos_phy_bl_cldfrac )
214 
215  return

References atmos_phy_bl_cldfrac, atmos_phy_bl_ql, atmos_phy_bl_rhoq_t, atmos_phy_bl_rhot_t, atmos_phy_bl_rhou_t, atmos_phy_bl_rhov_t, atmos_phy_bl_sflx_buoy, and atmos_phy_bl_zi.

Referenced by mod_atmos_vars::atmos_vars_finalize().

Here is the caller graph for this function:

◆ atmos_phy_bl_vars_fillhalo()

subroutine, public mod_atmos_phy_bl_vars::atmos_phy_bl_vars_fillhalo

HALO Communication.

Definition at line 221 of file mod_atmos_phy_bl_vars.F90.

221  use scale_comm_cartesc, only: &
222  comm_vars8, &
223  comm_wait
224  implicit none
225  !---------------------------------------------------------------------------
226 
227  call comm_vars8( atmos_phy_bl_zi(:,:), 1 )
228  call comm_wait ( atmos_phy_bl_zi(:,:), 1 )
229 
230  return

References atmos_phy_bl_zi.

Referenced by atmos_phy_bl_vars_restart_read(), and atmos_phy_bl_vars_restart_write().

Here is the caller graph for this function:

◆ atmos_phy_bl_vars_restart_open()

subroutine, public mod_atmos_phy_bl_vars::atmos_phy_bl_vars_restart_open

Open restart file for read.

Definition at line 236 of file mod_atmos_phy_bl_vars.F90.

236  use scale_time, only: &
237  time_gettimelabel
238  use scale_file_cartesc, only: &
239  file_cartesc_open
240  implicit none
241 
242  character(len=19) :: timelabel
243  character(len=H_LONG) :: basename
244  !---------------------------------------------------------------------------
245 
246  log_newline
247  log_info("ATMOS_PHY_BL_vars_restart_open",*) 'Open restart file (ATMOS_PHY_BL) '
248 
249  if ( atmos_phy_bl_restart_in_basename /= '' ) then
250 
251  if ( atmos_phy_bl_restart_in_postfix_timelabel ) then
252  call time_gettimelabel( timelabel )
253  basename = trim(atmos_phy_bl_restart_in_basename)//'_'//trim(timelabel)
254  else
255  basename = trim(atmos_phy_bl_restart_in_basename)
256  endif
257 
258  log_info("ATMOS_PHY_BL_vars_restart_open",*) 'basename: ', trim(basename)
259 
260  call file_cartesc_open( basename, restart_fid, aggregate=atmos_phy_bl_restart_in_aggregate )
261  else
262  log_info("ATMOS_PHY_BL_vars_restart_open",*) 'restart file for ATMOS_PHY_BL is not specified.'
263  endif
264 
265  return

References atmos_phy_bl_restart_in_aggregate, atmos_phy_bl_restart_in_basename, atmos_phy_bl_restart_in_postfix_timelabel, scale_file_cartesc::file_cartesc_open(), and scale_time::time_gettimelabel().

Referenced by mod_atmos_vars::atmos_vars_restart_open().

Here is the call graph for this function:
Here is the caller graph for this function:

◆ atmos_phy_bl_vars_restart_read()

subroutine, public mod_atmos_phy_bl_vars::atmos_phy_bl_vars_restart_read

Read restart.

Definition at line 271 of file mod_atmos_phy_bl_vars.F90.

271  use scale_file, only: &
272  file_get_aggregate
273  use scale_file_cartesc, only: &
274  file_cartesc_read, &
275  file_cartesc_flush
276  implicit none
277 
278  integer :: i, j
279  !---------------------------------------------------------------------------
280 
281  if ( restart_fid /= -1 ) then
282  log_newline
283  log_info("ATMOS_PHY_BL_vars_restart_read",*) 'Read from restart file (ATMOS_PHY_BL) '
284 
285  call file_cartesc_read( restart_fid, var_name(1), 'XY', & ! [IN]
286  atmos_phy_bl_zi(:,:) ) ! [OUT]
287 
288  if ( file_get_aggregate(restart_fid) ) then
289  call file_cartesc_flush( restart_fid ) ! X/Y halos have been read from file
290  !$acc update device(ATMOS_PHY_BL_Zi)
291  else
292  call atmos_phy_bl_vars_fillhalo
293  end if
294 
295  call atmos_phy_bl_vars_check
296 
297  else
298  log_info("ATMOS_PHY_BL_vars_restart_read",*) 'invalid restart file ID for ATMOS_PHY_BL.'
299  endif
300 
301  return

References atmos_phy_bl_vars_check(), atmos_phy_bl_vars_fillhalo(), atmos_phy_bl_zi, scale_file_cartesc::file_cartesc_flush(), and scale_file::file_get_aggregate().

Referenced by mod_atmos_vars::atmos_vars_restart_read().

Here is the call graph for this function:
Here is the caller graph for this function:

◆ atmos_phy_bl_vars_restart_create()

subroutine, public mod_atmos_phy_bl_vars::atmos_phy_bl_vars_restart_create

Create restart file.

Definition at line 307 of file mod_atmos_phy_bl_vars.F90.

307  use scale_time, only: &
308  time_gettimelabel
309  use scale_file_cartesc, only: &
310  file_cartesc_create
311  implicit none
312 
313  character(len=19) :: timelabel
314  character(len=H_LONG) :: basename
315  !---------------------------------------------------------------------------
316 
317  if ( atmos_phy_bl_restart_out_basename /= '' ) then
318 
319  log_newline
320  log_info("ATMOS_PHY_BL_vars_restart_create",*) 'Create restart file (ATMOS_PHY_AE) '
321 
322  if ( atmos_phy_bl_restart_out_postfix_timelabel ) then
323  call time_gettimelabel( timelabel )
324  basename = trim(atmos_phy_bl_restart_out_basename)//'_'//trim(timelabel)
325  else
326  basename = trim(atmos_phy_bl_restart_out_basename)
327  endif
328 
329  log_info("ATMOS_PHY_BL_vars_restart_create",*) 'basename: ', trim(basename)
330 
331  call file_cartesc_create( &
332  basename, atmos_phy_bl_restart_out_title, atmos_phy_bl_restart_out_dtype, & ! [IN]
333  restart_fid, & ! [OUT]
334  aggregate=atmos_phy_bl_restart_out_aggregate ) ! [IN]
335  endif
336 
337  return

References atmos_phy_bl_restart_out_aggregate, atmos_phy_bl_restart_out_basename, atmos_phy_bl_restart_out_dtype, atmos_phy_bl_restart_out_postfix_timelabel, atmos_phy_bl_restart_out_title, scale_file_cartesc::file_cartesc_create(), and scale_time::time_gettimelabel().

Referenced by mod_atmos_vars::atmos_vars_restart_create().

Here is the call graph for this function:
Here is the caller graph for this function:

◆ atmos_phy_bl_vars_restart_enddef()

subroutine, public mod_atmos_phy_bl_vars::atmos_phy_bl_vars_restart_enddef

Exit netCDF define mode.

Definition at line 343 of file mod_atmos_phy_bl_vars.F90.

343  use scale_file_cartesc, only: &
344  file_cartesc_enddef
345  implicit none
346 
347  if ( restart_fid /= -1 ) then
348  call file_cartesc_enddef( restart_fid ) ! [IN]
349  endif
350 
351  return

References scale_file_cartesc::file_cartesc_enddef().

Referenced by mod_atmos_vars::atmos_vars_restart_enddef().

Here is the call graph for this function:
Here is the caller graph for this function:

◆ atmos_phy_bl_vars_restart_close()

subroutine, public mod_atmos_phy_bl_vars::atmos_phy_bl_vars_restart_close

Close restart file.

Definition at line 357 of file mod_atmos_phy_bl_vars.F90.

357  use scale_file_cartesc, only: &
358  file_cartesc_close
359  implicit none
360  !---------------------------------------------------------------------------
361 
362  if ( restart_fid /= -1 ) then
363  log_newline
364  log_info("ATMOS_PHY_BL_vars_restart_close",*) 'Close restart file (ATMOS_PHY_BL) '
365 
366  call file_cartesc_close( restart_fid ) ! [IN]
367 
368  restart_fid = -1
369  endif
370 
371  return

References scale_file_cartesc::file_cartesc_close().

Referenced by mod_atmos_vars::atmos_vars_restart_close().

Here is the call graph for this function:
Here is the caller graph for this function:

◆ atmos_phy_bl_vars_restart_def_var()

subroutine, public mod_atmos_phy_bl_vars::atmos_phy_bl_vars_restart_def_var

Write restart.

Definition at line 377 of file mod_atmos_phy_bl_vars.F90.

377  use scale_file_cartesc, only: &
378  file_cartesc_def_var
379  implicit none
380  integer :: iv
381  !---------------------------------------------------------------------------
382 
383  if ( restart_fid /= -1 ) then
384 
385  do iv = 1, vmax
386  call file_cartesc_def_var( restart_fid, & ! [IN]
387  var_name(iv), var_desc(iv), var_unit(iv), & ! [IN]
388  'XY', atmos_phy_bl_restart_out_dtype, & ! [IN]
389  var_id(iv) ) ! [OUT]
390  end do
391 
392  endif
393 
394  return

References atmos_phy_bl_restart_out_dtype, and scale_file_cartesc::file_cartesc_def_var().

Referenced by mod_atmos_vars::atmos_vars_restart_def_var().

Here is the call graph for this function:
Here is the caller graph for this function:

◆ atmos_phy_bl_vars_restart_write()

subroutine, public mod_atmos_phy_bl_vars::atmos_phy_bl_vars_restart_write

Write restart.

Definition at line 400 of file mod_atmos_phy_bl_vars.F90.

400  use scale_file_cartesc, only: &
401  file_cartesc_write_var
402  implicit none
403 
404  !---------------------------------------------------------------------------
405 
406  if ( restart_fid /= -1 ) then
407 
408  call atmos_phy_bl_vars_fillhalo
409 
410  call atmos_phy_bl_vars_check
411 
412  call file_cartesc_write_var( restart_fid, var_id(1), atmos_phy_bl_zi(:,:), &
413  var_name(1), 'XY' ) ! [IN]
414 
415  endif
416 
417  return

References atmos_phy_bl_vars_check(), atmos_phy_bl_vars_fillhalo(), and atmos_phy_bl_zi.

Referenced by mod_atmos_vars::atmos_vars_restart_write().

Here is the call graph for this function:
Here is the caller graph for this function:

◆ atmos_phy_bl_vars_check()

subroutine mod_atmos_phy_bl_vars::atmos_phy_bl_vars_check

Definition at line 421 of file mod_atmos_phy_bl_vars.F90.

421  use scale_statistics, only: &
422  statistics_total
423  use scale_atmos_grid_cartesc_real, only: &
424  atmos_grid_cartesc_real_area, &
425  atmos_grid_cartesc_real_totarea
426  implicit none
427 
428  call valcheck( ia, is, ie, ja, js, je, &
429  atmos_phy_bl_zi(:,:), & ! (in)
430  0.0_rp, 1.0e5_rp, var_name(1), & ! (in)
431  __file__, __line__ ) ! (in)
432 
433  call statistics_total( ia, is, ie, ja, js, je, &
434  atmos_phy_bl_zi(:,:), var_name(1), &
435  atmos_grid_cartesc_real_area(:,:), & ! (in)
436  atmos_grid_cartesc_real_totarea ) ! (in)
437 
438  return

References scale_atmos_grid_cartesc_real::atmos_grid_cartesc_real_area, scale_atmos_grid_cartesc_real::atmos_grid_cartesc_real_totarea, atmos_phy_bl_zi, scale_atmos_grid_cartesc_index::ia, scale_atmos_grid_cartesc_index::ie, scale_atmos_grid_cartesc_index::is, scale_atmos_grid_cartesc_index::ja, scale_atmos_grid_cartesc_index::je, and scale_atmos_grid_cartesc_index::js.

Referenced by atmos_phy_bl_vars_restart_read(), and atmos_phy_bl_vars_restart_write().

Here is the caller graph for this function:

Variable Documentation

◆ qs

integer, public mod_atmos_phy_bl_vars::qs

Definition at line 46 of file mod_atmos_phy_bl_vars.F90.

46  integer, public :: QS, QE

Referenced by mod_atmos_phy_bl_driver::atmos_phy_bl_driver_calc_tendency(), mod_atmos_phy_bl_driver::atmos_phy_bl_driver_mkinit(), and mod_atmos_phy_bl_driver::atmos_phy_bl_driver_tracer_setup().

◆ qe

integer, public mod_atmos_phy_bl_vars::qe

Definition at line 46 of file mod_atmos_phy_bl_vars.F90.

Referenced by mod_atmos_phy_bl_driver::atmos_phy_bl_driver_calc_tendency(), mod_atmos_phy_bl_driver::atmos_phy_bl_driver_mkinit(), and mod_atmos_phy_bl_driver::atmos_phy_bl_driver_tracer_setup().

◆ atmos_phy_bl_restart_output

logical, public mod_atmos_phy_bl_vars::atmos_phy_bl_restart_output = .false.

output restart file?

Definition at line 48 of file mod_atmos_phy_bl_vars.F90.

48  logical, public :: ATMOS_PHY_BL_RESTART_OUTPUT = .false.

Referenced by mod_admin_restart::admin_restart_setup(), and atmos_phy_bl_vars_setup().

◆ atmos_phy_bl_restart_in_basename

character(len=h_long), public mod_atmos_phy_bl_vars::atmos_phy_bl_restart_in_basename = ''

Basename of the input file.

Definition at line 50 of file mod_atmos_phy_bl_vars.F90.

50  character(len=H_LONG), public :: ATMOS_PHY_BL_RESTART_IN_BASENAME = ''

Referenced by mod_admin_restart::admin_restart_setup(), atmos_phy_bl_vars_restart_open(), and atmos_phy_bl_vars_setup().

◆ atmos_phy_bl_restart_in_aggregate

logical, public mod_atmos_phy_bl_vars::atmos_phy_bl_restart_in_aggregate

Switch to use aggregate file.

Definition at line 51 of file mod_atmos_phy_bl_vars.F90.

51  logical, public :: ATMOS_PHY_BL_RESTART_IN_AGGREGATE

Referenced by mod_admin_restart::admin_restart_setup(), atmos_phy_bl_vars_restart_open(), and atmos_phy_bl_vars_setup().

◆ atmos_phy_bl_restart_in_postfix_timelabel

logical, public mod_atmos_phy_bl_vars::atmos_phy_bl_restart_in_postfix_timelabel = .false.

Add timelabel to the basename of input file?

Definition at line 52 of file mod_atmos_phy_bl_vars.F90.

52  logical, public :: ATMOS_PHY_BL_RESTART_IN_POSTFIX_TIMELABEL = .false.

Referenced by mod_admin_restart::admin_restart_setup(), atmos_phy_bl_vars_restart_open(), and atmos_phy_bl_vars_setup().

◆ atmos_phy_bl_restart_out_basename

character(len=h_long), public mod_atmos_phy_bl_vars::atmos_phy_bl_restart_out_basename = ''

Basename of the output file.

Definition at line 53 of file mod_atmos_phy_bl_vars.F90.

53  character(len=H_LONG), public :: ATMOS_PHY_BL_RESTART_OUT_BASENAME = ''

Referenced by mod_admin_restart::admin_restart_setup(), atmos_phy_bl_vars_restart_create(), and atmos_phy_bl_vars_setup().

◆ atmos_phy_bl_restart_out_aggregate

logical, public mod_atmos_phy_bl_vars::atmos_phy_bl_restart_out_aggregate

Switch to use aggregate file.

Definition at line 54 of file mod_atmos_phy_bl_vars.F90.

54  logical, public :: ATMOS_PHY_BL_RESTART_OUT_AGGREGATE

Referenced by mod_admin_restart::admin_restart_setup(), atmos_phy_bl_vars_restart_create(), and atmos_phy_bl_vars_setup().

◆ atmos_phy_bl_restart_out_postfix_timelabel

logical, public mod_atmos_phy_bl_vars::atmos_phy_bl_restart_out_postfix_timelabel = .true.

Add timelabel to the basename of output file?

Definition at line 55 of file mod_atmos_phy_bl_vars.F90.

55  logical, public :: ATMOS_PHY_BL_RESTART_OUT_POSTFIX_TIMELABEL = .true.

Referenced by mod_admin_restart::admin_restart_setup(), atmos_phy_bl_vars_restart_create(), and atmos_phy_bl_vars_setup().

◆ atmos_phy_bl_restart_out_title

character(len=h_mid), public mod_atmos_phy_bl_vars::atmos_phy_bl_restart_out_title = 'ATMOS_PHY_BL restart'

title of the output file

Definition at line 56 of file mod_atmos_phy_bl_vars.F90.

56  character(len=H_MID), public :: ATMOS_PHY_BL_RESTART_OUT_TITLE = 'ATMOS_PHY_BL restart'

Referenced by mod_admin_restart::admin_restart_setup(), atmos_phy_bl_vars_restart_create(), and atmos_phy_bl_vars_setup().

◆ atmos_phy_bl_restart_out_dtype

character(len=h_short), public mod_atmos_phy_bl_vars::atmos_phy_bl_restart_out_dtype = 'DEFAULT'

REAL4 or REAL8.

Definition at line 57 of file mod_atmos_phy_bl_vars.F90.

57  character(len=H_SHORT), public :: ATMOS_PHY_BL_RESTART_OUT_DTYPE = 'DEFAULT'

Referenced by mod_admin_restart::admin_restart_setup(), atmos_phy_bl_vars_restart_create(), atmos_phy_bl_vars_restart_def_var(), and atmos_phy_bl_vars_setup().

◆ atmos_phy_bl_mix_tracers

logical, public mod_atmos_phy_bl_vars::atmos_phy_bl_mix_tracers = .true.

Definition at line 59 of file mod_atmos_phy_bl_vars.F90.

59  logical, public :: ATMOS_PHY_BL_MIX_TRACERS = .true.

Referenced by mod_atmos_phy_bl_driver::atmos_phy_bl_driver_calc_tendency(), and atmos_phy_bl_vars_setup().

◆ atmos_phy_bl_rhou_t

real(rp), dimension(:,:,:), allocatable, public mod_atmos_phy_bl_vars::atmos_phy_bl_rhou_t

Definition at line 61 of file mod_atmos_phy_bl_vars.F90.

61  real(RP), public, allocatable :: ATMOS_PHY_BL_RHOU_t(:,:,:) ! tendency RHOU [kg/m2/s2]

Referenced by mod_atmos_phy_bl_driver::atmos_phy_bl_driver_calc_tendency(), atmos_phy_bl_vars_finalize(), and atmos_phy_bl_vars_setup().

◆ atmos_phy_bl_rhov_t

real(rp), dimension(:,:,:), allocatable, public mod_atmos_phy_bl_vars::atmos_phy_bl_rhov_t

Definition at line 62 of file mod_atmos_phy_bl_vars.F90.

62  real(RP), public, allocatable :: ATMOS_PHY_BL_RHOV_t(:,:,:) ! tendency RHOV [kg/m2/s2]

Referenced by mod_atmos_phy_bl_driver::atmos_phy_bl_driver_calc_tendency(), atmos_phy_bl_vars_finalize(), and atmos_phy_bl_vars_setup().

◆ atmos_phy_bl_rhot_t

real(rp), dimension(:,:,:), allocatable, public mod_atmos_phy_bl_vars::atmos_phy_bl_rhot_t

Definition at line 63 of file mod_atmos_phy_bl_vars.F90.

63  real(RP), public, allocatable :: ATMOS_PHY_BL_RHOT_t(:,:,:) ! tendency RHOT [K*kg/m3/s]

Referenced by mod_atmos_phy_bl_driver::atmos_phy_bl_driver_calc_tendency(), atmos_phy_bl_vars_finalize(), and atmos_phy_bl_vars_setup().

◆ atmos_phy_bl_rhoq_t

real(rp), dimension(:,:,:,:), allocatable, target, public mod_atmos_phy_bl_vars::atmos_phy_bl_rhoq_t

Definition at line 65 of file mod_atmos_phy_bl_vars.F90.

65  real(RP), public, allocatable, target :: ATMOS_PHY_BL_RHOQ_t(:,:,:,:) ! tendency rho*QTRC [kg/kg/s]

Referenced by mod_atmos_phy_bl_driver::atmos_phy_bl_driver_calc_tendency(), atmos_phy_bl_vars_finalize(), and atmos_phy_bl_vars_setup().

◆ atmos_phy_bl_zi

real(rp), dimension (:,:), allocatable, public mod_atmos_phy_bl_vars::atmos_phy_bl_zi

Definition at line 67 of file mod_atmos_phy_bl_vars.F90.

67  real(RP), public, allocatable :: ATMOS_PHY_BL_Zi (:,:) ! depth of the PBL

Referenced by mod_atmos_phy_bl_driver::atmos_phy_bl_driver_calc_tendency(), mod_atmos_phy_bl_driver::atmos_phy_bl_driver_mkinit(), mod_atmos_phy_bl_driver::atmos_phy_bl_driver_setup(), atmos_phy_bl_vars_check(), atmos_phy_bl_vars_fillhalo(), atmos_phy_bl_vars_finalize(), atmos_phy_bl_vars_restart_read(), atmos_phy_bl_vars_restart_write(), atmos_phy_bl_vars_setup(), mod_atmos_phy_cp_driver::atmos_phy_cp_driver_calc_tendency(), mod_atmos_phy_rd_driver::atmos_phy_rd_driver_calc_tendency(), mod_atmos_phy_sf_driver::atmos_phy_sf_driver_calc_tendency(), mod_atmos_driver::atmos_surface_set(), and mod_mkinit::tke_setup().

◆ atmos_phy_bl_sflx_buoy

real(rp), dimension(:,:), allocatable, public mod_atmos_phy_bl_vars::atmos_phy_bl_sflx_buoy

Definition at line 68 of file mod_atmos_phy_bl_vars.F90.

68  real(RP), public, allocatable :: ATMOS_PHY_BL_SFLX_BUOY(:,:) ! surface flux of buoyancy

Referenced by mod_atmos_phy_bl_driver::atmos_phy_bl_driver_calc_tendency(), mod_atmos_phy_bl_driver::atmos_phy_bl_driver_setup(), atmos_phy_bl_vars_finalize(), atmos_phy_bl_vars_setup(), and mod_atmos_phy_cp_driver::atmos_phy_cp_driver_calc_tendency().

◆ atmos_phy_bl_ql

real(rp), dimension (:,:,:), allocatable, public mod_atmos_phy_bl_vars::atmos_phy_bl_ql

Definition at line 70 of file mod_atmos_phy_bl_vars.F90.

70  real(RP), public, allocatable :: ATMOS_PHY_BL_QL (:,:,:) ! liquid water content in partial condensation

Referenced by mod_atmos_phy_bl_driver::atmos_phy_bl_driver_calc_tendency(), atmos_phy_bl_vars_finalize(), atmos_phy_bl_vars_setup(), and mod_atmos_phy_rd_driver::atmos_phy_rd_driver_calc_tendency().

◆ atmos_phy_bl_cldfrac

real(rp), dimension(:,:,:), allocatable, public mod_atmos_phy_bl_vars::atmos_phy_bl_cldfrac

Definition at line 71 of file mod_atmos_phy_bl_vars.F90.

71  real(RP), public, allocatable :: ATMOS_PHY_BL_cldfrac(:,:,:) ! cloud fraction in partial condensation

Referenced by mod_atmos_phy_bl_driver::atmos_phy_bl_driver_calc_tendency(), atmos_phy_bl_vars_finalize(), atmos_phy_bl_vars_setup(), and mod_atmos_phy_rd_driver::atmos_phy_rd_driver_calc_tendency().

scale_statistics
module Statistics
Definition: scale_statistics.F90:11
scale_prc::prc_abort
subroutine, public prc_abort
Abort Process.
Definition: scale_prc.F90:350
scale_file_cartesc::file_cartesc_enddef
subroutine, public file_cartesc_enddef(fid)
Exit netCDF file define mode.
Definition: scale_file_cartesC.F90:964
scale_file_cartesc::file_cartesc_def_var
subroutine, public file_cartesc_def_var(fid, varname, desc, unit, dim_type, datatype, vid, standard_name, timeintv, nsteps, cell_measures)
Define a variable to file.
Definition: scale_file_cartesC.F90:3360
mod_atmos_phy_bl_vars::atmos_phy_bl_zi
real(rp), dimension(:,:), allocatable, public atmos_phy_bl_zi
Definition: mod_atmos_phy_bl_vars.F90:67
scale_atmos_grid_cartesc_real::atmos_grid_cartesc_real_totarea
real(rp), public atmos_grid_cartesc_real_totarea
total area (xy, local) [m2]
Definition: scale_atmos_grid_cartesC_real.F90:78
mod_atmos_phy_bl_vars::atmos_phy_bl_sflx_buoy
real(rp), dimension(:,:), allocatable, public atmos_phy_bl_sflx_buoy
Definition: mod_atmos_phy_bl_vars.F90:68
mod_atmos_phy_bl_vars::atmos_phy_bl_rhou_t
real(rp), dimension(:,:,:), allocatable, public atmos_phy_bl_rhou_t
Definition: mod_atmos_phy_bl_vars.F90:61
mod_atmos_phy_bl_vars::atmos_phy_bl_rhoq_t
real(rp), dimension(:,:,:,:), allocatable, target, public atmos_phy_bl_rhoq_t
Definition: mod_atmos_phy_bl_vars.F90:65
scale_atmos_grid_cartesc_real
module Atmosphere GRID CartesC Real(real space)
Definition: scale_atmos_grid_cartesC_real.F90:11
scale_file
module file
Definition: scale_file.F90:15
scale_prc
module PROCESS
Definition: scale_prc.F90:11
mod_atmos_phy_bl_vars::atmos_phy_bl_rhov_t
real(rp), dimension(:,:,:), allocatable, public atmos_phy_bl_rhov_t
Definition: mod_atmos_phy_bl_vars.F90:62
scale_const
module CONSTANT
Definition: scale_const.F90:11
scale_file_cartesc::file_cartesc_close
subroutine, public file_cartesc_close(fid)
Close a netCDF file.
Definition: scale_file_cartesC.F90:1044
scale_atmos_grid_cartesc_real::atmos_grid_cartesc_real_area
real(rp), dimension(:,:), allocatable, public atmos_grid_cartesc_real_area
horizontal area ( xy, normal z) [m2]
Definition: scale_atmos_grid_cartesC_real.F90:66
scale_time
module TIME
Definition: scale_time.F90:11
scale_file_cartesc::file_cartesc_create
subroutine, public file_cartesc_create(basename, title, datatype, fid, date, subsec, haszcoord, append, aggregate, single)
Create/open a netCDF file.
Definition: scale_file_cartesC.F90:796
scale_file_cartesc::file_cartesc_flush
subroutine, public file_cartesc_flush(fid)
Flush all pending requests to a netCDF file (PnetCDF only)
Definition: scale_file_cartesC.F90:1018
scale_time::time_gettimelabel
subroutine, public time_gettimelabel(timelabel)
generate time label
Definition: scale_time.F90:93
scale_comm_cartesc
module COMMUNICATION
Definition: scale_comm_cartesC.F90:11
scale_file::file_get_aggregate
logical function, public file_get_aggregate(fid)
Definition: scale_file.F90:6316
scale_file_cartesc::file_cartesc_open
subroutine, public file_cartesc_open(basename, fid, single, aggregate)
open a netCDF file for read
Definition: scale_file_cartesC.F90:760
mod_atmos_phy_bl_vars::atmos_phy_bl_cldfrac
real(rp), dimension(:,:,:), allocatable, public atmos_phy_bl_cldfrac
Definition: mod_atmos_phy_bl_vars.F90:71
mod_atmos_phy_bl_vars::atmos_phy_bl_rhot_t
real(rp), dimension(:,:,:), allocatable, public atmos_phy_bl_rhot_t
Definition: mod_atmos_phy_bl_vars.F90:63
mod_atmos_phy_bl_vars::atmos_phy_bl_ql
real(rp), dimension(:,:,:), allocatable, public atmos_phy_bl_ql
Definition: mod_atmos_phy_bl_vars.F90:70
scale_const::const_undef
real(rp), public const_undef
Definition: scale_const.F90:43
scale_file_cartesc
module file / cartesianC
Definition: scale_file_cartesC.F90:11
mod_atmos_phy_bl_vars::atmos_phy_bl_mix_tracers
logical, public atmos_phy_bl_mix_tracers
Definition: mod_atmos_phy_bl_vars.F90:59
Generated by   doxygen 1.8.17