Advanced Fortran Programming : 001 : Intro + Intrinsic Array Functions Video Lecture | Introduction to Fortran Programming (AdvancedLevel) - Database Management

hello guys my name is Aaron and welcome
to my channel this series is a series of
tutorials on advanced Fortran
programming now this series kicks off
where the previous series concluded and
there will be continuing from there ok
so those of you guys who have followed
the my previous series on Fortran
programming you guys will you guys still
have the you will find it easy and it'll
is a continuation of that and those guys
I recommend this series for those people
have some basic understanding of how
Fortran works have some experience the
experience worked with functions for
subroutines modules little bit of arrays
and some formatting and all ok but if
you guys are completely new to the new
to Fortran and you're like very big big
in a basic in Fortran programming and
this you might find this a little hard
to follow so I will not recommend this
series for you guys you can go back to
my previous series the previous series
where I explained this from the
beginners point of view so it would be
that would be easy for you to for you
guys to follow and if you can learn from
other series also also I prefer mine
because you know we get you get used to
my he'll get too used to mine kind of my
way of narration and stuff mine AF
narration programming and or nothing
nothing more for the foreign or for the
notification for everybody who is
following this series from the first
first for them I'm doing all this
programming and editing doing all the
writing of the program and G in an
editor called us Jeannie
it's an IDE I'm doing with Jeannie okay
and then using the Ubuntu 14.04 as my
operating system and I'm using G Fortran
or the new Fortran as the Fortran
compiler okay
if you guys are following in Mac or
Windows or other versions of Linux the
similar procedures are entire is similar
but you may have to do a little
adjustments that they are at the initial
installation and stuff and everything
else but everything else remains the
same after your initial installations
are over okay
okay now let's jump into the program
okay
today in this in the city in this
lecture in this video we'll be
demonstrating the some array operations
that are available in Fortran see if you
want to do something like the dot
products two matrices or the transpose
of a matrix the matrix multiplication or
some other features okay you know you
may not have to explicitly write your
code okay
Fortran has all those feature some of
these intrinsic functions are available
that kind of does this that's a job for
you so you don't have to go and write
the code every every time it just
follows you can use those intrinsic
functions over here okay and go to you
and word demonstrate you guys today as
to how to do that okay and this is in
this tutorial okay now let's begin with
okay for those of you guys who haven't
who didn't follow my series I'm using a
module called as Matz Matz underscore
massone
okay this module is actually this one
which I wrote in the previous series
okay if you guys want to know how I got
if you guys want to know how this model
got created and stuff I recommend you
have a look at the previous series
especially the last fortify chapter for
the five lectures where I've been
explaining this but this is easy to
follow I will explain you guys only the
part that comes into picture okay then
what if death are using this module okay
the implicit none and by the way guys my
narration would be shorter and it will
be more to the point without any paper
complete explanation unless otherwise
demanded for because now you guys are
you know already have enough experience
with Fortran and if I were to explain
each and every thing for you you might
find it dumb and I'm not saying you guys
are really smart
those who guys are watching so you might
find this e my file is really boring so
I'm just sticking to the point alone
okay okay okay here what I'm doing is
that I'm defining set of variables the
the set of variables the K prod and
someone and then our two integers are
and see whose values are is equal to 3/8
302
i define a single dimension mat value
called a single array a single byte
array called us DP and then what and
then now see a six arrays six RS a 1 a 2
a 3 a tee beat B 1 and B 2 over here
okay a 1 a 3 a 1 s it has 3 rows and 2
columns a3 has 3 rows and 3 columns a
tea and a to have 2 color 2 rows and 3
columns whereas a b1 b2 have 6 elements
each ok and then what I'm doing in this
in this class out of course and
populating the race or you know that's a
technical term or in simple term I'm
just filling up filling these arrays
with values using the reshape command
for function ok I think you guys must be
remembering that okay we should command
and now these are the may these the this
is the most important part in the
program okay
now this function dot underscore product
does the dot product of these two
matrices B 1 B 2 and returns the result
to the value D P okay and this function
transpose takes in the matrix ok and the
returns the transpose of this matrix to
this value over here so 80 will actually
become the transpose of this matrix a 1
okay and then this function maximal
that's the matrix multiplication of this
arrays a 1 and a 2 and returns a result
to the value a 3 prod product function
returns the product of all the entries
in this array a 1 and it turns that
answer to prod okay I have someone okay
I mean this some function returns the
sum of all the entries of this matrix a
1 okay and returns it to the value value
someone okay then what I'm doing over
here is that I am printing I am printing
the matrix matrices using this call
using this subroutine call I mean this
subroutine is called as print underscore
mad - and you see this matrix this
subroutine to print the mattresses okay
now print underscore mad - is it comes
from this
in this module maths 1 written under the
phylum math underscore mark okay
now that file that subroutine is some
yeah here that's here what it does is
that it takes two integers n comma n
it's takes care for the rows and columns
and using these values and defining the
matters that a that comes into it and
we're after having two integers I comma
J what I do is that I write nested do
loop where an yeah at the what does the
nested loop and print the elements now
how does it work it's simple
first it prints the pipe symbol at the
beginning of every row and then tells
the cursor to wait stay there and then
next well this Jail J loop starts and
then what it does it just prints a first
element a first column entry in the
first row and then gives a tap-in in
this in a feel of three spaces in the
feel of each basis okay and then it
prints it gives a tab of three spaces
and then waits at the cursor stays there
okay
Colossus is there and then it prints the
next value to give in next value to
three gives these three spaces change
their the next value are the same call
the next two are in the same row stays
the gives us space stays there and so on
and ultimately till all the entries of
the column of the row gets printed and
then at the end of every row it prints
this five symbol and then goes to the
next line okay
makes a mixed line so what happens is
that you have a nice matrix with all its
values printer all its valleys along its
columns printed in all the entries of
all the entries of the row printed in
between pipe symbols okay and similarly
this is simple similarly I'm using
another not obscure another subroutine
called sprint is called mat one what it
does is that it does say entirely the
similar part he just takes n as an
integer to define B and then it prints a
matrix over here okay in this format it
lays a pipe symbol and then prints the
value of the corresponding matrix entry
and then prints another pipe symbol and
then goes to the next line okay this way
it prints there all the entries within
pi
and closer to within pipe symbols okay
now what all in this kind of formatting
prints them in a column matrix format
but that's the that's what I intended
for but you can change it you can change
the printing method by you know I just
think the formatting it off anyway
that's no big deal and what I do is that
I use this print underscore matte one to
print over here to print to print the
matrix B 1 and then here what I do is
that I get I get the maximum value of
the matrix a one is in this inbuilt
intrinsic function Maxwell and I get the
minimum value of the value of this
matrix using this function min well and
they print them here and similarly I
print the sum and the product of the
matricis matters entries that it's a
paste here here over here and then I
print the transpose of matrix a 1 which
is 80 and there's a matrix
multiplication result a 3 using the same
subroutine and then I print the dot
product of B 1 and B 2 which is actually
DP here and to compile this okay what I
did is that I written a small shell
script which does this it does the job
it removes all the modifiers object by
the executable files and then we compile
the module file first I mean the file
having the module first and then I
compile the this program which we are
working on which has the which calls the
use of module 1 ok the module match 1
okay and then like Kluber the object
files to link all them to create a to
build an executable out of it and then I
run the executable executes the
executable file or exe file here and
then ok now our job is to run this in
the terminal what I do they're good I go
to the terminal and the files are in the
desktop ok the files are at the desktop
let me just clear this up to run this
what I do is that bash star dot Sh by
the way if this is the only file
available and if
in this farm attic star dot extension
just keep clicking tab it fills the
values accordingly and then click enter
that does all the job required now let's
see what it does it has printed all the
state plans usually because we press the
LS command often and then it printed the
matrix a 1 in the matrix like format and
if you guys look look notice this looks
like this looks very fancy and looks
like a matrix okay that's the reason why
I print it was this and then and then I
printed the Mattocks a to the if you
match it to the the mat the read the
column matrix or the 1 dimensional
matrix B 1 as a column matrix and the
minimum value of a 1 is printed here the
maximum value minimum the maximum value
of a1 is frontier minimum value is
printed here the sum of all the entries
is print of this matrix is printed here
the product of all the entries is
printed here and ignore this trailing
zeros because these come because we
didn't include the farm adding to reduce
or cut the zeros but anyway that's not a
big deal and then it prints the
transpose of this matrix a 1 over here
and you can notice that the values have
been swapped accordingly in the me
interesting accordingly and then I just
printed the mattress multiplication of
a1 a2 you guys notice a 1 is 3 cross 2 a
2 is 2 cross 3 so the result is 3 cross
3 it prints the 3 cross 3 matrix here
and finally it prints the dot product of
the matrices B 1 and B 2 here well
that's all I filed that's all I have for
you guys in this tutorial thank you guys
for watching and I'll see you guys next
together with an advanced topic
bye