GitHub Depo:https://github.com/wavebitscientific/functional-fortran
Fortran (FORTRAN), özellikle sayısal hesaplama ve bilimsel hesaplama için uygun olan genel amaçlı, yordamsal, zorunlu programlama dilidir.

Fortran

1954'de IBM tarafından üretilen IBM 704 için ilk sürümü John Backus ve ekibi tarafından geliştirilmiştir. Backus ve ekibi Kasım 1954'de "The IBM Mathematical FORmula TRANslating System: Fortran" isimli raporu yayınlamışlardır.

What Will I Learn?

• I will try to give you information about the use of Fortran Programming Language. This series will proceed step by step. At the end of our project, we will have learned the Fortran Programming and Calculus Language. I will strive to give you a useful education.

Ne Öğreneceğim?

• Bu seride sizlere Fortran Programlama Dili kullanımı hakkında bilgiler vermeye çalışacağım. Bu seri adım adım ilerleyecektir. Projemizin sonunda Fortran Programlama ve Hesaplama Dilini öğrenmiş olacağız. Sizlere faydalı bir eğitim serisi vermek için çabalayacağım.

Requirements

• To develop and examine the concept of problem solving
• Thinking and developing other things while solving problems
• Force 2.0

Gereksinimler

• Problem çözme kavramını geliştirmek ve incelemek
• Problem çözerken başka yollar düşünmek ve geliştirmek
• Force 2.0

Difficulty / Zorluk

• Intermediate / Orta Düzey

Curriculum / Müfredat

Karmaşık Arange Uygulamaları ve Birim Testleri

use mod_interfaces
implicit none
 private
 public : : arange,complement,filter,foldl,foldr,foldt,head,init,insert,&
          intersection,iterfold,last,limit,map,reverse,set,sort,split,&
          subscript,tail,unfold,union
 public :: operator(.complement.)
public :: operator(.head.)
public :: operator(.init.)
public :: operator(.intersection.)
public :: operator(.last.)
public :: operator(.reverse.)
public :: operator(.set.)
public :: operator(.sort.)
public :: operator(.tail.)
public :: operator(.union.)

• Arayüz Aralığı

  module procedure :: arange_i1,arange_i2,arange_i4,arange_i8
  module procedure :: arange_r4,arange_r8,arange_r16
  module procedure :: arange_c4,arange_c8,arange_c16

uç arayüz aralığı

• Arabirim Tamamlayıcı

module procedure :: complement_i1,complement_i2,complement_i4,complement_i8
  module procedure :: complement_r4,complement_r8,complement_r16

bitiş arayüzü tamamlayıcı

• Arayüz Operatörü ( .complement. )

 module procedure :: complement_i1,complement_i2,complement_i4,complement_i8
  module procedure :: complement_r4,complement_r8,complement_r16

bitiş ara birimi

• Arayüz Filtresi

module procedure :: filter_i1,filter_i2,filter_i4,filter_i8
  module procedure :: filter_r4,filter_r8,filter_r16

uç ara birim filtresi

• Ara Katlama

module procedure :: foldl_i1,foldl_i2,foldl_i4,foldl_i8
  module procedure :: foldl_r4,foldl_r8,foldl_r16

uç ara birim katlama

• Ara birim Katmanı

 module procedure :: foldr_i1,foldr_i2,foldr_i4,foldr_i8
  module procedure :: foldr_r4,foldr_r8,foldr_r16

uç arayüz katı

• Ara birim Katlama

module procedure :: foldt_i1,foldt_i2,foldt_i4,foldt_i8
  module procedure :: foldt_r4,foldt_r8,foldt_r16

uç arabirim katlama

• Ara birim Başlığı

 module procedure :: head_i1,head_i2,head_i4,head_i8
  module procedure :: head_r4,head_r8,head_r16
  module procedure :: head_c4,head_c8,head_c16

uç ara birim başlığı

• Arayüz operatörü ( .head. )

module procedure :: head_i1,head_i2,head_i4,head_i8
 module procedure :: head_r4,head_r8,head_r16
 module procedure :: head_c4,head_c8,head_c16

bitiş arabirimi

• Arayüz init

module procedure :: init_i1,init_i2,init_i4,init_i8
  module procedure :: init_r4,init_r8,init_r16
  module procedure :: init_c4,init_c8,init_c16

bitiş arabirimi init

• Arayüz Operatörü ( .init. )

 module procedure :: init_i1,init_i2,init_i4,init_i8
  module procedure :: init_r4,init_r8,init_r16
  module procedure :: init_c4,init_c8,init_c16

bitiş arabirimi

• Ara birim Girişi

module procedure :: insert_i1,insert_i2,insert_i4,insert_i8
  module procedure :: insert_r4,insert_r8,insert_r16

uç arabirim girişi

• Ara birim Kavşağı

module procedure :: intersection_i1,intersection_i2,intersection_i4,intersection_i8
  module procedure :: intersection_r4,intersection_r8,intersection_r16

uç arayüz kavşağı

• Arayüz operatörü (. intersection. )

module procedure :: intersection_i1,intersection_i2,intersection_i4,intersection_i8
  module procedure :: intersection_r4,intersection_r8,intersection_r16

bitiş arabirimi

• Arayüzü tekrar et

module procedure :: iterfold_i1,iterfold_i2,iterfold_i4,iterfold_i8
  module procedure :: iterfold_r4,iterfold_r8,iterfold_r16

son arayüzü tekrar et

• Son ara birim

module procedure :: last_i1,last_i2,last_i4,last_i8
  module procedure :: last_r4,last_r8,last_r16
  module procedure :: last_c4,last_c8,last_c16

son arayüz son

• Ara birim operatörü ( .last. )

 module procedure :: last_i1,last_i2,last_i4,last_i8
  module procedure :: last_r4,last_r8,last_r16
  module procedure :: last_c4,last_c8,last_c16

bitiş arabirimi

• Ara birim sınırı

module procedure :: limit_i1,limit_i2,limit_i4,limit_i8
  module procedure :: limit_r4,limit_r8,limit_r16

uç arabirim sınırı

• Ara birim haritası

 module procedure :: map_i1,map_i2,map_i4,map_i8
  module procedure :: map_r4,map_r8,map_r16

uç arabirim haritası

• Ters arayüz

module procedure :: reverse_i1,reverse_i2,reverse_i4,reverse_i8
  module procedure :: reverse_r4,reverse_r8,reverse_r16

uç arabirimi ters

• Arayüzü operatör ( .reverse. )

module procedure :: reverse_i1,reverse_i2,reverse_i4,reverse_i8
  module procedure :: reverse_r4,reverse_r8,reverse_r16

bitiş arabirimi

• Arayüz seti

modül  yordamı  :: set_i1, set_i2, set_i4, set_i8
  modül  prosedürü  :: set_ r4 , set_ r8 , set_r16

uç arabirim seti

• Arayüz operatörü ( .set. )

module procedure :: set_i1,set_i2,set_i4,set_i8
  module procedure :: set_r4,set_r8,set_r16

bitiş arabirimi

• Arayüz sınıfı

module procedure :: set_i1,set_i2,set_i4,set_i8
  module procedure :: set_r4,set_r8,set_r16

son arayüz sıralama

• Arayüz operatörü ( .sort. )

module procedure :: set_i1,set_i2,set_i4,set_i8
  module procedure :: set_r4,set_r8,set_r16

bitiş ara birimi

• Ara birim bölünmesi

module procedure :: split_i1,split_i2,split_i4,split_i8
  module procedure :: split_r4,split_r8,split_r16

uç ara birim bölünümü

• Arayüz alt simgesi

module procedure :: subscript_i1,subscript_i2,subscript_i4,subscript_i8
  module procedure :: subscript_r4,subscript_r8,subscript_r16

uç ara birim alt simgesi

• Arayüz kuyruğu

module procedure :: tail_i1,tail_i2,tail_i4,tail_i8
  module procedure :: tail_r4,tail_r8,tail_r16
  module procedure :: tail_c4,tail_c8,tail_c16

uç arayüz kuyruğu

• Arayüz operatörü ( .tail. )

module procedure :: tail_i1,tail_i2,tail_i4,tail_i8
 module procedure :: tail_r4,tail_r8,tail_r16
 module procedure :: tail_c4,tail_c8,tail_c16

bitiş ara birimi

• Ara birim açılır

module procedure :: unfold_i1,unfold_i2,unfold_i4,unfold_i8
  module procedure :: unfold_r4,unfold_r8,unfold_r16

uç arabirim açılır

• Arayüz birliği

module procedure :: union_i1,union_i2,union_i4,union_i8
  module procedure :: union_r4,union_r8,union_r16

uç arabirim birliği

• Arayüz operatörü ( .union. )

module procedure :: union_i1,union_i2,union_i4,union_i8
  module procedure :: union_r4,union_r8,union_r16

bitiş arabirimi

---

Posted on Utopian.io - Rewarding Open Source Contributors

---