PGI Fortran Reference manual - The Portland Group

Object Oriented Programmingprogram mainuse integer_list_modimplicit noneinteger itype(integerList) :: my_listinteger values(10)do i=1, 10call my_list%add(i)enddocall my_list%printList()print *call my_list%reset()i = 1do while(my_list%moreValues())values(i) = my_list%current()call my_list%next()i = i + 1end doprint *, valuesend program mainHere is a sample compile and run of the preceding program:% pgfortran -c link.f90% pgfortran -c abstract_list.f90% pgfortran -c integerList.f90% pgfortran -V main.f90 link.o abstract_list.o integerList.opgfortran 11.6-0 64-bit target on x86-64 Linux -tp penrynCopyright 2014 NVIDIA Corporation All Rights Reserved.% a.out123456789101 2 3 4 56 7 8 9 107.5. IEEE ModulesPGI 2014 supports the Fortran IEEE standard intrinsic modules ieee_arithmetic,ieee_exceptions, and ieee_features.‣ ieee_arithmetic affects the manner in which code is compiled in the scoping units.‣ ieee_exceptions specifies accessibility of overflow and divide-by-zero flags as well asdetermines the level of support for other exceptions.‣ ieee_features supports specification of essential IEEE features. It provides access toone derived type and a collection of named constants of this type that affect the manner inwhich code is compiled in the scoping units.For details on each of these modules, refer to Intrinsic Modules.PGI Fortran Reference Guide 148