IXFplus X
Jump to navigation
Jump to search
This is an interface to the IXFarray_X_plus_dataset_2d and IXFdataset_1d_X_plus_dataset_2d methods.
These subroutines will either add together a scalar 1-D array or an IXTdataset_1d object to every row of an IXTdataset_2d object. The order of the arguments is fixed, and for hte case of the IXTdataset_1d operation no checks are made on the units compatibility
F90 syntax
use IXMdataset_2d use IXMdataset_1d type(IXTdataset_2d):: d2d,d2d_1, wres type(IXTdataset_1d):: d1d real(dp)::scalar1d(:) type(IXTstatus)::status : !using interface call IXFplus_X(wres,d2d,scalar1d,status) ! wres=d2d+scalar1d call IXFplus_X(wres,d2d,d2d_1,status) ! wres=d2d(n,m)+d2d_1(n,1) call IXFplus_X(wres,d2d,d1d,status) ! wres=d2d+d1d !using specific methods call IXFarray_X_plus_dataset_2d(wres,d2d,scalar1d,status) ! wres=d2d+scalar1d call IXFdataset_1d_X_plus_dataset_2d(wres,d2d,d1d,status) ! wres=d2d+d1d call IXFdataset_2d_X_plus_dataset_2d(wres,d2d,d2d_1,status) ! wres=d2d(n,m)+d2d_1(n,1)