gms初期化

program gms_shallow1d
......!宣言文
......
!---モデルの設定
  call set_grid_num_x(nx) !gridの数
  call set_margin_x(margin) !のりしろ長さ
  call set_real_min_x(xmin) !端の座標
  call gms_set_interval_x(delta_x) !グリッド間隔

!---メモリーブロックの長さを指定
  call allocate_work_area_x(20)

!---配置情報を教える。裏で番地が決定されている。
  call def_var(u,   u_grid)
  call def_var(u_a, u_grid)
  call def_var(u_b, u_grid)
......