| commit | 3e530ac9800e769ded91e8d23d379e32cb1ec379 | |
| author | Michael Duda <duda@ucar.edu> | |
| Wed, 22 Apr 2020 02:01:40 +0000 (21 22:01 -0400) | ||
| committer | Michael Duda <duda@ucar.edu> | |
| Wed, 22 Apr 2020 02:01:40 +0000 (21 22:01 -0400) | ||
| tree | 84e89eb56dc4904594f89efd53e31cb02035a19e | treesnapshot (tar.gz zip) |
| parent | b9cfb7a28342ac8a79ad463fed362f777731b0e9 | commitdiff |
Fix inconsistent kind types of arguments to MIN/MAX in module_map_utils
The XL compiler identified calls to the MIN and MAX intrinsics in
module_map_utils with inconsistent kind type parameters of the arguments:
"module_map_utils.f90", line 819.44: 1513-041 (S) Arguments of the wrong type were specified for the INTRINSIC procedure "max".
** map_utils === End of Compilation 1 ===
1501-511 Compilation failed for file module_map_utils.f90.
This commit changes the kind type parameter of the literal arguments
to MIN and MAX at line 808 of module_map_utils.F in the ijll_ps
routine to HIGH.
The XL compiler identified calls to the MIN and MAX intrinsics in
module_map_utils with inconsistent kind type parameters of the arguments:
"module_map_utils.f90", line 819.44: 1513-041 (S) Arguments of the wrong type were specified for the INTRINSIC procedure "max".
** map_utils === End of Compilation 1 ===
1501-511 Compilation failed for file module_map_utils.f90.
This commit changes the kind type parameter of the literal arguments
to MIN and MAX at line 808 of module_map_utils.F in the ijll_ps
routine to HIGH.
| geogrid/src/module_map_utils.F | diffblobblamehistory |