Home
last modified time | relevance | path

Searched refs:coupled_node (Results 1 – 5 of 5) sorted by relevance

/dports/science/frontistr/FrontISTR-c66bdc397de319ca59a0565b3f3b1a3b33f0c50c/fistr1/src/common/
H A Dfstr_rcap_io.F9062 allocate( fstrCPL%coupled_node( fstrCPL%coupled_node_n ), stat=err)
80 call rcapf_get_matching_node_id( fstrCPL%coupled_node, fstrCPL%coupled_node_n )
87 nid = fstrCPL%coupled_node(i)
136 deallocate( fstrCPL%coupled_node )
195 call rcapf_set_velo( fstrCPL%coupled_node, &
234 call rcapf_get_trac( fstrCPL%coupled_node, &
H A Dfstr_debug_dump.f90311 write(*,*) c%coupled_node
/dports/science/frontistr/FrontISTR-c66bdc397de319ca59a0565b3f3b1a3b33f0c50c/fistr1/src/analysis/dynamic/transit/
H A Dfstr_dynamic_nlexplicit.f90210 kkk1 = fstrCPL%coupled_node(j)*3
230 kkk1 = fstrCPL%coupled_node(j)*2
H A Dfstr_dynamic_nlimplicit.f90305 kkk1 = fstrCPL%coupled_node(j)*3
325 kkk1 = fstrCPL%coupled_node(j)*2
/dports/science/frontistr/FrontISTR-c66bdc397de319ca59a0565b3f3b1a3b33f0c50c/fistr1/src/lib/
H A Dm_fstr.f90586 integer, pointer :: coupled_node(:) ! local node id sent from revocap component
785 nullify( C%coupled_node )