« back to all changes in this revision
Viewing changes to assemble/Adapt_Integration.F90
- Committer: Stephan Kramer
- Date: 2011-04-22 17:28:48 UTC
- mfrom: (3448.1.1 fluidity)
- Revision ID: s.kramer@imperial.ac.uk-20110422172848-ay26j9c5qilnvfr5
Extending ewrite_minmax macro to work with scalar/vector/tensor_fields and (block_)csr_matrices.
Instead of:
do dim=1, field%dim
ewrite_minmax(field%val(dim,:))
end do
, simply do:
ewrite_minmax(field)
As an added bonus the field%name will also be written to the log.
Instead of:
do dim=1, field%dim
ewrite_minmax(field%val(dim,:))
end do
, simply do:
ewrite_minmax(field)
As an added bonus the field%name will also be written to the log.
- files modified:
- assemble/Adapt_Integration.F90
added
removed
assemble/Adapt_Integration.F90
