GN) Example(s) of the use of the DESL
equation command.
eqn
files r10 eqfilen eq1 object obj10 go
This execution of "equation" will attempt to create one new
file containing all of the SIF records from the file "r10"
after having subjected them to the equation(s) and logic
contained on the equation file "eq1". The equation file
is used "as is" because the "no-edit" suffix, "n", has been
included on "eqfile" ("eqfilen"). Also, the optional ability
to save the "compiled" set of equations is invoked; the
"compiled" set of equations is saved in a file named "obj10".
equation
files r10 r11 setval -88. alpha gt 10 cl gt cl2
paths null /mnt/xxx/ compile objxx newfiles ex1 ex2 go
In this example, "equation" is executed on 2 files : "r10",
and "r11". The function will attempt to access "r10" from
the current directory and to access "r11"
first from the alternate location "/mnt/xxx/". Additionally,
only SIF records in which the variables "alpha" and "cl"
both satisfy the 2 global conditions will be
passed through the equation(s) and thereby have a chance
to be written to the new files being created. Here, the
default value for variables not set or for results which
would have otherwise been an illegitimate number has been
set to -88. The object file "objxx" will be read to activate
a previously-compi set of equations. These equations will
then be used to operate on the SIF records from files r10
and r11. All records from these two files not voided by the
equation(s) will be written to the two new files "ex1" and
"ex2", respectively.
equation
files gen5 eqfile eq7 tabfile table
integral x fx 1 x1 thru x19 fx1 thru fx19
derivative x fx 2 x1 thru x19 fx1 thru fx19 go
where, the equation file "eq7" is :
dimension fx(19) x(19)
ftemp1=reg(1)
ftemp=reg(2)
do 1 to 19
fx=x^3.
enddo
temp1 = table(alphacl,x3
c
c integ ( set_id, low_lim, up_lim, no_intrvls, curve_order)
c
a1=integ(1,ftemp
c
c deriv ( set_id, iv_value, degree, curve_order, curve_type )
c
b12=deriv(2,1.5,
and the table file "table" is :
* ----- table :
table alphacl 3
*
* get cl = f(alpha)
*
10 2
5 0
20 3
In this example, "equation" is executed on 1 file : "gen5".
In anticipation of the specified equations, an integral and
a derivative have been defined and a table file has been referenced.
Both the integral and the derivative have been defined to be
applicable over the range of data from "x1" through "x19" and
"fx1" through "fx19" for the independent and dependent variables,
respectively.
In the equation file, the "fx" vector "fx1" --> "fx19" is defined
as a function of the "x" vector, which is already defined on the
incoming SIF, "gen5". The references to the "table", "integ", and
"deriv" functions within the equations will be made for each SIF
record on "gen5". The two variables "ftemp1" and "ftemp2"
reference the values in user registers *V1 and *V2, respectively.
The results "temp1", "a1", and "b12" will be added to the new
SIF file, which will, by default, have a "gen#" type name.
DESL Manager at ViGYAN, Inc.
30 Research Drive
Hampton, VA 23666
Voice: (757) 865-1400
Toll Free: (800) 288-3998
FAX: (757) 865-8177
