Getting my test case during the Memorial Day sale!

This commit is contained in:
David E Bernholdt 1994-05-27 23:34:42 +00:00
parent d55e2fa480
commit 7c31e7cccf
2 changed files with 11 additions and 1 deletions

10
src/develop/debtest.F Normal file
View file

@ -0,0 +1,10 @@
Subroutine DEBTest(RTDB)
Implicit NONE
Integer RTDB
Integer LUOut
Parameter (LuOut = 6)
C#include "stdio.fh"
C#include "stdio_init.fh"
Write (LuOut, *) 'Just a placeholder!'
Return
End