Load the block signature of all blocks from file.
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(block_signature_object), | intent(in) | :: | self | Block signature object. |
||
| integer(kind=I4P), | intent(in) | :: | file_unit | File unit. |
subroutine save_into_file(self, file_unit)
!< Load the block signature of all blocks from file.
class(block_signature_object), intent(in) :: self !< Block signature object.
integer(I4P), intent(in) :: file_unit !< File unit.
write(unit=file_unit) self%id, &
self%level, &
self%gc, &
self%ni, &
self%nj, &
self%nk, &
self%emin%x, self%emin%y, self%emin%z, &
self%emax%x, self%emax%y, self%emax%z, &
self%is_cartesian, &
self%is_null_x , self%is_null_y , self%is_null_z
endsubroutine save_into_file