+#define CIMATCOPY_K_CN gotoblas -> cimatcopy_k_cn
+#define CIMATCOPY_K_RN gotoblas -> cimatcopy_k_rn
+#define CIMATCOPY_K_CT gotoblas -> cimatcopy_k_ct
+#define CIMATCOPY_K_RT gotoblas -> cimatcopy_k_rt
+#define CIMATCOPY_K_CNC gotoblas -> cimatcopy_k_cnc
+#define CIMATCOPY_K_RNC gotoblas -> cimatcopy_k_rnc
+#define CIMATCOPY_K_CTC gotoblas -> cimatcopy_k_ctc
+#define CIMATCOPY_K_RTC gotoblas -> cimatcopy_k_rtc
+
+#define CGEADD_K gotoblas -> cgeadd_k
+