This shows you the differences between two versions of the page.
Both sides previous revision Previous revision Next revision | Previous revision | ||
prokop_hapala [2012/10/08 10:19] prokop |
prokop_hapala [2012/11/30 13:01] (current) |
||
---|---|---|---|
Line 6: | Line 6: | ||
module myModule | module myModule | ||
implicit none | implicit none | ||
+ | | ||
type myType | type myType | ||
integer :: n | integer :: n | ||
Line 12: | Line 13: | ||
procedure :: myMethod | procedure :: myMethod | ||
end type subSystem | end type subSystem | ||
+ | | ||
type (myType) :: myInstance | type (myType) :: myInstance | ||
+ | | ||
contains | contains | ||
+ | |||
subroutine myMethod ( this, myVar) | subroutine myMethod ( this, myVar) | ||
class (subSystem) :: this | class (subSystem) :: this | ||
Line 23: | Line 27: | ||
end do | end do | ||
end subroutine myMethod | end subroutine myMethod | ||
+ | |||
end module glob_vars | end module glob_vars | ||
+ | | ||
call myInstance%myMethod(myVar) | call myInstance%myMethod(myVar) | ||
Line 95: | Line 101: | ||
[[BrainSorm]] | [[BrainSorm]] | ||
+ | |||
+ | === OTHER === | ||
+ | |||
+ | [[Wiki Playground]] |