Changeset 3182 for palm/trunk/UTIL/inifor/tests/test-prototype.f90
- Timestamp:
- Jul 27, 2018 1:36:03 PM (6 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/UTIL/inifor/tests/test-prototype.f90
r2718 r3182 21 21 ! Current revisions: 22 22 ! ----------------- 23 ! 23 ! Added usage hints 24 24 ! 25 25 ! Former revisions: … … 51 51 52 52 ! Arange 53 !define parameters and reference values 53 54 54 55 ! Act 56 !compute result 55 57 56 58 ! Assert 59 !res = res .AND. assert_equal(<result_array>, <reference_array>, 'description') 57 60 58 61 CALL end_test(title, res)
Note: See TracChangeset
for help on using the changeset viewer.