# File: set_nk.src
#

program "@(#) MODULE: set_nk.src RELEASE: %R%.%L% CREATED: %G% %U%"
source "/mdisw/cfl/dev/src/set_nk.src"
descr "set_nk - Sets n and k for med-l and Flux Budget"

display "Executing procedure set_nk."

# Flux Budget LRDXFR register list is R232 - R254
tcblock mbipldin 0x1b2 239 2 14 6       

# Medium-L LRDXFR register list is R360 - R373
tcblock mbipldin 0x1b2 367 2 14 6

display "Finished procedure set_nk: %s" !TIME

return

