mirror of
https://github.com/JHUAPL/kaiju.git
synced 2026-01-09 18:57:53 -05:00
Adding Kp timeseries to raiju State
This commit is contained in:
@@ -390,6 +390,10 @@ module raijutypes
|
||||
type(IOClock_T) :: IO
|
||||
!! Timers for IO operations
|
||||
|
||||
! I feel like philosophically this should be in Grid but that feels weird so its here
|
||||
type(TimeSeries_T) :: KpTS
|
||||
!! Kp timeseries from solar wind file
|
||||
|
||||
! -- Solver values -- !
|
||||
real(rp), dimension(:,:,:), allocatable :: eta
|
||||
!! (Ngi, Ngj, Nk) [#/cc * Rp/T] etas
|
||||
|
||||
@@ -483,6 +483,9 @@ module raijustarter
|
||||
allocate( State%etaFacePDMR (sh%isg:sh%ieg+1, sh%jsg:sh%jeg+1, Grid%Nk, 2) )
|
||||
allocate( State%etaFlux (sh%isg:sh%ieg+1, sh%jsg:sh%jeg+1, Grid%Nk, 2) )
|
||||
endif
|
||||
|
||||
State%KpTS%wID = Model%tsF
|
||||
call State%tsKp%initTS("Kp")
|
||||
|
||||
end associate
|
||||
|
||||
|
||||
Reference in New Issue
Block a user