Compound data type: Difference between revisions

Content added Content deleted

Inline

@@ Line 144: / Line 144: @@
 =={{header|Fortran}}==
-In ISO Fortran 90 or later, use a TYPE declaration and "constructor" syntax:
+In ISO Fortran 90 or later, use a TYPE declaration, "constructor" syntax, and field delimiter syntax:
    PROGRAM TYPEDEMO
       TYPE RATIONAL                                          ! Type declaration
@@ Line 150: / Line 150: @@
          INTEGER :: DENOMINATOR
       END TYPE RATIONAL
-      TYPE( RATIONAL ), PARAMETER :: ZERO = RATIONAL( 1, 1 ) ! Variables initialized by constructor syntax
-      TYPE( RATIONAL ), PARAMETER :: ONE = RATIONAL( 1, 1 )
+      TYPE( RATIONAL ), PARAMETER :: ZERO = RATIONAL( 0, 1 ) ! Variables initialized by constructor syntax
+      TYPE( RATIONAL ), PARAMETER :: ONE  = RATIONAL( 1, 1 )
       TYPE( RATIONAL ), PARAMETER :: HALF = RATIONAL( 1, 2 )
       INTEGER :: N, HALFD. HALFN