testMatIO_prg Program

  1. testMatIO.f90
  2. testMatIO_prg
program~~testmatio_prg~~UsesGraph program~testmatio_prg testMatIO_prg module~kinds_mod kinds_mod module~kinds_mod->program~testmatio_prg module~matio_mod matIO_mod module~matio_mod->program~testmatio_prg iso_c_binding iso_c_binding iso_c_binding->module~matio_mod
Help


Test program for matIO_mod

Calls

program~~testmatio_prg~~CallsGraph program~testmatio_prg testMatIO_prg proc~testwritemat testWriteMat program~testmatio_prg->proc~testwritemat interface~writemat writeMat proc~testwritemat->interface~writemat
Help

Subroutines

Source Code

testMatIO_prg

Subroutines

subroutine testWriteMat()

Verify operation of writeMat

Arguments

None

Source Code

program testMatIO_prg
	!! Test program for matIO_mod
	use kinds_mod
	use matIO_mod
	implicit none
	
	call testWriteMat
	
contains

	subroutine testWriteMat
		!! Verify operation of writeMat
		integer,parameter::N = 5
		integer,parameter::M = 4
		real(wp),dimension(N,M)::A
		
		integer::i,j
		
		forall(i=1:N,j=1:M) A(i,j) = real(i+j,wp)
		
		call writeMat('data.mat','A',A,.true.)
	end subroutine testWriteMat

end program testMatIO_prg

All Programs