Code in Fortran Wiki

[[!include sidebar]]
## Source Code on the Fortran Wiki
When contributing code, please specify a license so that others know the extent to which they may use and modify your code. **All code on the [[Fortran Wiki]] shall be in the [[Public domain|public domain]]
unless otherwise noted.** Other common licenses are the [[BSD license|BSD]], [[MIT license|MIT]], and [[GPL license|GPL]] licenses.
To contribute Fortran source code, add a link here to the
filename, program, or module name,
and create the new page by pasting the code,
wrapping it in a fenced code block with a language keyword.
See the [[HowTo]] and existing pages such as [[hello]]
for examples.
* [[allocate_coin_toss]] - dynamic memory allocation example.
* [[c_interface_module]] - supplemental types and functions for ISO-C-Binding
* [[d2u]](1f) - example of stream I/O; this program converts clear ASCII text files between Unix and DOS line terminator conventions.
* [[fdate]] - example use of [[date_and_time]](3f)
* [[gen_list]] - a [[Generic programming|generic]] [[Linked list|linked list]] example.
* [[getopt_long_module]] - Fortran equivalent of C getopt_long
* [[hash table example]] - an example implementation of [[Hash tables|hash tables]].
* [[hello]] - hello, world in [[Fortran 90]].
* [[init_seed]] - random number generator seeding example.
* [[interface_mod]] - an example of defining interfaces in a module.
* [[internalproc]] - internal procedure example.
* [[jucolor]](3f) - simple conversions between common color models
* [[inv]] - matrix inversion via LAPACK.
* [[kiss64]] - a 64-bit random number generator by George Marsaglia.
* [[match_wild]] - wild-card string matching
* [[mm_ioutils]] - a library for easier I/O in Fortran.
* [[notab]](3f) - expand tab characters in input lines
* [[notopen]](3f) - find unused file unit number
* [[newunit]] - [[Joe Krahn|Joe]]'s find unused file unit number
* [[opover]] - simple example of operator overload
* [[pointer_example]] - an example of pointer usage.
* [[iso_readline(3f)]] - calling the GNU C routine readline(3c) using the [[Fortran 2003]] [[iso_c_binding]] module.
* [[proc_component_example]] - procedure component example.
* [[qsort_inline]] - a fast inline quick+insertion sort
* [[read_gif]] - reads GIF file into array
* [[regex_module]] - Interface to POSIX regex routines
* [[stderr]](3f) - example of writing to "stderr"
* [[strnum]] - example illustrating conversion of numeric values to strings and vice-versa.
* [[strtok]](3f) - read tokens from a line in a manner similar to the C routine strtok 
* [[ttee]] - a "timed tee" -- write stdout to stdin and another file with an optional date/time prefix.
* [[transfer_ex]] - example of the transfer intrinsic.
* [[use_test]] - an example of nested use statements
* [[writegif]] - writes an image into a GIF file.
* [[happy_new_year]] - Write happy new year and example of transfer
* [[Quartiles]] - Calculating Quartiles in Fortran in 3 different method.
* [[SVD]] - Program computes the matrix singular value decomposition
* [[Time In Words]] - Program displays time in words
* [[Validate Credit-Debit card number program]] - Fortran code to Validate Credit/Debit card number program
## Code Available Elsewhere
This section lists individual modules, programs, and
procedures, typically single files or perhaps zip files.
See the [[Libraries]] page for more comprehensive
collections of routines.
* [convert.f90](ftp://ftp.numerical.rl.ac.uk/pub/MandR/convert.f90) -
 converts [[FORTRAN 77]] source form to [[Fortran 90]]
 source form.
* [gen_ll.f90](http://fortran.com/gen_ll.f90) -
 a generic [[Linked list|linked list]] module by
 Roger Young and Peter McGavin.
* [roman_numerals.f90](http://fortran.com/roman_numerals.f90) -
 a Roman numerals module.
* [qsort_c.f95](http://fortran.com/qsort_c.f95) -
 a recursive [[Fortran 95]] quicksort routine.
* [RadixSort.f90](http://davidfritz.wordpress.com/2009/04/22/fortran-radix-sort/) -
 radix sort in [[Fortran 90]].
* [wc.f90](http://home.earthlink.net/~dave_gemini/wc.f90) -
 a `wc`-like word count utility.
* [fscheme_mod.f95](http://www.qimr.edu.au/davidD/Scheme/fscheme_mod.f95) -
 an embeddable Scheme interpreter (with bindings for the [Japi](http://www.japi.de/) GUI toolkit).
* [Fortran with Excel](http://sukhbinder.wordpress.com/2010/07/20/fortran-90-with-excel-gfortran-example/) -A gfortran example to call fortran from excel
* [How to Create Fortran DLL in Visual studio](http://sukhbinder.wordpress.com/2011/04/14/how-to-create-fortran-dll-in-visual-studio-with-intel-fortran-compiler/) - A google powerpoint presentation on how to create a fortran DLL with Intel Compiler in Visual Studio 2005/2008
* [Binary STL file reader in fortran ](http://sukhbinder.wordpress.com/2011/08/07/stl-files-and-fortran/) Binary STL file reader in fortran
* [Quine in fortran 90] (http://wwwep.stewartsplace.org.uk/quines/f90.html) While Fortran has been thought to develop scientific applications, it can also be used for programmer amusement, here is a nice quine written in Fortran. A quine is a computer program which takes no input and produces a copy of its own source code as its only output. 
* [Let It Snow in Fortran] (http://sukhbinder.wordpress.com/2012/01/16/let-it-snow-in-fortran-the-code/) Inspired by google's let it snow, this is let it snow animation in fortran using pgplot graphics library.
* [Value of PI by Monte Carlo Method] (http://sukhbinder.wordpress.com/2012/01/25/neutron-collisions-stanislaw-ulam-solitares-and-my-pgplot-practice/) Fortran code to determine the value of PI using Monte Carlo Method.
* [How to use Pgplot graphics library to create Fortran graphic programs?] (http://sukhbinder.wordpress.com/2012/01/06/how-to-create-pgplot-fortran-programs-with-intel-compiler/)
* [Fireworks animation in Fortran] (http://sukhbinder.wordpress.com/2011/08/26/fireworks-animation-in-fortran-using-pgplot/) Fireworks animation using Fortran PGPLOT libraries.
* [Heart in Fortran](http://sukhbinder.wordpress.com/2012/01/18/heart-in-fortran/) Generating Heart with Fortran code using pgplot.
category: code