Save grid file file.
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(block_object), | intent(inout) | :: | self | Block. |
||
| character(len=*), | intent(in) | :: | file_name | File name. |
||
| logical, | intent(in), | optional | :: | ascii | Ascii/binary output. |
|
| logical, | intent(in), | optional | :: | metrics | Save also metrics data. |
|
| logical, | intent(in), | optional | :: | tecplot | Tecplot output format sentinel. |
|
| logical, | intent(in), | optional | :: | vtk | VTK output format sentinel. |
subroutine save_file_grid(self, file_name, ascii, metrics, tecplot, vtk)
!< Save grid file file.
class(block_object), intent(inout) :: self !< Block.
character(*), intent(in) :: file_name !< File name.
logical, intent(in), optional :: ascii !< Ascii/binary output.
logical, intent(in), optional :: metrics !< Save also metrics data.
logical, intent(in), optional :: tecplot !< Tecplot output format sentinel.
logical, intent(in), optional :: vtk !< VTK output format sentinel.
logical :: tecplot_ !< Tecplot format sentinel, local variable.
logical :: vtk_ !< VTK format sentinel, local variable.
tecplot_ = .false. ; if (present(tecplot)) tecplot_ = tecplot
vtk_ = .false. ; if (present(vtk )) vtk_ = vtk
if (vtk_) call self%save_file_grid_vtk(file_name=file_name, ascii=ascii, metrics=metrics)
endsubroutine save_file_grid