; docformat = 'rst'
;+
; Example of using a common block that is defined in a single routine.
;-
;+
; Creates the common block, fills in values for the variables in the common
; block, and calls the helper routine.
;-
pro mg_common_example1
compile_opt strictarr
common mg_common_example1_block, a, b, c
a = 1
b = 2
c = 3
mg_common_example1_helper
end