Trailing-Edge
-
PDP-10 Archives
-
BB-4157F-BM_1983
-
fortran/test/ovl3.for
There are 9 other files named ovl3.for in the archive. Click here to see a list.
SUBROUTINE OVL3(IVAR)
C THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY ONLY BE USED
C OR COPIED IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE.
C
C COPYRIGHT (C) DIGITAL EQUIPMENT CORPORATION 1982, 1983
IMPLICIT DOUBLE PRECISION (D)
IMPLICIT COMPLEX (C)
IMPLICIT INTEGER (A)
IVAR=1 !Got here!
TYPE 1
1 FORMAT (30x,' OVL3 DOESN''T CALL ANYTHING'/)
RETURN
END