Home
last modified time | relevance | path

Searched refs:QFORCE_bkup (Results 1 – 2 of 2) sorted by relevance

/dports/science/frontistr/FrontISTR-c66bdc397de319ca59a0565b3f3b1a3b33f0c50c/fistr1/src/analysis/static/
H A Dfstr_Cutback.f9042 allocate(fstrSOLID%QFORCE_bkup(size(fstrSOLID%QFORCE)))
88 if( associated(fstrSOLID%QFORCE_bkup) ) deallocate(fstrSOLID%QFORCE_bkup)
135 fstrSOLID%QFORCE_bkup(i) = fstrSOLID%QFORCE(i)
186 fstrSOLID%QFORCE(i) = fstrSOLID%QFORCE_bkup(i)
/dports/science/frontistr/FrontISTR-c66bdc397de319ca59a0565b3f3b1a3b33f0c50c/fistr1/src/lib/
H A Dm_fstr.f90387 real(kind=kreal), pointer :: QFORCE_bkup(:) => null() !< equivalent nodal force (backup) component