Searched refs:AMPLtime (Results 1 – 5 of 5) sorted by relevance
/dports/science/frontistr/FrontISTR-c66bdc397de319ca59a0565b3f3b1a3b33f0c50c/fistr1/src/analysis/heat/ |
H A D | heat_get_amplitude.f90 | 25 if ( TT < fstrHEAT%AMPLtime(id,1) ) then 28 elseif( TT >= fstrHEAT%AMPLtime(id,nn) ) then 35 if( TT .ge. fstrHEAT%AMPLtime(id,ikk) & 36 .and. TT .lt. fstrHEAT%AMPLtime(id,ikk+1) ) then
|
H A D | heat_init.f90 | 95 fstrHEAT%AMPLtime(fstrHEAT%AMPLITUDEtot,namax) ) 99 fstrHEAT%AMPLtime = 0.d0 112 fstrHEAT%AMPLtime(i,icou) = hecMESH%amp%amp_table(j) 138 x1 = fstrHEAT%AMPLtime(i,k-1) 140 x2 = fstrHEAT%AMPLtime(i,k)
|
H A D | heat_echo.f90 | 289 time = fstrHEAT%AMPLtime(i,j)
|
/dports/science/frontistr/FrontISTR-c66bdc397de319ca59a0565b3f3b1a3b33f0c50c/fistr1/src/common/ |
H A D | fstr_debug_dump.f90 | 193 write(*,*) 'AMPLtime ',h%AMPLtime
|
/dports/science/frontistr/FrontISTR-c66bdc397de319ca59a0565b3f3b1a3b33f0c50c/fistr1/src/lib/ |
H A D | m_fstr.f90 | 421 real(kind=kreal), pointer :: AMPL(:,:), AMPLtime (:,:) component 719 nullify( H%AMPLtime )
|