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:
parent
3ce9c57376
commit
f1f47f4369
@ -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
|
||||
|
Loading…
Reference in New Issue
Block a user