Design: 06.01.02/P01

This is an abstract, language-independent design. Grim details may be found in the corresponding source code. You may return to the documentation for the module containing this program design, or to the entire hierarchical table of topics covered by the PVT.
PROGRAM 1: Setting and inquiring local transformations

CHARACTERISTICS: nnnn

OPERATOR SCRIPT: passive test.

DESIGN:

Use <inquire current element type and size> thoughout to determine:
    celtyp = current element type
    celsiz = current element size

Use <inquire current element content> throughout to determine:
    celcon = current element content

            | 2.2 -33.33e33 9.9e-11 |
matrix m3 = | 4.4   5.5     6.6     |
            | 0.0  -5.2     9.9     |

            | 2.2 -33.33e33 9.9e-11   1.34 |
matrix m4 = | 4.4   5.5     6.6      12.4  |
            | 0.0  -5.2     9.9     123.0  |
            | 3.1   4.1     5.9265   66.66 |

<Set local transformation 3> with m4, PRECONCATENATE

TEST: #SR 1 2
      "<Inquire current element type and size> should return set
       local transformation 3 as the type of the created element
       and the appropriate element size, when PRECONCATENATE is
       specified."
<inquire current element type and size> to set celtyp, celsiz
pass/fail depending on
  (celtyp = set local transformation 3 and
   celsiz = values specified by the standard and language binding)

TEST: #SR 1 3 7
      "<Inquire current element content> should return the standard
       representation for set local transformation 3, when
       PRECONCATENATE is specified."
<inquire current element content> to set celcon
pass/fail depending on
  (celcon = representation as specified by the standard and language binding)


<Set local transformation 3> with m4, REPLACE

TEST: #SR 1 2
      "<Inquire current element type and size> should return
       set local transformation 3 as the type of the created
       element and the appropriate element size, when
       REPLACE is specified."
<inquire current element type and size> to set celtyp, celsiz
pass/fail depending on
  (celtyp = set local transformation 3 and
   celsiz = values specified by the standard and language binding)

TEST: #SR 1 3 7
      "<Inquire current element content> should return the standard
       representation for set local transformation 3, when
       REPLACE is specified."
<inquire current element content> to set celcon
pass/fail depending on
  (celcon = representation as specified by the standard and language binding)


<Set local transformation> with m3, POSTCONCATENATE

TEST: #SR 4 5
      "<Inquire current element type and size> should return
       set local transformation as the type of the created
       element and the appropriate element size, when
       POSTCONCATENATE is specified."
<inquire current element type and size> to set celtyp, celsiz
pass/fail depending on
  (celtyp = set local transformation and
   celsiz = values specified by the standard and language binding)

TEST: #SR 4 6 7
      "<Inquire current element content> should return the standard
       representation for set local transformation, when
       POSTCONCATENATE is specified."
<inquire current element content> to set celcon
pass/fail depending on
  (celcon = representation as specified by the standard and language binding)

END PROGRAM 1