@giantneco
世界最初の高級言語
PROGRAM main
CALL SUBROUTINE sub()
CONTAINS
SUBROUTINE sub()
PRINT *, "HELLO WORLD"
END SUBROUTINE sub
END PROGRAM main
つらい
昔々のコンパイラはワンパスだった
TYPE :: t
INTEGER ;; x
END TYPE t
TYPE, EXTENDS(t) :: tt
INTEGER :: y
END TYPE
Fortran の構造体 TYPE
TYPE :: t
INTEGER ;; x
CONTAINS
PROCEDURE :: p
END TYPE t
TYPE, EXTENDS(t) :: tt
INTEGER :: y
END TYPE
CLASS(t), POINTER :: p
TYPE(tt) :: v
p => v
CLASS キーワード