Remove unused code.

This commit is contained in:
Uwe Risse 2024-03-04 09:45:59 +01:00
parent ee68285583
commit 75b4e0e798

View File

@ -1,11 +0,0 @@
subroutine foxgen2(nslots,cmsg)
character*40 cmsg(5)
print*,' '
do i=1,nslots
print*,i,cmsg(i)
enddo
return
end subroutine foxgen2