223031012
/
DAMASK_EICMD
mirror of https://github.com/achalhp/DAMASK_EICMD.git
1
0
Fork 0
Code Issues Projects Releases Wiki Activity

polishing

This commit is contained in:
Sharan Roongta 2020-05-07 21:13:25 +02:00
parent 00deddac44
commit 0c70f1a54f
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
src/YAML_types.f90
View File

@ -638,7 +638,7 @@ function tNode_get_byKey_asFloats(self,k) result(nodeAsFloats)
class(tNode), pointer :: node
type(tList), pointer :: list
node => self%get(k)
node => self%get(k)
list => node%asList()
nodeAsFloats = list%asFloats()
@ -657,7 +657,7 @@ function tNode_get_byKey_asInts(self,k) result(nodeAsInts)
class(tNode), pointer :: node
type(tList), pointer :: list
node => self%get(k)
node => self%get(k)
list => node%asList()
nodeAsInts = list%asInts()
@ -676,7 +676,7 @@ function tNode_get_byKey_asBools(self,k) result(nodeAsBools)
class(tNode), pointer :: node
type(tList), pointer :: list
node => self%get(k)
node => self%get(k)
list => node%asList()
nodeAsBools = list%asBools()
@ -695,7 +695,7 @@ function tNode_get_byKey_asStrings(self,k) result(nodeAsStrings)
class(tNode), pointer :: node
type(tList), pointer :: list
node => self%get(k)
node => self%get(k)
list => node%asList()
nodeAsStrings = list%asStrings()