write_file_2d Subroutine

public subroutine write_file_2d(file_name, nx, ny, rec_num, var, mode, funit)

write float data from 4-byte unformatted binary

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	file_name	file name
integer,	intent(in)			::	nx	data number in x
integer,	intent(in)			::	ny	data number in y
integer,	intent(in)			::	rec_num	record number for reading data
real,	intent(in)			::	var(nx,ny)	output data
character(len=*),	intent(in),	optional		::	mode	option for output
integer,	intent(in),	optional		::	funit	file unit