• ベストアンサー

fortran90 関数に添字をつけることはできますか？

fortran90 関数に添字をつけることはできますか？ プログラミング初心者です。fortranで関数を使うときに、添字をつけてその添字を変化させることで、doループなどで異なる関数を順番に呼び出したいのですが、（関数f1,f2,f3,...観たいに)そういうことは可能ですか。どうやればできるのか教えてください。

  • koun
  • お礼率37% (81/216)

質問者が選んだベストアンサー

  • ベストアンサー
  • SaKaKashi
  • ベストアンサー率24% (755/3136)
回答No.2

添え字を関数名の一部にしたいって事ですか？ そう言う意味ならできないです。 IF文で添え字が1ならF1,2ならF2とか書くしかないです。

koun
質問者

お礼

ありがとうございます。

その他の回答 (1)

  • f272
  • ベストアンサー率46% (7998/17099)
回答No.1

やりたいことは http://jujuohoh.hp.infoseek.co.jp/tips/f90/function_pointer.html ここに書いてあるようなことだろうか？

koun
質問者

お礼

ありがとうございます。参考にしてみます。

  1. カテゴリ
  2. [技術者向] コンピューター
  3. プログラミング・開発
  4. その他（プログラミング・開発）

関連するQ&A

  • fortran:関数副プログラムへ関数の引数　以外の変数を渡すには？

    初心者で解説書のどこを見たらよいのかも分からない状態です。キーワードだけでもお願いいたします。 Fortranでプログラムを作っていますが、次のような状況です do i=・・・ do j=・・・ call【既成のライブラリ関数名】（f,・・・） ・・・・・・・ （ほかの処理） ・・・・・・・ end do end do 既成のライブラリ（今は数値積分）の要求する引数の中で１変数の関数名が要求されるのですが、実は今の自分の処理している問題ではｆがdoループのカウンタの"i、j"に依存するのです。 実は、ｆはある行列Hにxで表される量を足したり引いたりした後の逆行列の(i,j)成分です。 だからfの依存性はf(x,i,j)というところです。 この状況でライブラリにｆをあたかも積分変数の１変数関数であるかのようにわたすにはどうしたらよいのでしょうか？ ご存知の方はよろしくお願いいたします。

  • FORTRAN

    FORTRANについて聞かせてください。 WRITE(*,*) 'A= READ( *,*) A Aの値を0～0.15の範囲で0.01刻みで増やしていって実行したいのですが，どのようにプログラムを作成すればいいですか？？ DOループだと思うのですが，あってますか？ 分かる方いらっしゃったらお願いします。 FORTRANについてお勧めの初心者用ホームページがあればおしえてくださると助かります。

  • fortran90/95のSUM関数について

    fortran90/95のSUM関数について fortran90/95のSUM関数について、SUM関数を使うときは範囲を指定できるのでしょうか？ 例えば、 integer A(3,2)/1,2,3,4,5,6/ A=1,4 2,5 3,6 の配列があるとします。 列の和を求めたいのですが、最後の行（3行目）を足したくありません。 結果としては 1+2=3 4+5=9 にしたいのです。 このようなときは、やはりdo文にするしかないのでしょうか。 実際のプログラムではdo文があまりにも多く、見づらいのでSUM関数を使いたいのですが... どなたかご存知の方、お教えいただけないでしょうか。 よろしくお願いします。

  • FortranプログラムからC言語で実装された関数を呼ぶ方法

    Windows Vista Home PremiumにFTN95をインストールしたPCにて、Fortranのプログラミングをし始め、「Cpad for Salford FTN77」を利用してプログラミングをしています（FORTRAN77・Fortran90ともに）。FTN95でのFortranプログラミングに際し、FortranプログラムからC言語で実装された関数を呼ぶには、どのように対処すれば可能になりますでしょうか？何分初心者ですので、拙い質問かと思いますが、何卒ご教示願います。

  • FortranプログラムからC言語で実装された関数を呼ぶには？

    Windows Vista Home PremiumにFTN95をインストールしたPCにて、Fortranのプログラミングをし始め、「Cpad for Salford FTN77」を利用してプログラミングをしています（FORTRAN77・Fortran90ともに）。FTN95でのFortranプログラミングに際し、FortranプログラムからC言語で実装された関数を呼ぶには、どのように対処すれば可能になりますでしょうか？ ユーザーガイドによれば、「Fortranプログラム中に、C_EXTERNALという宣言をした関数は、Ｃの関数と同じくアクセスできるようになり、C側では、#extern <返り値>関数名（引数）を与えれば、Cの関数として呼び込むことができる。」とのことがかかれています。 実際に使っているファイルをいくつか書き出します。 ＜D:\fortran\sample.f＞ C_EXTERNAL WRITE 'WriteFile' : INTEGER*4 INTEGER*4 RESULT RESULT=WRITE() write(*,*) result return end ＜D:\fortran\sample.c＞ #extern int Writefile(int); ＜C:\Program Files\Silverfrost\FTN95\ftn95c.bat＞ ftn95.exe %1 %2 %3 %4 %5 %6 %7 %8 %9 /link ちなみに、「Cpad for Salford FTN77」での実行／設定／実行／コンパイル時のパラメータは「/link /dreal」です。もちろんftn95.exeへのパスは通してあります。何が問題でしょうか？ 何分初心者ですので、拙い質問かと思いますが、何卒ご教示願います。

  • FortranにあってCにない関数？について

    10年間Fortran90でプログラミングをしてきましたが、 C言語を使う必要があって、プログラムを書き直し中の者です。 入門書を数冊読んでいて疑問に思ったのですが、Fortranには、 A=SUM(B) と書けば、配列Bの全ての総和をAに返す、という関数があるのですが、C言語に同じような関数はないのでしょうか？（標準ライブラリに無いという事はないのでしょうか？） Fortranと比べてCは組み込み関数が少ないという印象を持ったのですが実際そうなのでしょうか？ また、Fortanでは配列の和をとる時、 do i=0,n a(i)=b(i)+c(i) end do を一行で、 a(0:n)=b(0:n)+c(0:n) と書いても良いですし、もし定義されている全部の配列の要素が対象なら a=b+c と一行で書いても良いのですが、ｃ言語では似たような書き方はできないのでしょうか？ つまり、多次元配列を扱う時、Fortranでは単に「a=b+c」と書けば済むところを、Cでは for (i=0,i<=n,i++){ for (j=0,j<=n,ｊ++){ for (k=0,k<=n,ｋ++){ a[i][j][k]=b[i][j][k]+c[i][j][k]; }}} と書かなくてはいけないのか？と悩んでおります。 私がCの機能を知らないだけなのか、Cとはそうゆうことが出来ないのか、浅学なため判断できません。 ご教授ください、どうぞよろしくお願いいたします。

  • fortranのプログラム

    fortranのプログラム 現在、fortranの勉強をしております。 そこで、質問があるのですが、 ある関数ｆ(x,y,z)の座標（x,y,z）の値がデータとして与えられているとき、 S=10+f をfortranで計算したいと考えております。 ただ、関数ｆは複数（ｆ１、ｆ２、ｆ３）あり、次々とｆに代入してＳを計算したいのですが、どのようにプログラムしたらいいか思いつきません。 どなたか、ヒントだけでもいいので、教えてください。 ちなみに、私が考えたプログラムは(下のプログラムはポイントだけ書いてあります。endやその他関係ないと思われるところは省いております。) do 100 k=1,3 S=S+fk(x,y,z) continue function f1 f1(s,t,u)=・・・ return end f2(s,t,u)=・・・ return end 使用しているバージョンは、fortran77(本当は90を使っているのですが、77だけで書いています)です。

  • fortran初心者です。

    fortran初心者です。 2つの3次元ベクトルa=(a1, a2, a3)、b=(b1, b2, b3)の各成分を入力したときに外積を求めるプログラムを配列、doループを使用して作成することは可能でしょうか？

  • Do文で副プログラムの増やす【Ｆｏｒｔｒａｎ】

    Fortranを使用してます。 DO文で副プログラムをループさせて増やしたいのですが、どうすればいいか分りません。 具体的には、副プログラムの「SUBROUTINE」文+サブルーチン名　であるサブルーチン名の後にループを使って番号を付けたいのですが・・・ 簡易なイメージとして以下のソースでtest0、test1、test2、・・・・・test10となるようなサブルーチン名にしたいのです。 do　ｘ＝0,10 SUBROUTINE　teｓｔ+ｘ ｙ＝ｘ+10 retun end end　do Fortran初心者ですが、解決したいので難しい解説でも大丈夫です。 分る方は宜しくお願いいたします。

  • fortran

    fortranでn次正方行列の対角要素の和を求める関数副プログラムを作ろうと思います。 fortran初心者で、何から始めていいのかさっぱりワカリマセン。 ヒント・アドバイスがあればよろしくお願いいたします。

注目のQ&A

カテゴリ

専門家に質問してみよう

職業から探して質問する

あなたにピッタリな商品が見つかる！ OKWAVEセレクト

質問する