summaryrefslogtreecommitdiffstats
path: root/fortran/src/H5test_kind.F90
diff options
context:
space:
mode:
Diffstat (limited to 'fortran/src/H5test_kind.F90')
-rw-r--r--fortran/src/H5test_kind.F904
1 files changed, 1 insertions, 3 deletions
diff --git a/fortran/src/H5test_kind.F90 b/fortran/src/H5test_kind.F90
index f12f430..7c5a6d6 100644
--- a/fortran/src/H5test_kind.F90
+++ b/fortran/src/H5test_kind.F90
@@ -133,7 +133,6 @@ WRITE(*,'(40(A,/))') &
'! COPYRIGHT',&
'! * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *',&
'! Copyright by The HDF Group. *',&
-'! Copyright by the Board of Trustees of the University of Illinois. *',&
'! All rights reserved. *',&
'! *',&
'! This file is part of HDF5. The full HDF5 copyright notice, including *',&
@@ -324,7 +323,7 @@ WRITE(*,'(40(A,/))') &
! with the Fortran 90/95 APIs codes which could never handle rank 15 array sizes.
OPEN(11,FILE='H5_KINDff.F90')
-WRITE(*,'(40(A,/))') &
+ WRITE(11,'(40(A,/))') &
'!****h* ROBODoc/H5_KINDff.F90',&
'!',&
'! NAME',&
@@ -338,7 +337,6 @@ WRITE(*,'(40(A,/))') &
'! COPYRIGHT',&
'! * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *',&
'! Copyright by The HDF Group. *',&
-'! Copyright by the Board of Trustees of the University of Illinois. *',&
'! All rights reserved. *',&
'! *',&
'! This file is part of HDF5. The full HDF5 copyright notice, including *',&