mirror of
https://github.com/nasa/fpp.git
synced 2025-12-11 03:05:32 -06:00
19 lines
308 B
Fortran
19 lines
308 B
Fortran
module Svc {
|
|
port Ping(key: U32)
|
|
}
|
|
module Svc {
|
|
passive component Health {
|
|
sync input port pingIn: [2] Svc.Ping
|
|
output port pingOut: [2] Svc.Ping
|
|
match pingOut with pingIn
|
|
}
|
|
}
|
|
module M {
|
|
|
|
passive component C {
|
|
sync input port pingIn: Svc.Ping
|
|
output port pingOut: Svc.Ping
|
|
}
|
|
|
|
}
|