comp-chem/cp2k
1
0
Fork 0
mirror of https://github.com/cp2k/cp2k.git synced 2026-07-28 22:25:32 -04:00
Code Issues Projects Releases Packages Wiki Activity Actions

Fix INTENT attribute

Browse source
This commit is contained in:
Matthias Krack 2023-03-07 17:46:15 +01:00
parent 6d44348ea1
commit e56efd95b4
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/fm/cp_fm_types.F
View file

@ -2174,7 +2174,7 @@ CONTAINS
!> \param unit ...
! **************************************************************************************************
SUBROUTINE cp_fm_read_unformatted(fm, unit)
TYPE(cp_fm_type), INTENT(OUT) :: fm
TYPE(cp_fm_type), INTENT(INOUT) :: fm
INTEGER, INTENT(IN) :: unit
CHARACTER(len=*), PARAMETER :: routineN = 'cp_fm_read_unformatted'