Skip to content
Snippets Groups Projects
Commit 110e6e43 authored by Yen-Chen Chen's avatar Yen-Chen Chen Committed by Jonas Jucker
Browse files

Fix test for mo_expression (!70)


<!--
ICON

---------------------------------------------------------------
Copyright (C) 2004-2024, DWD, MPI-M, DKRZ, KIT, ETH, MeteoSwiss
Contact information: icon-model.org

See AUTHORS.TXT for a list of authors
See LICENSES/ for license information
SPDX-License-Identifier: CC0-1.0
---------------------------------------------------------------
-->

## What is the bug
Tests in for loop are all the same.
## How do you fix it


## How urgent is the bugfix
- [ ] I need it as soon as possible
- [x] I can wait for a couple of days
- [ ] None of my current codes is directly affected

## Mandatory steps before review
- [x] Gitlab CI passes _(Hint: use `make format` for linting)_ 
- [x] Bugfix is covered by additional unit tests
- [x] Mark the merge request as ready by removing `Draft:`

## Mandatory steps before merge
- [x] Test coverage does not decrease
- [ ] Reviewed by a maintainer
- [ ] Incorporate review suggestions
- [ ] Remember to edit the commit message and select the proper changelog category (feature/bugfix/other)

**You are not supposed to merge this request by yourself, the maintainers of fortan-support take care of this action!**

Approved-by: default avatarJonas Jucker <jonas.jucker@env.ethz.ch>
Merged-by: default avatarJonas Jucker <jonas.jucker@env.ethz.ch>
Changelog: bugfix
parent 55913610
No related branches found
No related tags found
1 merge request!70Fix test for mo_expression
Pipeline #61417 passed
......@@ -83,7 +83,7 @@ CONTAINS
DO i = 1, 3
WRITE (label, '(A,I1)') 'TEST_exp_sin_z_sfc_', i
CALL TAG_TEST(label)
CALL ASSERT_EQUAL(.TRUE., ALL(SIN(z(:, 1, :)*z_sfc) == val_3D(:, 1, :)))
CALL ASSERT_EQUAL(.TRUE., ALL(SIN(z(:, i, :)*z_sfc) == val_3D(:, i, :)))
END DO
! clean-up
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment