Skip to content

Commit df18a06

Browse files
author
James R Percival
committed
Fix fladapt on CX1.
1 parent e29e717 commit df18a06

File tree

1 file changed

+10
-11
lines changed

1 file changed

+10
-11
lines changed

tools/Fladapt.F90

Lines changed: 10 additions & 11 deletions
Original file line numberDiff line numberDiff line change
@@ -34,24 +34,23 @@ subroutine fladapt(input_basename_, input_basename_len, &
3434

3535
use iso_c_binding
3636
use global_parameters, only: FIELD_NAME_LEN
37-
use parallel_tools, only: isparallel
38-
use adapt_state_module
39-
use diagnostic_fields_wrapper
40-
use diagnostic_fields_new, only : &
41-
& calculate_diagnostic_variables_new => calculate_diagnostic_variables
42-
use edge_length_module
43-
use field_options
44-
use fields
4537
use fldebug
46-
use limit_metric_module
47-
use metric_assemble
48-
use populate_state_module
38+
use parallel_tools, only: isparallel
4939
use reference_counting
5040
use spud
41+
use fields
42+
use edge_length_module
5143
use state_module
44+
use field_options
5245
use vtk_interfaces
46+
use diagnostic_fields_wrapper, only: calculate_diagnostic_variables
47+
use limit_metric_module
5348
use mesh_files
5449
use populate_state_module
50+
use metric_assemble
51+
use adapt_state_module
52+
use diagnostic_fields_new, only : &
53+
& calculate_diagnostic_variables_new => calculate_diagnostic_variables
5554

5655
implicit none
5756

0 commit comments

Comments
 (0)