Skip to content

GitLab

C
CrysFML
Commit 58bf1f40 authored by Remi Perenon's avatar Remi Perenon
Browse files
Options

Replacing 'Pause' statement by 'read(*,*)'

parent feccb389
Pipeline #7624 passed with stages
          in 13 minutes and 8 seconds
          Hide whitespace changes
          Inline Side-by-side
          Showing with 1 addition and 1 deletion
          Src08/CFML_IOForm/format_MCIF.f90
          View file @ 58bf1f40
          ......@@ -84,7 +84,7 @@ SubModule (CFML_IOForm) IO_MCIF
          !> Moment
          call Read_MCIF_AtomSite_Moment(cif, AtmList, n_ini, n_end)
          call Write_MCIF_AtomSite_Moment(6, Atmlist)
          pause '... NEXT'
          read(*,*)
          End Subroutine Read_XTal_MCIF
          ......
          Markdown is supported
          0% or
          You are about to add 0 people to the discussion. Proceed with caution.
          Finish editing this message first!
          Please register or to comment