Searched refs:derived_result (Results 1 – 1 of 1) sorted by relevance
60 …type(A), parameter :: derived_result(*, *) = reshape(derived_source, new_shape, derived_pad, order) variable62 …logical, parameter :: test_reshape_derived_1 = all((derived_result%x.EQ.derived_expected_result%x)…63 .AND.(derived_result%i.EQ.derived_expected_result%i))65 logical, parameter :: test_reshape_derived_2 = all(shape(derived_result).EQ.new_shape)