Latest working changes to read-CAC
This commit is contained in:
parent
b3e05da6a4
commit
4038cab76f
2 changed files with 76 additions and 21 deletions
|
@ -294,8 +294,6 @@ module elements
|
|||
|
||||
integer :: i
|
||||
|
||||
max_ng_node = 0
|
||||
|
||||
do i=1, n
|
||||
select case(trim(adjustl(element_types(i))))
|
||||
case('fcc')
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue