File vms_intrins.patch of Package ftnchek

--- ftnchek/intrins.c.1	2020-09-10 10:42:05.014052840 +0200
+++ ftnchek/intrins.c	2020-10-11 12:03:37.736445877 +0200
@@ -684,12 +684,21 @@ SYSTEM_CLOCK ([COUNT,              Obtai
 #endif
 
 #ifdef VMS_INTRINSICS		/* VMS only */
+{"ACOSD",	1,	R|D,	type_GENERIC,	I_NONSTD|I_VMS|I_ELEM,NULL},
+{"ASIND",	1,	R|D,	type_GENERIC,	I_NONSTD|I_VMS|I_ELEM,NULL},
+{"ATAND",	1,	R|D,	type_GENERIC,	I_NONSTD|I_VMS|I_ELEM,NULL},
+{"ATAN2D",	2,	R|D,	type_GENERIC,	I_NONSTD|I_VMS|I_ELEM,NULL},
+{"COSD",	1,	R|D|C|Z,type_GENERIC,	I_NONSTD|I_VMS|I_ELEM,NULL},
+{"COTAN",	1,	R|D|C|Z,type_GENERIC,	I_NONSTD|I_VMS|I_ELEM,NULL},
+{"COTAND",	1,	R|D|C|Z,type_GENERIC,	I_NONSTD|I_VMS|I_ELEM,NULL},
 {"DATE",	1,	STR,	type_SUBROUTINE,I_NONSTD|I_VMS,NULL},
 {"ERRSNS",	5,	I,	type_SUBROUTINE,I_NONSTD|I_VMS,NULL},
 {"IDATE",	3,	I,	type_SUBROUTINE,I_NONSTD|I_VMS,NULL},
 {"RAN",		1,	I,	type_REAL,	I_NONSTD|I_VMS|I_NONPURE,NULL},
 {"SECNDS",	1,	R,	type_REAL,	I_NONSTD|I_VMS,NULL},
+{"SIND",	1,	R|D|C|Z,type_GENERIC,	I_NONSTD|I_VMS|I_ELEM,NULL},
 {"SIZEOF",	1,	I|R|D|C|Z|L|STR,type_INTEGER,	I_NONSTD|I_VMS,NULL},
+{"TAND",	1,	R|D|C|Z,type_GENERIC,	I_NONSTD|I_VMS|I_ELEM,NULL},
 {"TIME",	1,	STR,	type_SUBROUTINE,I_NONSTD|I_VMS,NULL},
 #endif