add intrinsic functions

At least from the intrinsic function amendment to COBOL85, but ideally all that are supported in Enterprise COBOL for z/OS.

Currently getting:

gcobol -fmax-errors=99 dice.cob
cobol1: syntax error, dice.cob line 14 at 'FUNCTION'
cobol1: error: failed compiling dice.cob

with the code


       IDENTIFICATION DIVISION.
       PROGRAM-ID. dice-roller.

       DATA DIVISION.
       WORKING-STORAGE SECTION.
       01  result-tally.
           03  result-tallies           PIC 9(7) OCCURS 6 TIMES
                                        INDEXED BY tally-idx.

       01  random-number                       PIC 9 COMP.

       PROCEDURE DIVISION.
           MOVE FUNCTION RANDOM(FUNCTION SECONDS-PAST-MIDNIGHT)
           TO random-number

       PERFORM 1000000 TIMES
         COMPUTE random-number = FUNCTION RANDOM * 6
         ADD 1 TO random-number
         ADD 1 TO result-tallies (random-number)
       END-PERFORM

       PERFORM VARYING tally-idx FROM 1 BY 1 UNTIL tally-idx > 6
          DISPLAY tally-idx ": " result-tallies (tally-idx)
       END-PERFORM
       GOBACK.
Edited by Simon Sobisch