TestICEReplaceFortran.f90

Go to the documentation of this file.

SUBROUTINE testkernel(result)

  INTEGER :: result

  result = 1
  WRITE(*,*) 'Hello Hoth.'

END SUBROUTINE testkernel