Changeset 2623 for XIOS2/trunk/src/interface/fortran/ireorder_domain.F90
- Timestamp:
- 03/21/24 10:13:06 (4 months ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
XIOS2/trunk/src/interface/fortran/ireorder_domain.F90
r1492 r2623 4 4 USE, INTRINSIC :: ISO_C_BINDING 5 5 USE REORDER_DOMAIN_INTERFACE 6 USE LOGICAL_BOOL_CONVERSION 6 7 7 8 TYPE txios(reorder_domain) … … 24 25 25 26 CALL cxios_reorder_domain_valid_id(val, idt, len(idt)) 27 CALL xios_bool_to_logical_0d(val) 26 28 xios(is_valid_reorder_domain) = val 27 29
Note: See TracChangeset
for help on using the changeset viewer.