regression_test/ASN1/codeGeneration2/Test62.asn

   1 --/////////////////////////////////////////////////////////////////////////////
   2 -- Copyright (c) 2000-2014 Ericsson Telecom AB
   3 -- All rights reserved. This program and the accompanying materials
   4 -- are made available under the terms of the Eclipse Public License v1.0
   5 -- which accompanies this distribution, and is available at
   6 -- http://www.eclipse.org/legal/epl-v10.html
   7 --/////////////////////////////////////////////////////////////////////////////
   8 Test62
   9
  10 DEFINITIONS
  11
  12 AUTOMATIC TAGS
  13
  14 ::=
  15
  16 BEGIN
  17
  18 IMPORTS ; -- nothing
  19
  20 MyRealType1 ::= REAL
  21
  22 myRealValue1 REAL ::= {mantissa 314159,base 10, exponent -10}
  23
  24 myRealValue2 MyRealType1 ::= {mantissa 314159,base 10, exponent -5}
  25
  26 myMantissa INTEGER ::= 123
  27
  28 myBase INTEGER ::= 2
  29
  30 myExponent INTEGER ::= 0
  31
  32 myRealValue3 MyRealType1 ::= {mantissa myMantissa ,base myBase, exponent myExponent}
  33
  34 myRealValue4 REAL ::= {mantissa myMantissa ,base 10, exponent myExponent}
  35
  36
  37
  38 END