MESH, REFINEMENT: Use statement formatting.

Signed-off-by: Grzegorz Kowal <grzegorz@amuncode.org>
This commit is contained in:
Grzegorz Kowal 2013-12-27 17:41:04 -02:00
parent 9d7f4b2196
commit acb7eb812d
2 changed files with 61 additions and 61 deletions

View File

@ -231,7 +231,7 @@ module refinement
!
function check_refinement_criterion(pdata) result(criterion)
! variables and subroutines imported from other modules
! import external procedures and variables
!
use blocks , only : block_data
use equations , only : nv
@ -319,7 +319,7 @@ module refinement
!
function second_derivative_error(iqt, pdata) result(error)
! variables and subroutines imported from other modules
! import external procedures and variables
!
use blocks , only : block_data
use coordinates , only : ib, jb, kb, ie, je, ke