aboutsummaryrefslogtreecommitdiff
path: root/orrs/OSMAP1.INC
diff options
context:
space:
mode:
authorDimitri Sokolyuk <demon@dim13.org>2009-05-11 00:27:49 +0000
committerDimitri Sokolyuk <demon@dim13.org>2009-05-11 00:27:49 +0000
commit0d4f43d355de79178b1142e9735902cf641670b6 (patch)
tree2ced2323f6351db2a51090b3fd13eb11f69ff53f /orrs/OSMAP1.INC
Xfoil 6.97
Diffstat (limited to 'orrs/OSMAP1.INC')
-rw-r--r--orrs/OSMAP1.INC15
1 files changed, 15 insertions, 0 deletions
diff --git a/orrs/OSMAP1.INC b/orrs/OSMAP1.INC
new file mode 100644
index 0000000..2c27374
--- /dev/null
+++ b/orrs/OSMAP1.INC
@@ -0,0 +1,15 @@
+ PARAMETER (NR = 28,
+ NW = 41,
+ NH = 18 )
+ REAL RL(NR), WL(NW), HL(NH)
+ INTEGER IR1(NH), IR2(NH), IW1(NH), IW2(NH)
+ REAL A(NR,NW,NH,2),
+ AR(NR,NW,NH,2),
+ AW(NR,NW,NH,2),
+ AH(NR,NW,NH,2),
+ ARW(NR,NW,NH,2),
+ ARH(NR,NW,NH,2),
+ AWH(NR,NW,NH,2),
+ ARWH(NR,NW,NH,2)
+ REAL RL01(90)
+ EQUIVALENCE (RL( 1,RL01(1) )