38 use json_module,
only : json_file
72 type(json_file),
intent(inout) :: json
73 class(
case_t),
intent(inout),
target :: case
74 character(len=:),
allocatable :: name
75 character(len=:),
allocatable :: nut_field
76 character(len=20) :: fields(2)
83 fields(1) =
"les_delta"
86 call json%add(
"fields", fields)
88 call this%init_base(json,
case)
89 call this%writer%init(json,
case)
93 call les_model_factory(this%les_model, name,
case%fluid, json)
100 call this%writer%free()
102 if (
allocated(this%les_model))
then
103 call this%les_model%free()
104 deallocate(this%les_model)
114 call this%les_model%compute(time%t, time%tstep)
123 call this%les_model%compute(time%t, 0)
Retrieves a parameter by name or assigns a provided default value. In the latter case also adds the m...
Retrieves a parameter by name or throws an error.
Defines a simulation case.
Implements the field_writer_t type.
Utilities for retrieving parameters from the case files.
Implements the les_simcomp_t type.
subroutine les_simcomp_restart(this, time)
Compute the les_simcomp field when restart.
subroutine les_simcomp_init_from_json(this, json, case)
Constructor from json.
subroutine les_simcomp_compute(this, time)
Compute the les_simcomp field.
subroutine les_simcomp_free(this)
Destructor.
integer, parameter, public rp
Global precision used in computations.
Simulation components are objects that encapsulate functionality that can be fit to a particular comp...
subroutine restart_(this, time)
Dummy restart function.
subroutine preprocess_(this, time)
Dummy preprocessing function.
Module with things related to the simulation time.
A simulation component that writes a 3d field to a file.
Base abstract type for LES models based on the Boussinesq approximation.
A simulation component that drives the computation of the SGS viscosity.
Base abstract class for simulation components.
A struct that contains all info about the time, expand as needed.