Allocate memory, setup scale and file to write
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
type(filetype), | intent(in) | :: | files | Files' name and handler |
||
type(controltype), | intent(in) | :: | control | Control parameters |
||
type(schemetype), | intent(in) | :: | scheme | finite-volume Schemes |
||
type(flowtype), | intent(in) | :: | flow | Information about fluid flow: freestream-{u,v,rho,p}, etc. |
subroutine setup_resnorm(files, control, scheme, flow)
!< Allocate memory, setup scale and file to write
implicit none
type(filetype), intent(in) :: files
!< Files' name and handler
type(controltype), intent(in) :: control
!< Control parameters
type(schemetype), intent(in) :: scheme
!< finite-volume Schemes
type(flowtype), intent(in) :: flow
!< Information about fluid flow: freestream-{u,v,rho,p}, etc.
call allocate_memory(control)
call setup_scale(scheme, flow)
call setup_file(files, control)
end subroutine setup_resnorm