Changeset 903 for XIOS/trunk/src
- Timestamp:
- 07/25/16 14:31:08 (8 years ago)
- Location:
- XIOS/trunk/src
- Files:
-
- 4 edited
Legend:
- Unmodified
- Added
- Removed
-
XIOS/trunk/src/interface/fortran/ixios_interfaces.F90
r891 r903 87 87 USE ireduce_axis_to_scalar, ONLY : xios(get_reduce_axis_to_scalar_handle) 88 88 89 USE ireduce_axis_to_scalar_attr, ONLY : xios(set_reduce_axis_to_scalar_attr_hdl), xios(get_reduce_axis_to_scalar_attr_hdl), xios(is_defined_reduce_axis_to_scalar_attr_hdl) 89 USE ireduce_axis_to_scalar_attr, ONLY : xios(set_reduce_axis_to_scalar_attr_hdl), & 90 xios(get_reduce_axis_to_scalar_attr_hdl), & 91 xios(is_defined_reduce_axis_to_scalar_attr_hdl) 90 92 91 93 USE ixml_tree, ONLY : xios(add_axis), xios(add_file), xios(add_grid), xios(add_field), xios(add_domain), & -
XIOS/trunk/src/interface/fortran/ixml_tree.F90
r891 r903 623 623 SUBROUTINE xios(add_reduceaxistoscalartoscalar)(parent_hdl, child_hdl, child_id) 624 624 TYPE(txios(axis)) , INTENT(IN) :: parent_hdl 625 TYPE(txios( inverse_axis)), INTENT(OUT):: child_hdl625 TYPE(txios(reduce_axis_to_scalar)) , INTENT(OUT):: child_hdl 626 626 CHARACTER(len = *), OPTIONAL , INTENT(IN) :: child_id 627 627 -
XIOS/trunk/src/test/test_new_features.f90
r895 r903 106 106 CALL Distribute_index(jbeginDomInterp, jendDomInterp, njDomInterp, njDomGlo, rank, size) 107 107 108 ALLOCATE(field_A(0:ni+1,-1:nj+2,llm), field_A_2D(0:ni+1,-1:nj+2), field_Two_Axis(ni_glo,1:nj), field_Axis(nAxis), field_All_Axis(1:ni,1:nj,llm), & 108 ALLOCATE(field_A(0:ni+1,-1:nj+2,llm), field_A_2D(0:ni+1,-1:nj+2), & 109 field_Two_Axis(ni_glo,1:nj), field_Axis(nAxis), field_All_Axis(1:ni,1:nj,llm), & 109 110 lon(ni,nj),lat(ni,nj), lonvalue(ni*nj), & 110 111 lvaln(nAxis), lval_ni(ni), lval_nj(nj), lvalnInterp(nAxisinterp), & -
XIOS/trunk/src/test/test_remap.f90
r873 r903 20 20 DOUBLE PRECISION,ALLOCATABLE :: src_boundslon(:,:), dst_boundslon(:,:) 21 21 DOUBLE PRECISION,ALLOCATABLE :: src_boundslat(:,:), dst_boundslat(:,:) 22 DOUBLE PRECISION,ALLOCATABLE :: src_field(:), tmp_field(:), tmp_field_1(:), tmp_field_2(:), src_field_3D(:,:), lval(:), lval1(:), src_field_pression(:,:) 22 DOUBLE PRECISION,ALLOCATABLE :: src_field(:) 23 DOUBLE PRECISION,ALLOCATABLE :: tmp_field(:), tmp_field_1(:), tmp_field_2(:) 24 DOUBLE PRECISION,ALLOCATABLE :: src_field_3D(:,:), lval(:), lval1(:), src_field_pression(:,:) 23 25 LOGICAL,ALLOCATABLE :: src_mask_2D(:) 24 26 INTEGER :: src_ni_glo, dst_ni_glo;
Note: See TracChangeset
for help on using the changeset viewer.