setcl

    虹色を色指標配列icolhに割り当てるサブルーチン.
     
     
  • サブルーチン名: setcl

  •  
  • 呼び出し方:call setcl(cmin,irvs,igray,icolh,ncmax,ncolor)

  •  
  • 参照しているサブルーチン:rainc,grayc

  •  
  • 引 数:
  • 引数
    意 味
    入出力の区分
    備 考
    cmin 虹色をしめす数字の最小値.
    入力
    0 ≤ cmin ≤ 1
    cmin としては0.11が適当である.
    irvs irvs = 1 の場合には,配列icolhの添字が増加するにつれて,割り当てられる色が赤橙黄緑青藍紫と変化する.それ以外の場合は,逆順に割り当てられる.
    入力
    igray igray = 1 の場合には,配列icolhに割り当てられる色はグレースケールになる.それ以外の場合は,純粋色が割り当てられる.
    入力
    icolh 色指標を割り当てる配列.
    出力
    本ルーチン内での配列宣言は,icolh(0:*)である.
    ncmax 配列icolhの整合寸法.
    入力
    ncolor 使用したい色の数.
    入力
    ncolor = 0 とした場合には,出力機器で使用可能な色の数の最大値が選ばれ,新たに ncolor を設定する.