Arrays in FBD

This test case it part of the test suite proposed for new devices.

Test case ID: R0245
Language: ST,LD

Code:

tests2/t0245a.fbd
    <vars name="A" datatype="INT" type="EXTERNAL"/>
    <vars name="BB2a" datatype="BB2" type="EXTERNAL"/>
    <vars name="BBa" datatype="BB" type="EXTERNAL"/>
 (* graphical code omitted in this listing *)

tests2/t0245b.st
TYPE
       BB : ARRAY [ 1 .. 2 ] OF BOOL;
       BB2 : ARRAY [ 1 .. 2 ,1 ..2 ] OF BOOL;
END_TYPE
PROGRAM Z_T0245
    VAR
      X:INT;
    END_VAR
    VAR_GLOBAL
      A:INT:=1;
      BBa:BB;
      BB2a:BB2;
    END_VAR
     X:=10;
     
_GEB_ASSERT_(X = 10);
_GEB_ASSERT_(A = 1);
_GEB_ASSERT_(BB2a[1,1] = 1);
_GEB_ASSERT_(BB2a[1,2] = 0);
_GEB_ASSERT_(BB2a[2,1] = 1);
_GEB_ASSERT_(BB2a[2,2] = 0);
_GEB_ASSERT_(BBa[1] = 1);
_GEB_ASSERT_(BBa[2] = 0);

END_PROGRAM