1
0
mirror of https://github.com/TREX-CoE/trexio.git synced 2024-11-03 20:54:07 +01:00

minor cleaning

This commit is contained in:
q-posev 2021-06-04 09:43:56 +02:00
parent 3ce9c57376
commit f1f47f4369

View File

@ -46,7 +46,6 @@ subroutine test_write()
label_str=''
do i = 1,num
! label_str=label_str//trim(label(i))//' '
label_str=label_str//trim(label(i))//TREXIO_DELIM
enddo
@ -146,7 +145,7 @@ subroutine test_read()
rc = trexio_read_nucleus_label(trex_file, label_str, 4)
! --------------------------------------------------
! dummy parser of big string with space delimeters
! dummy parser of big string with TREXIO_DELIM delimeters
! --------------------------------------------------
ind=1
offset=1