Alexander_KS/SAPFOR
4
2
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

finalyze moving

Browse Source
This commit is contained in:
Alexander
2025-03-12 14:28:04 +03:00
parent f840006398
commit 033bbce220
774 changed files with 0 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
tests/sapfor/convert_expr_to_loop/expr_with_sections.f Normal file
View File

@@ -0,0 +1,10 @@
PROGRAM EXPR_WITH_SECTIONS
REAL A (10), B (9), C(3)
A(3:6) = B(4:7) + B(3:6)
A(1:5) = 2 * B(4:8)
A(2:4) = C + B(1:3)
C = B(6:8) * A(1:3)
END

9
tests/sapfor/convert_expr_to_loop/simple_expr.f Normal file
View File

@@ -0,0 +1,9 @@
PROGRAM SIMPLE_EXPR
REAL A (10), B (10), C(10)
A = B + C
C = A + B
B = A + A
END

9
tests/sapfor/convert_expr_to_loop/two_dimensional_expr.f Normal file
View File

@@ -0,0 +1,9 @@
PROGRAM TWO_DIMENSIONAL_EXPR
REAL A (100, 100), B (100, 90), C(10, 3)
A(2:10, 3:30) = B(34:42, 43:70) + B(34:42, 43:70)
B(10:20, 34:37) = C + A(20:30, 1:3)
B(3:47, 2:10) = A(45:99, 2:10) * B(1:45, 8:16)
END