use gtool_axistype(GT_VARIABLE):: var type(GT_AXIS):: axis integer:: dimno logical:: vertical
axis = Axis(var, [dimno], [vertical])
gtool_contours モジュールは等値線群を構成する手段を提供します。 Axis サブルーチンは変数 var から dimno 番目の次元をとって座標軸を構成します。 オプション引数 vertical が真の場合は縦軸になります。 vertical が偽か与えられない場合は横軸になります。
座標軸を描画あるいは保存する方法は gtool_figure(3f) を参照してください。